您的位置：程序门 -> vb -> 数据库（包含打印，安装，报表)



请问如何具体捕捉远程连接sql 2000的错误。现在出问题了


[收藏此页] [打印本页]选择字色：背景色：字体：[大][中][小]


请问如何具体捕捉远程连接sql 2000的错误。现在出问题了
发表于：2007-03-13 11:22:52 楼主
on   error   resume   next
                strconnect   =   "persist   security   info=true "
                strconnect   =   strconnect   &   ";data   source= "   &   j.jiemi（strhost)
                strconnect   =   strconnect   &   ";user   id= "   &   j.jiemi（strdbuser)
                strconnect   =   strconnect   &   ";password= "   &   j.jiemi（strdbpass)
                strconnect   =   strconnect   &   ";initial   catalog=psyp "
                with   deyp.cnyp
                        if   .state   =   adstateopen   then   .close
                        .provider   =   "sqloledb.1;network=dbmssocn "
                        .connectionstring   =   strconnect
                        .connectiontimeout   =   30
                        .open
                end   with
                if   err   <>   0   then
                        frmunlink.show   vbmodal
                        err.clear
                        end
                else
                end   if
        on   error   goto   0
这是连接代码
是通过把主机ip.uid.pwd写在外部配置文件里面的.当网络断开或者以为其他原因无法连接服务器时.返回错误.请问该如何捕捉.
现在的判断方法是err <> 0则判断连接失败。弹出连接失败窗体出来。可是明明连接成功了还是弹出连接失败窗体出来呢。如果屏蔽掉frmunlink.show   vbmodal这句又能正常连接.
发表于：2007-03-13 11:26:421楼 得分:0
还有:如果.provider   =   "sqloledb.1;network=dbmssocn "
这里改为.provider   =   "sqloledb.1 "的话.就可以正常连接.err=0的
;network=dbmssocn的意思是默认用tcp/ip协议.1433端口连接数据库的.而不是什么命名管道
发表于：2007-03-14 15:26:462楼 得分:0
刚开始写程序时，不要用
on   error   resume   next
只有程序错误排除完后再用你才能知道为什么出错啊

相关文章
其他资讯

快速检索
分类导航标签a

最新资讯
热门点击