Dreamweaver导入excel

Dreamweaver导入excel

工具原料：
软件：Dreamweaver。
硬件：电脑。
导入EXCEL方法：
1、首先打开软件创建任意项目。
2、点击文件-导入-Excel文档。

3、浏览需要导入的Excel表格即可。

If GetFileOpenName("程序位置选择",ls_pa,ls_na,"xls","Microsoft Excel 工作薄 (*.xls),*.xls," ) = 1 Then
dw_1.SetRedraw(False)
dw_1.Reset()
oleobject excelserver
excelserver = Create oleobject
excelok = excelserver.ConnectToNewObject("excel.application")
//检查返回值，以确保已成功地连接到了Excel
If excelok <> 0 Then
MessageBox("信息提示","连接EXCEL失败，请检查计算机中是否安装了EXCEL!")
Return
End If
If ls_pa = "" Then Return -1
dw_1.SetTransObject(sqlca)
dw_1.Reset()
excelserver.workbooks.Open(ls_pa)
excelserver.activesheet.cells.Copy
li_count = dw_1.ImportClipboard(3) //导入数据
Clipboard("")
excelserver.quit()
excelserver.DisconnectObject()
Destroy excelserver