cnn.ConnectionString = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;PWD=duanchen;Initial Catalog=评教系统;Data Source=SIXDAYBOY"
其中SQL Server数据库的名字是SIXDAYBOY,账号是sa,密码是duanchen,这个都没有问题,连接也正常
我现在想把自己的程序放到别人的机器上面去使用,所以必须要改连接字符串,所以我就想用一个窗体让用户自己输入用户名,密码,计算机名,就采用了下面的办法
Public Sub firstload(ByVal text1 As String, ByVal text2 As String, ByVal text3 As String)
cnn.ConnectionString = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=text1;PWD=text2;Initial Catalog=评教系统;Data Source=text3"
cnn.Open
If Err.Number = 0 Then
Unload Login
Load MDIMain
Else
Unload Login
End If
End Sub
用一个窗体接受三个参数,然后传给这个过程,可是当我输入3个参数以后却一直说出错,不是密码错误,就是数据库连接不上,我换用上面的方法直接在连接字符串中输入却没有问题,大家帮我看看有什么问题好吗,我可不想软件给别人还要过去帮他设置这些东西阿,谢谢大家了
其中SQL Server数据库的名字是SIXDAYBOY,账号是sa,密码是duanchen,这个都没有问题,连接也正常
我现在想把自己的程序放到别人的机器上面去使用,所以必须要改连接字符串,所以我就想用一个窗体让用户自己输入用户名,密码,计算机名,就采用了下面的办法
Public Sub firstload(ByVal text1 As String, ByVal text2 As String, ByVal text3 As String)
cnn.ConnectionString = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=text1;PWD=text2;Initial Catalog=评教系统;Data Source=text3"
cnn.Open
If Err.Number = 0 Then
Unload Login
Load MDIMain
Else
Unload Login
End If
End Sub
用一个窗体接受三个参数,然后传给这个过程,可是当我输入3个参数以后却一直说出错,不是密码错误,就是数据库连接不上,我换用上面的方法直接在连接字符串中输入却没有问题,大家帮我看看有什么问题好吗,我可不想软件给别人还要过去帮他设置这些东西阿,谢谢大家了
这样程序会认为是UserID="text1" PWD="text2"所以
cnn.ConnectionString = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=" & text1 & ";PWD=" & text2 & ";Initial Catalog=评教系统;Data Source=" & text3