请问哪位大哥有 ”Visual Basic + SQL Server 数据库应用系统开发与实例“的电子版,拜托上传给我,非常感谢!!!
或者发到
再次感谢!!!

解决方案 »

  1.   

    你要的書俺沒有
    《Visual Basic数据库实例导航》此書的匯合范例代碼倒是有,也是VB+SQL的
      

  2.   

    Dim server As String, uid As String, pwd As String, dk As String, sql_con As String
    server = "202.195.*.*"
    uid = "*"
    pwd = "*"
    dk = "1433"
    sql_con = "DRIVER=SQL Server;SERVER=" & server & ";UID=" & uid & ";PWD=" & pwd & ";WSID=CET46;Network=DBMSSOCN;Address=" & server & "," & dk
    Set conn = New ADODB.Connection
    conn.Open (sql_con)
    Dim sql As String
    Set RecordSource = New ADODB.Recordset
    sql = "select top  2000  * from  xxdm  "RecordSource.Open sql, conn, adOpenKeyset, adLockBatchOptimisticSet msgrid1.Recordset = RecordSource