Xin chào các anh/chị cao nhân, em đang gặp rắc rối với việc chạy ADODB.Command.Execute, em xin gửi code lên và mong mọi người chỉ giáo ạ.
Em bị lỗi ngay tại dòng Set adoRs_MaxModifiedDate = .Execute
Cảm ơn anh/chị đã góp ý!
PHP:
Set adoCn = New ADODB.Connection
With adoCn
.ConnectionString =
"Provider=SQLOLEDB;Data Source=" & src & ";" & _
"Initial Catalog=" & ctlg & ";" & _
"Integrated Security=SSPI;"
.CursorLocation = adUseServer
.Open
End With
Set adoCm = New ADODB.Command
With adoCm
.ActiveConnection = adoCn
.CommandType = adCmdText
.CommandText = "IF OBJECT_ID('tempdb..#View_SAVoucher_CV') IS NOT NULL DROP TABLE #View_SAVoucher_CV" & _
" SELECT PostedDate, ModifiedDate, RefNoFinance, InvNo, AccountObjectCode, TotalAmount, IsPostedFinance" & _
" INTO #View_SAVoucher_CV" & _
" FROM View_SAVoucher" & _
.Execute
.CommandText = "SELECT * FROM #View_SAVoucher_CV"
Set adoRs = .Execute
.CommandText = "SELECT MAX(ModifiedDate) FROM #View_SAVoucher_CV"
Set adoRs_MaxModifiedDate = .Execute
End With
Cảm ơn anh/chị đã góp ý!