[求助]连接远程数据库的问题!
这段代码哪里错了,请教高手!
Private Sub Command1_Click() On Error Resume Next Set rs = server.CreateObject("adodb.recordset") Set conn = server.CreateObject("adodb.connection") conn.ConnectionString = "driver={microsoft access driver (*.mdb)};Server=127.0.0.1;Database=data.mdb" conn.Open Set rs.ActiveConnection = conn rs.Source = "select * from 报表" rs.Open End Sub