求助！！VFP+SQL2005做网络软件，已经实现局域网共享SQL数据查询，修改和删除，怎么实现外网共享，求连接源代码。。。 - VFP论坛

编程论坛 → 数据库技术 → 『 VFP论坛』 → 求助！！VFP+SQL2005做网络软件，已经实现局域网共享SQL数据查询，修改和删除，怎么实现外网共享，求连接源代码。。。

标题：求助！！VFP+SQL2005做网络软件，已经实现局域网共享SQL数据查询，修改和删 ...

只看楼主

kiff

来　自：广州
等　级：贵宾
威　望：46
帖　子：756
专家分：2531
注　册：2013-1-30

第 21 楼

得分:0

以下是引用pzyun1985在2013-4-16 00:45:11的发言：

我还不想结帖，因为还有很多问题没解决，如果VFP登录SQL服务器失败怎么设置成自己的提示，不想出现那个SQL SERVICE连接错误提示框，就是怎么先判断服务器关闭或网络连接失败，而不是连接失败后才提示错误，这有可能让别人知道我的数据库信息和我的主机，很不安全啊

如果其它问题与本主题不相关的，最好另外发主题贴，以方便后人分类查询。

2013-04-16 11:39

qingfameng

等　级：贵宾
威　望：35
帖　子：964
专家分：3019
注　册：2010-2-6

第 22 楼

得分:0

kiff 版主的说法正确，20楼方法也是可行的，通用连接方式用于CS架构，远程终端直接访问数据库。
另外,也可以调用 ADO 连接类测试，不会暴露有关信息。做中间层时常用。代码供参考。(红字部分更改)。

  local nod as exception
  local oconn as adodb.connection
  store 1 to nj
  cex1='provider=sqloledb.1;data source=地址ip;initial catalog=数据库名;'
  cex2='user id=用户名; password=密码;integrated security=sspi'
  cconnstring=cex1+cex2

  try
    oConn=createobject('ADOBD.connection')
    oConn.open(cconnstring)
  catch to nod
    nj=0
  endtry

  if nj=0
     messagebox('网络连接受阻',64,"",1000)
     return
  endif

    && 连接正常,继续程序

2013-04-16 11:53

pzyun1985

等　级：论坛游民
帖　子：106
专家分：18
注　册：2013-4-13

第 23 楼

得分:0

好的，谢谢版主和QING

2013-04-16 12:38

参与讨论请移步原网站贴子：https://bbs.bccn.net/thread-404098-1-1.html