- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- 数据库接口设置 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=117759)
-- 发布时间：2018/4/18 18:03:00
-- 数据库接口设置
各位大卡，请问下怎么实现下列功能？
-- 发布时间：2018/4/18 18:04:00
--
此主题相关图片如下：qq图片20180418180219.png
-- 发布时间：2018/4/18 18:04:00
--
请各位老师，帮我写下代码？？？？？
-- 发布时间：2018/4/18 18:31:00
--
合成连接字符串，参考
http://www.foxtable.com/webhelp/scr/1810.htm
http://www.foxtable.com/webhelp/scr/2310.htm
http://www.foxtable.com/webhelp/scr/1944.htm
-- 发布时间：2018/5/16 21:56:00
--
此主题相关图片如下：223344.png
老师可以帮我写下代码不，我看了教材，不知道怎么写
-- 发布时间：2018/5/16 22:33:00
--
Dim ip As String = "voyo"
Dim u As String = "sa"
Dim p As String = "hailun."
Dim d As String = "test"
Dim s As String = "Provider=SQLOLEDB.1;Password=" & p & ";Persist Security Info=True;User ID=" & u & ";Initial Catalog=" & d & ";Data Source=" & ip
If Connections.TryConnect(s) = False Then
MessageBox.Show("数据源无法连通!")
Else
msgbox("正常")
End If