万分火急, 还请各位大侠赐救,请给出示范代码,不胜感激!!!

解决方案 »

  1.   

    http://msdn.microsoft.com/vstudio/express/vb/learning/
      

  2.   

    引用microsoft activeX data objiects 2.5 library
    Public Sub ConnectionStringX()
    Private m_Qcn As ADODB.Connection
        m_Qcn.CommandTimeout = 45
        m_Qcn.Provider = "sqloledb"
        m_Qcn.Properties("Data Source").Value = 服务器名称
        m_Qcn.Properties("Initial Catalog").Value = 数据库名称
        m_Qcn.Properties("Persist Security Info").Value = False
        m_Qcn.Properties("User ID").Value = 数据库登陆名'"sa"
        m_Qcn.Properties("Password").Value = 数据库登陆密码' SysPassword
        
        m_Qcn.CursorLocation = adUseServer
        m_Qcn.Open
    End Sub
      

  3.   

    最简单的 莫过于用
    ADODC + DATAGRID 控件了
      

  4.   

    最简单的 莫过于用
    ADODC + DATAGRID 控件了
    ___________________________________________________________________________________________________________________________________________________________________________________--但是_____________
      

  5.   

    Dim Conn As New ADODB.Connection
    strcon = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Password=sa;Initial Catalog=supplychain;Data Source=192.168.10.250"
    conn.CursorLocation = adUseClient
    conn.Open strcon
    我的简单哦,引用miscroft activex data objects 2.0
      

  6.   

    Dim Conn As New ADODB.Connection
    strcon = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Password=sa;Initial Catalog=supplychain;Data Source=192.168.10.250"
    conn.CursorLocation = adUseClient
    conn.Open strcon
    我的简单哦,引用miscroft activex data objects 2.0
    同意
    楼主不厚道