以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [原创]外部服务器检测插件  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=40564)

--  作者:baicaocao
--  发布时间:2013/9/23 15:28:00
--  [原创]外部服务器检测插件

狐表的BeforeConnectOuterDataSource事件,不能加载窗口,如果不是以开发者登录的话,就会不能修改数据源,因此,做了这么一个插件。

一共有两个文件:

一个是config.ini,这里面是数据源连接字符串。里面顺序不要动。第二个文件会修改这个文件的配置。

第二个是:creatdatabase.exe文件。

本文件执行的时候,读取config.ini配置文件,如果测试通过,则自动关闭本文件,继续执行狐表程序,如果测试不通过,则弹出信息。里面的关闭系统按钮,只关闭本文件。

在狐表的BeforeConnectOuterDataSource事件设置代码为:

Dim checkbs As String = ProjectPath & "creatdatabase.exe"
Dim proc As new  Process
proc.File = checkbs
Proc.Start
proc.WaitForExit()

If e.Name = "数据源" Then
    Dim fl As String = FileSys.ReadAllText(“config.ini文件名,请注意替换.”).Replace(":","")
    e.ConnectionString = fl
End If

这样就可以不用弹出数据源错误对话框,直接在窗口进行修改了。。

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:外部数据库检查.zip

\'更新了一下。多出一个功能,可以进行数据库创建。具体请设置config配置文件为链接不上的字符串,然后才能进行数据库创建。

数据库创建之后,本文件会自动改写config.ini配置文件的数据库名称为新建的数据库。

以下是更新的文件。

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:外部数据库创建及连接.zip

[此贴子已经被作者于2013-9-23 16:28:41编辑过]

--  作者:Bin
--  发布时间:2013/9/23 15:30:00
--  
顶一下,谢谢分享.
--  作者:lsy
--  发布时间:2013/9/23 15:46:00
--  
好人好事,顶。
--  作者:狐狸爸爸
--  发布时间:2013/9/23 15:54:00
--  

谢分享

图片点击可在新窗口打开查看


--  作者:wangmin2659
--  发布时间:2018/3/9 0:35:00
--  
这样岂不是数据库密码都暴露了?
--  作者:L88919138
--  发布时间:2018/3/9 7:45:00
--  
图片点击可在新窗口打开查看