'控件并非在同一个窗体.调用的时候显示<数据库访问错误>.

usepas() = Split(strin, ",")
Form2.ado1.RecordSource = "select * from zhuce where userz= " & """" & usepas(1) & """"
Form2.ado1.Refresh
Form2.Data1.Refresh
// 'form2.data1.row =0 '如果加上这个话,显示错误 :6148 行号无效..
//'form2.data1.col=1
If Form2.Data1.Text = "" Then ' 实时错误:6160 <数据库访问错误>
socksev(intmax).SendData "r_erru"
DoEvents
Else
Form2.Data1.Col = 4
If usepas(2) = Form2.Data1.Text Then
userxinxi(0).userz = usepas(1)
userxinxi(0).sevport = socksev(intmax).LocalPort
userxinxi(0).userzip = socksev(intmax).RemoteHostIP

Else
socksev(intmax).SendData "r_errp"
DoEvents

End If
End If

这个问题怎么解决???

[此贴子已经被作者于2006-10-9 18:50:05编辑过]

现在只能+个on error goto usererrhand: 了...
半路上还要来个exit sub
预防它自动执行下去,,,

呵呵　　可能是吧．．．

那怎么用呢，还是一样的错误

知道是什么错误了 但是不敢确定

谁知道在DATAGRID连接数据源以后辨别其中列表的数目的???

其实我的指定是错误的...

OK 已经解决 ...其实行啊 列什么的都一样....

用了个检查行数的函数就OK 了
DATAGRID的函数中ApproxCount属性 .....为行的数量 如果行数为0的话就直接判断无此数据就行了...
(我用的是调用别的窗体的表格....)