dim objDatabase = ""
dim objDatatable = ""
dim arrayRet = ""
dim iRet = ""
dim objExcelWorkBook = ""
dim tableHead = ""
dim strJSON = ""
dim bRet = ""
dim temp = ""
dim tableBody = ""
objExcelWorkBook = Excel.OpenExcel("C:\\Users\\dell\\Desktop\\wx.xlsx",true,"Excel","","")
tableHead = Excel.ReadRow(objExcelWorkBook,"Sheet1","A1")
iRet = Excel.GetRowsCount(objExcelWorkBook,"Sheet1")
TracePrint(tableHead)
tableBody = Excel.ReadRange(objExcelWorkBook,"Sheet1","A2:B"&iRet)
objDatatable = Datatable.BuildDataTable(tableBody,tableHead)
objDatatable = Datatable.GetDataTableByArray(objDatatable,false)
Excel.CloseExcel(objExcelWorkBook,true)
TracePrint(objDatatable)
data = Database.CreateDB("MySQL",{"charset":"utf8","database":"hcpmanage","host":"localhost","password":"gicCYW79cWCCaM5irWDnsQ==","port":"3306","user":"root"})
ICount = Database.ExecuteBatchSQL(data ,"insert into wx(carNumber,carCompany) values(%s,%s)", {"args":objDatatable})
//values = Database.ExecuteSQL(data ,"insert into wx(carNumber,carCompany) values(s%,s%)", "args"objDatatable){"args":[]}
Database.CloseDB(data)
