问题描述
PublicSubMain()OnErrorGoToerr_main....exit_main:IfNotconnIsNothingThenIfconn.State=adStateOpenThenconn.CloseEndIfSetconn=NothingEndIfExitSuberr_main:handleErr"Main",Err.DescResumeexit_mainEndSub'***********************************************************************PrivateSubhandleErr(in_stepnameAsString,in_err_descAsString)OnErrorGoToerr_errOpencs_logfileForAppendAs#1Print#1,Now(),in_stepname,in_err_descexit_err:CloseExitSuberr_err:'************************************************************'Nothingyoucando'************************************************************Resumeexit_errEndSub'handleErr"Main",Err.Desc'这个地方报错“实时错误438，对象不支持该属性或方法”，大家帮忙看下哪里出错了，该怎么改？先谢了！！！
解决方案
解决方案二：
OnErrorGoto这样的语法都淘汰啦，用Try...Catch吧。
解决方案三：
实时错误438，对象不支持该属性或方法是指该对象没有这个属性或方法
解决方案四：
Desc是Err的成员吗？你打开err.之后列出的成员列表里看是否有替换的方法或属性。如message等。
解决方案五：
我再说清楚些，代码我直接从远程服务器上取下来到本地运行的，服务器上没有错。挪到本地后就有这样的错误，我觉得应该不是代码的问题，直接运行服务器上生成的EXE文件在本地还是会报相同的错误，是不是VB哪里需要配置环境变量啊？
解决方案六：
Desc是Err的成员，这个可以肯定！
解决方案七：
引用5楼duanzhihui858的回复:
Desc是Err的成员，这个可以肯定！
不是Err.Description？你用的是什么版本？
解决方案八：
VB6.0
解决方案九：
我觉得代码是不会有错的，要不在服务器上也跑不起来啊！VB6.0直接导入工程的话，需要在哪里做配置么？比如一个文件夹下有三个VBP文件以及.ini、.cls、.vbw、.bas……我直接打开.vbp运行就可以么？还是需要在哪里进行些设置？问题很急，俺又不是搞VB的，还请高们指点！
解决方案十：
早点放弃VB6早点收益
解决方案十一：
直接点击vbp文件打开方案，按F5运行就可以了
解决方案十二：
我就是直接打开然后运行的，结果就报错：实时错误438，对象不支持该属性或方法在服务器上跑没问题的，不知道问题到底处在那了!!
解决方案十三：
引用7楼duanzhihui858的回复:
VB6.0
那也是要用err.Description
解决方案十四：
vb6.0也需要相应的运行库来支持。Err本身应该是没问题的。应该是你的运行库的问题。
解决方案十五：
那运行库如何设置呢？
解决方案：
Err对象(VisualBasic)程序集：VisualBasic运行库（在Microsoft.VisualBasic.dll中）如果有问题，应该出在Microsoft.VisualBasic.dll。
解决方案：
这个文件在哪个目录下呢？怎么把这个文件加进去，是工程-》引用，然后选中么？还是……
解决方案：
Unabletogetsessionhandle？？调试运行之后日志里边有这个，啥意思啊？
解决方案：
Unabletogetsessionhandle？？调试运行之后日志里边有这个，啥意思啊？