扫二维码与项目经理沟通
我们在微信上24小时期待你的声音
解答本文疑问/技术咨询/运营咨询/技术建议/互联网交流
Config文件里是否正确填写了uid="";pwd="";还有是否改动过数据库的名称
为辽阳县等地区用户提供了全套网页设计制作服务,及辽阳县网站建设行业解决方案。主营业务为网站设计、成都网站建设、辽阳县网站设计,以传统方式定制建设网站,并提供域名空间备案等一条龙服务,秉承以专业、用心的态度为用户提供真诚的服务。我们深信只要达到每一位用户的要求,就会得到认可,从而选择与我们长期合作。这样,我们也可以走得更远!
cnum 没有声明dim的声明一下,
你必须明白,如果你用 vb.net 做开发就别再用 ado 而改用ado.net
用oledb.oldbconnection代替 adodb.connection
如果你坚持在 .net 中用ado,请添加引用,引用 com 中的 ado
setfocus 不是.net 用法 改成 focus
unload改成 close
或者你可以用vb.net 的自带工具,升级vb6的代码。
1.先用WINDOWS方式登录进去~
2.安全性--》登录名--》sa---右键属性--》把密码改成sa,把强制密码策略前的√去掉~先别点确定~点左边的“状态”将登录
改为启用,确定。
3.在对象资源管理器里面的最根部的目录(就是.\SQLEXPRESS(.....)那)右键属性,安全性--》服务器身份验证选择SQL
Sever和WINDOWS身份验证模式。确定~
4.在开始程序中选择SQL
2005-配置工具-》外围用用配置器,点开下面的服务和连接的外围应用配置器,选择左边的
远程连接,选择本地连接和远程连接
以及同时使用两项。确定,OK啦!
5.如果还不行,重启下电脑~
6.连接字符串这样写static
string
connString
=
"Data
Source=.\\SQLEXPRESS;Initial
Catalog=meifa;user
ID=sa;Pwd=sa";
注意两个反斜杠哦!
终于写完了好累啊
昨天我就是这样连接上的,希望对你有用~~~~
你每次取出的是表中的首条记录,当然只能用首条记录登陆了!
Dim name, password As String
name = TextBox1.Text
Dim com As New OleDb.OleDbCommand("select * from denglu where name='" name "'", conn)
Dim dr As OleDb.OleDbDataReader
conn.Open()
dr = com.ExecuteReader
dr.Read()
password = dr.GetString(1)
If TextBox3.Text = password Then
mesbox("成功!")
Else
msgbox("失败")
End If
dr.Close()
conn.Close()
这种情况下,效率极不好!你能理解什么意思就行了!否则将你的程序改完了!
我们在微信上24小时期待你的声音
解答本文疑问/技术咨询/运营咨询/技术建议/互联网交流