不明白,为什么连不上,连接字符那些弄对了的嘛。。大家瞧瞧咯。 Dim strconnt As String
strconnt = ""
Set connt = New ADODB.Connection
Dim sevip, Db, user, pwd As String
sevip = "211.144.92.81"
Db = "a0426131852"
user = "a0426131852"
pwd = "112221"
strconnt = "DRIVER={MySql ODBC 5.0.81 Driver};SERVER=" & sevip & ";Database=" & Db & ";Uid=" & user & ";Pwd=" & pwd & ";Stmt=set names GBK" '
connt.ConnectionString = strconnt
connt.Open
ssql = "select * from cdb_members "
connt.Execute ssqlconnt.Close
Set connt = Nothing
strconnt = ""
Set connt = New ADODB.Connection
Dim sevip, Db, user, pwd As String
sevip = "211.144.92.81"
Db = "a0426131852"
user = "a0426131852"
pwd = "112221"
strconnt = "DRIVER={MySql ODBC 5.0.81 Driver};SERVER=" & sevip & ";Database=" & Db & ";Uid=" & user & ";Pwd=" & pwd & ";Stmt=set names GBK" '
connt.ConnectionString = strconnt
connt.Open
ssql = "select * from cdb_members "
connt.Execute ssqlconnt.Close
Set connt = Nothing
解决方案 »
- fpspread控件的问题:怎么进行全选啊?
- WM_LBUTTONDOWN WM_LBUTTONUP对应的值是多少
- windowns 自带的日期时间输入控件在哪里,叫什么名字呀?
- 急,,求助,,当有其他程序发消息过来时,自己程序的最小化图标如何闪动????
- 选择arial字体,结果汉字无法正常显示
- 行集合不能作为标签
- 用VB如何读取电脑硬件的各个参数!
- 在应用 DAO 访问数据库时 在查询时 用 LIKE ‘xxx%' 怎么不行呀?
- songyangk(小草)、Chice_wxg(Chice)高分请求帮忙!!
- 有谁知道mmtools控件的解密版小弟要的很急,请帮帮我,一定给分,谢谢!
- 关于TIMER的使用
- 送分100分:如何根据权限,动态的加载图标
不是,。,connt.Open
到这里就不行了,肯定是前面那里的错。