代码:我用的已是ADO2.7了.
On Error Resume Next
If gCN.State = adStateClosed Then
gCN.CursorLocation = adUseClient
gCN.Open "PROVIDER=MSDASQL;dsn=test;uid=test;pwd=test;database=test;"
End If
On Error Resume Next
If gCN.State = adStateClosed Then
gCN.CursorLocation = adUseClient
gCN.Open "PROVIDER=MSDASQL;dsn=test;uid=test;pwd=test;database=test;"
End If
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货