有关VB相对路径的问题
Open App.Path + "\conn.dat" For Input As #1
为什么出错?
还有我在做一个vb 和SQL sever 2000的数据库,请问怎样安排及怎样连接,如果在同一台机子上?
Open App.Path + "\conn.dat" For Input As #1
为什么出错?
还有我在做一个vb 和SQL sever 2000的数据库,请问怎样安排及怎样连接,如果在同一台机子上?
workpath=app.pathif right$(workpath,1)<>"\" then workpath=workpath & "\"
Open workpath & "conn.dat" For Input As #1
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 '打开数据库
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你出錯,你就按阿九姐姐得說法去看看
身份验证模式为:"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服务器名