/********************************************************************************* * HTML save data to CSV or excel * 说明: * 将网页内容保存到csv文件或者execl中. * * 2017-10-28 深圳 南山平山村 曾剑锋 ***************************************************************************
将ACCESS 的数据库中的表的文件 导出了EXCEL格式 '''' '将ACCESS数据库中的某个表的信息 导出为EXCEL 文件格式 'srcfName ACCESS 数据库文件路径 'desfName excel 文件路径 Public Function ExporToExcel(sqlstr As String, srcfName As String, desfName As String) On Error Resume Next Dim k As Long Dim dbCnn As