一个小问题`书上没看懂`来问问大家`

Question

怎么样连接数据库啊`
RS是什么意思`
呵`
菜了点

Answer 1

太笼统这个问题
一般定义rs指代recordset具体怎么连接数据库，踏实看书实践最好

Answer 2

1、加入部件ADO  就是叫 A。 D。。 O。。 2、创建个模块 在里面写：Public Conn As New Connection3、在form1里写这些：Private Sub Form_Load()
    Conn.CursorLocation = adUseClient
    Conn.Open "Provider=SQLOLEDB.1;Integrated Security=SSPI;Initial Catalog=book;Data Source=."'Catalog=“表名”
End Sub

Answer 3

给你一个增删改数据库表的例子
你试试这样做，引用ado 
    Dim Con As ADODB.Connection
    Dim rs As ADODB.Recordset
    Set Con = New ADODB.Connection
    strCon = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\计划管理系统.mdb;Persist Security Info=False"
    Con.Open strCon
    Set rs = New ADODB.Recordset
    '添加记录
    strsql="select * from table"
    rs.Open strsql, Con, adOpenKeyset, adLockOptimistic      
    rs.addnew
       rs!字段1=text1.text
       rs!字段2=text2.text
       ........
    rs.update
    rs.close
    set rs=nothing
    '修改记录
    strsql="select * from table where id=1"
    rs.Open strsql, Con, adOpenKeyset, adLockOptimistic      
       rs!字段1=text1.text
       rs!字段2=text2.text
       ........
    rs.update
    rs.close
    set rs=nothing
        
    '删除记录
    strsql="delete from table where id=1"
    rs.Open strsql, Con, adOpenKeyset, adLockOptimistic