1。工程->引用,添加Micrsoft ActiveX Data Objects 2。5 Library 2。在需要连接数据库的地方加入以下代码: Dim conn As ADODB。Connection Dim rs As ADODB。
RecordSet If conn。State = adStateOpen Then conn。Close Set conn = New ADODB。Connection conn。ConnectionString = "Provider=Microsoft。
Jet。OLEDB。4。0;Data Source=" & DataPath & ";Persist Security Info=False" 'DataPath为数据库的路径 conn。Open ＇最后记得在关闭程序的时候把连接也关闭了． conn。
Close Set conn = Nothing 。
答：1.工程->引用,添加Micrsoft ActiveX Data Objects 2.5 Library 2.在需要连接数据库的地方加入以下代码: Dim co...详情>>
答：不知道你是不是写错文件名了，pdf?详情>>
答：当电脑的全部组件（包括软件）我们国家都能生产的时候。详情>>
