我做的一個軟體,能多開,經常出現意外錯誤,直接掛掉。我用ModSEH模塊截獲到一些資訊,請幫我分析分析大概是什么原因引起的,原始碼不方便公開。
錯誤1
軟體編號:6
系統版本:Windows7 64位 [v6.1]
錯誤內容:未知意外錯誤:-529697949
例外地址:&H74BDC41F
引數0:429065504
引數1:1637359
regEIP:&H74BDC41F
錯誤2
軟體編號:2
系統版本:Windows7 64位 [v6.1]
錯誤內容:未知意外錯誤:-2147467259
例外地址:&H75E2C41F
引數0:2
引數1:0
regEIP:&H75E2C41F
uj5u.com熱心網友回復:
一般都是Windows7 Windows8 出現,XP很少見到uj5u.com熱心網友回復:
無法打開檔案uj5u.com熱心網友回復:
無法打開什么檔案?網路上服務器網頁?能不能說詳細點
uj5u.com熱心網友回復:
頂。。。。。。。uj5u.com熱心網友回復:
如何避免出現這種錯誤uj5u.com熱心網友回復:
Public Function FileExists(filename) As Boolean
Dim msg As String
On Error GoTo CheckError
FileExists = (Dir(filename) <> "")
Exit Function
CheckError:
Const mnErrDiskNotReady = 71, mnErrDeviceUnavailable = 68
If (Err.Number = mnErrDiskNotReady) Then
msg = "將軟盤插入驅動器 "
msg = msg & ",然后關好驅動器門。"
If MsgBox(msg, vbExclamation & vbOKCancel, "XAJH.COM") = vbOK Then
Resume
Else
Resume Next
End If
ElseIf Err.Number = mnErrDeviceUnavailable Then
msg = "找不到: "
msg = msg & filename
MsgBox msg, vbExclamation, "XAJH.COM"
Resume Next
Else
msg = "出現 #" & str(Err.Number)
msg = msg & " 意外錯誤: " & Err.Description
MsgBox msg, vbCritical, "XAJH.COM"
Stop
End If
Resume
End Function
uj5u.com熱心網友回復:
如果是打開本地檔案出錯,不可能出現這兩個錯誤號吧,都查不到相關資訊uj5u.com熱心網友回復:
這論壇基本上解決不了難題了uj5u.com熱心網友回復:
既然是你自己寫的軟體, 直接拿原始碼在目標電腦上除錯運行一下吧. 有些問題埋得比較深, 光看錯誤代碼難以判斷.轉載請註明出處,本文鏈接:https://www.uj5u.com/gongcheng/136376.html
標籤:API
上一篇:vb高手請進!
下一篇:vb6 參考BarTender(已安裝破解)實時錯誤429 ActiveX部件不能創建物件,之前可以用,現在不行了。
