摘要:
Sub 数据库连接() Set Cnn = CreateObject("ADODB.Connection") Set rs = CreateObject("ADODB.Recordset") Cnn.ConnectionString = "Provider=SQLOLEDB;Persist Secu 阅读全文
摘要:
Sub CopyData_5() Set Cnn = CreateObject("ADODB.Connection")With Cnn.Provider = "microsoft.Ace.oledb.12.0".ConnectionString = "Extended Properties=Exce 阅读全文