怎样消除这个对话框？

guozilu

在robot执行SQLOpen语句，回放时总是弹出一个messbox显示我数据源的相关信息，怎样可以使robot不弹出这个窗口呢？

guozilu

我的代码和你的一样，现在是不弹出来了，但是那天真的是弹出来么ssagebox的，很是奇怪啊。


不过，还是谢谢ilovejolly了：）

ilovejolly

Sub main
Dim outputStr As String
Dim connection As Long
Dim prompt As Integer
prompt = 2
connection = SQLOpen("DSN=northwind;uid=sa;pwd=555555", outputStr, prompt:=2)
msgbox connection
End Sub
我执行上面代码的时候没有看到这个对话框，楼主能把代码帖出来看看？

guozilu

不好意思，我上面的帖子可能没有说清楚，我说不是驱动对话框，这个我知道可以通过参数来设置，我说的是messbox对话框,上面显示我的数据源的相关信息,我看好像没有地方设置他不出现的,不知道各位知不知道哪里可以设置它不出现呢?

ilovejolly

SQLOpen ( connectStr$ [ , outputStr$] [ , prompt%] )
prompt% 可选。Prompt指定何时驱动对话框出现。可选项：
1 对话框永远出现
2 说明不够充分以建立连接时打开驱动对话框
3 同2，对话框内容为灰色，不能修改
4 对话框不出现，连接不成功，则返回一个错误