VIP会员
购物车
私信
发表新帖
立即签到
关注
回复
支持(
反对( 首页上一页 1 下一页尾页 2 条记录 1/1页
请帮帮忙
发表在VB答疑区
2009-11-12
是否精华
是
否
版块置顶:
是
否
Adodc1.RecordSource = "select * from tbS_power"
[font color=#00FF00]Adodc1.Refresh[/font]
End Sub
Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, y As Single)
Label3.ForeColor = &H80000012
Label4.ForeColor = &H80000012
End Sub
Private Sub Label1_Click()
Adodc1.RecordSource = "select * from tbS_power"
[font color=#00FF00]Adodc1.Refresh [/font]
老是出错的地方就是两句 Adodc1.Refresh
我把这两句删了之后 在模块里面的 共享数据库部分的这句
[font color=#FF0000]cnn.Open "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=db_SSS"[/font]老是出错
请知道的帮帮忙啊！！！
我数据库名为“db_SSS”
[font color=#00FF00]Adodc1.Refresh[/font]
End Sub
Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, y As Single)
Label3.ForeColor = &H80000012
Label4.ForeColor = &H80000012
End Sub
Private Sub Label1_Click()
Adodc1.RecordSource = "select * from tbS_power"
[font color=#00FF00]Adodc1.Refresh [/font]
老是出错的地方就是两句 Adodc1.Refresh
我把这两句删了之后 在模块里面的 共享数据库部分的这句
[font color=#FF0000]cnn.Open "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=db_SSS"[/font]老是出错
请知道的帮帮忙啊！！！
我数据库名为“db_SSS”
分享到：
