If Not FileExists(@systemdir&'\Captchio.dll') Then
FileInstall("Captchio.dll", @SystemDir)
Run("regsvr32.exe /s Captchio.dll")
EndIf
$o_ocr = ObjCreate("Captchio.cCaptcha")
if not IsObj($o_ocr) then MsgBox(4096,"error","估计该dll没有成功注册,请手工注册:regsvr32.exe Captchio.dll")
If $o_ocr.OpenCharDB(@ScriptDir&"\BX.cdb") Then
$chkcode = $o_ocr.GetStringFromFile(@ScriptDir&"\BX.bmp",True) ; EndIf
If Not FileExists(@systemdir&'\Captchio.dll') Then
FileInstall("Captchio.dll", @SystemDir)
Run("regsvr32.exe /s Captchio.dll")
EndIf
$o_ocr = ObjCreate( ...