[已解决]各位老大,想请教你们一个 VB登陆远程用户名和密码验证问题!急!!
老大们我的思路是这样的:现在服务器运行有access数据库是以*.MDB形式存在于服务器某个文件夹下面我用VB做了一个的用户名和密码登陆界面 想实现远程验证就是读取服务器上面数据库里的用户名和密码进行效验,成功后
弹出另一个操作窗口并关闭本窗口,就是有点像QQ那种!希望各位老大指教指教啊!小弟初学还有太多不懂!
[此贴子已经被作者于2007-4-18 9:22:58编辑过]
哦,呵呵菜鳥不知道怎麽用,呵呵
Private Sub Command1_Click()
'测试连接Access数据库的按钮Click事件。
Dim curRes As NETRESOURCE
curRes.dwType = RESOURCETYPE_ANY
curRes.lpLocalName = vbNullString
curRes.lpRemoteName = "\\192.168.0.168"
curRes.lpProvider = vbNullString
'建立网络连接。
If WNetAddConnection2(curRes, "brookfax_zhenghaomai", "administrator", 0) <> 0 Then
MsgBox "网络连接失败,请检查网络设置是否正确!"
Exit Sub
End If
Dim cn As New ADODB.Connection
cn.CursorLocation = adUseClient
cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=\\192.168.0.168\d$\BrookFax\db\brookfax.mdb;Persist Security Info=False"
MsgBox cn.ConnectionString
cn.Close
End Sub
老大們幫我檢查一下看哪裏有錯誤 提示用戶定義類型未定義