SQL 查找问题【已解决】-已解决问题区-AUTOIT CN

cfs43210 发表于 2012-2-29 20:02:39

SQL 查找问题【已解决】

本帖最后由 cfs43210 于 2012-3-19 19:28 编辑

$RS.Open("Select * from spt_faxtcj_db where Name4='" & $GetText & "'")
这代码，怎么查到数据就接下代码，没查怎么数据怎么程序退出了。请问如何判断，谢谢！！！

cfs43210 发表于 2012-2-29 20:39:12

没人采场自已顶下！

chenronting 发表于 2012-2-29 20:50:54

论坛里这样的例子可不少，先搜索一下！

cfs43210 发表于 2012-2-29 21:39:46

没找到，能给个链接？

kk_lee69 发表于 2012-2-29 21:50:06

http://www.autoitx.com/thread-30083-1-1.html

itljl 发表于 2012-2-29 22:15:22

if @error 能行吗？

kk_lee69 发表于 2012-2-29 23:29:21

你說的是查不到數據程式就會發生錯誤吧!!!那個是 COM 的錯誤設個計個容錯的就可以了....

新增 MyErrFunc.AU3內容如下

; Script Start - Add your code below here
#include-once

Global $oMyError = ObjEvent("AutoIt.Error", "MyErrFunc")

Func MyErrFunc()
Local $errstr="COM 錯誤訊息 !!!"& @CRLF& @CRLF & _
"錯誤描述:" & @TAB & $oMyError.description & @CRLF & _
"WIN 錯誤描述:" & @TAB & $oMyError.windescription & @CRLF & _
"錯誤代碼:" & @TAB & hex($oMyError.number,8)& @CRLF & _
"上次 DLL 錯誤:" & @TAB & $oMyError.lastdllerror & @CRLF & _
"錯誤腳本行:" & @TAB & $oMyError.scriptline & @CRLF & _
"錯誤來源:" & @TAB & $oMyError.source       & @CRLF & _
"錯誤幫助檔:" & @TAB & $oMyError.helpfile    & @CRLF & _
"錯誤幫助功能表:" & @TAB & $oMyError.helpcontext & @CRLF

FileWrite(@ScriptDir&"\ErrorLog.log",@YEAR&@MON&@MDAY&" "&@HOUR&":"&@MIN&":"&@SEC&" ..... "&$errstr&@CRLF&@CRLF&@CRLF)
Msgbox(0,"AutoIt COM 錯誤",$errstr,30)

Local $err = $oMyError.number
If $err = 0 Then $err = -1

$g_eventerror = $err; to check for after this function returns
Endfunc

然後在你的程式裡面 #include 進來就可以了

kodin 发表于 2012-3-1 04:03:03

{:face (197):}用楼上的方法，不过我个人喜欢设置个空的，这样啥都不会返回，当然也不便于查错。

auto 发表于 2012-3-1 13:56:19

正常运行语句没有结果集是不会产生异常，导致程序退出，还是检查一下执行的语句，看看哪里错了

页: [1]

AUTOIT CN's Archiver

SQL 查找问题【已解决】