有关VB相对路径的问题 
           Open App.Path + "\conn.dat" For Input As #1
            为什么出错?
还有我在做一个vb  和SQL sever 2000的数据库,请问怎样安排及怎样连接,如果在同一台机子上?

解决方案 »

  1.   

    用Open App.Path & "\conn.dat" For Input as #1试试看
      

  2.   

    DIM WorkPath as string 
    workpath=app.pathif right$(workpath,1)<>"\" then workpath=workpath & "\"
    Open workpath & "conn.dat" For Input As #1
                
      

  3.   

    VB中添加引用 Project-Reference 选中引用 Microsoft ActiveX Data Objects 2.X LibraryDim adoConn  As New ADODB.Connection
    Dim Rs       As New ADODB.Recordset
    dim StrConn  as String
    dim strSQL   as StringstrConn="Provider=SQLOLEDB.1;Data Source=服务器名称;Initial Catalog=数据库名称;User ID=用户名;password=用户口令"
    adoCnn.Open strConn '打开数据库
      

  4.   

    連接sql 
    Option ExplicitPublic rs As New ADODB.Recordset
    Public conn As New ADODB.ConnectionPrivate Sub Form_Load()
     Dim strconn As String
     strconn = "Provider=SQLOLEDB.1;Password=admini;Persist Security Info=True;User ID=admini;Initial Catalog=Test;Data Source=192.168.11.120"
     conn.CursorLocation = adUseClient
     conn.Open strconn
     If rs.State = 1 Then rs.Close
     rs.Open "select * from Test", conn, 3, 3
     
     Set Me.DataGrid1.DataSource = rs
     
     
    End Sub
    本機上如果沒有密碼,就把Password=admini去掉
    User ID=admini換撐 sa
    Data Source=192.168.11.120 換撐127.0.0.1你出錯,你就按阿九姐姐得說法去看看
      

  5.   

    连接SQL数据库,只需要关心连接字符串,而不必理会数据库的存放目录
    身份验证模式为:"sql server和windows"
    Provider=SQLOLEDB.1;Persist Security Info=True;User ID=用户名;Password=密码;Initial Catalog=数据库名;Data Source=SQL服务器名身份验证模式为:"仅windows"
    Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=数据库名;Data Source=SQL服务器名