谢谢各位了,我是大菜鸟,以前没用过数据库。

解决方案 »

  1.   

    可以访问www.vbgood.com
    www.dapha.net
    www.21code.com
    www.vbeden.com
    www.applevb.com
    msdn.microsoft.com
    http://www.codestudy.net
    http://www.vbaccelerator.com/
    http://www.mvps.org/vbnet/
    http://www.freevbcode.com/
    http://www.pscode.com/vb/
    http://www.allapi.net
    http://home.jlu.edu.cn/~celeron/vb/key.htm
    和MSDN得到更多的帮助.............
      

  2.   

    连接access:工程--->引用--->Microsoft ActiveX Data Object 2.x(版本号)    Dim CN   As New ADODB.Connection                '定义数据库的连接
        Dim Rs   As New ADODB.Recordset    CN.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\NWIND.MDB;Persist Security Info=False"
        CN.Open    Rs.CursorLocation = adUseClient
        Rs.Open "select * from employees", CN, adOpenDynamic, adLockBatchOptimistic
    连接SQL SERVER工程--->引用--->Microsoft ActiveX Data Object 2.x(版本号)    Dim CN   As New ADODB.Connection                '定义数据库的连接
        Dim Rs   As New ADODB.Recordset
        CN.ConnectionString = "Provider=sqloledb;Data Source=pmserver;Initial Catalog=northwind;User Id=sa;Password=sa;"
        CN.Open'
        CN.ConnectionString = "Provider=sqloledb;Data Source=服务器名;Initial Catalog=数据库;User Id=用户名;Password=密码;"
      

  3.   

    我做了个<设备管理系统>,我想都是大同小异的,要(源码)的话,我发给你!
    留下你的email (在CSDN里发短信告诉我)