VB的ADO连接SQL数据库显示超时，为什么啊？
PrivateSubCommand1_Click()OnErrorResumeNext'错误陷阱Adodc1.RecordSource="select*fromTable...
Private Sub Command1_Click()
On Error Resume Next '错误陷阱
Adodc1.RecordSource = "select * from Table1 Where time like '" + Text1.Text + " 08:00:00'"
Set DataGrid1.DataSource = Adodc1
Adodc1.Refresh
For i = 1 To 8
s1 = Adodc1.Recordset.Fields("channel")
s4 = Adodc1.Recordset.Fields("pd")
dd1(CInt(s1)) = s4
Adodc1.Recordset.MoveNext
Next
End Sub 展开
On Error Resume Next '错误陷阱
Adodc1.RecordSource = "select * from Table1 Where time like '" + Text1.Text + " 08:00:00'"
Set DataGrid1.DataSource = Adodc1
Adodc1.Refresh
For i = 1 To 8
s1 = Adodc1.Recordset.Fields("channel")
s4 = Adodc1.Recordset.Fields("pd")
dd1(CInt(s1)) = s4
Adodc1.Recordset.MoveNext
Next
End Sub 展开
展开全部
连接错误基本上就是你设置连接语句的问题了~ 服务器地址错误 账号密码错误等问题
如果确定连接没问题, 但是现实超时的话, 就是你的查询语句问题, 结果出不来啊, 检测的办法是将你的语句放到SQL数据库中运行一下看看, 或者写存储过程 将语句Print 输出看看~
如果确定连接没问题, 但是现实超时的话, 就是你的查询语句问题, 结果出不来啊, 检测的办法是将你的语句放到SQL数据库中运行一下看看, 或者写存储过程 将语句Print 输出看看~
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
大雅新科技有限公司
2024-11-19 广告
这方面更多更全面的信息其实可以找下大雅新。深圳市大雅新科技有限公司从事KVM延长器,DVI延长器,USB延长器,键盘鼠标延长器,双绞线视频传输器,VGA视频双绞线传输器，VGA延长器,VGA视频延长器,DVI KVM 切换器等，优质供应商，...
点击进入详情页
本回答由大雅新科技有限公司提供
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
