vb连access的问题,原代码是连sql的。帮忙指点一下!

下面这段代码本来是连sql的

这两天转到连access怎么改呢? 我的access这个数据库的文件存在c盘根目录下面 ssq.mdb

Private Sub Command2_Click()
  Dim ZhwgCon As New ADODB.Connection
  Dim ZhwgRS As New ADODB.Recordset

  ZhwgCon.ConnectionString = "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=ssq;Data Source=(local)"

  ZhwgRS.CursorLocation = 3 '设置游标类型
   
  ZhwgCon.Open
   
  ZhwgRS.Open "update ssq set new=1 where new=0", ZhwgCon '选择打开的表,后面的 ,ZhwgCon 必须有
   
  ZhwgCon.Close
  Form1.Caption = "动态过滤系统 数据库复原已完成!"
End Sub

作者: zhwg1224   发布时间: 2011-06-15

传说有一个叫adodb的控件,找到它。然后按向导联接,就生成你需要的字串了,copy就行。很容易做到吧!!

作者: cqq_chen   发布时间: 2011-06-15