Foxtable(狐表)用户栏目专家坐堂 → [原创]外部服务器检测插件


  共有3702人关注过本帖树形打印复制链接

主题:[原创]外部服务器检测插件

帅哥哟,离线,有人找我吗?
baicaocao
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:494 积分:4860 威望:0 精华:0 注册:2012/4/20 8:42:00
[原创]外部服务器检测插件  发帖心情 Post By: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编辑过]

 回到顶部