各位前輩，小弟將完成的程式編譯成.exe之後，在自己的電腦上執行時，產生"system error &H8007007E (-2147024770)"的錯誤，請問這是什麼意思呢？該如何解決呢？謝謝
- 2月 09 週一 200416:37
有關執行檔的問題(編號：32932)
- 1月 13 週二 200422:00
請高手指點迷津,這樣的程式到底錯在哪裡?(編號：32632)
我的程式大約如此,後來我做了計數器去檢查
可是每次程式大約跑了兩千多個流程
就自動跳開,查不出原因. 請高手指點一下
Private Sub Command1_Click()
On Error GoTo HANDEL
可是每次程式大約跑了兩千多個流程
就自動跳開,查不出原因. 請高手指點一下
Private Sub Command1_Click()
On Error GoTo HANDEL
- 11月 12 週三 200311:19
做FTP自動下載功能時,有時候會成功,但有時候會顯示執行上次要求(編號：32082)
程式每隔一段時間,需自動下載檔案及目錄,有時可以成功,但有時會出現類似"仍在執行上一次要求"的錯誤訊息,然後就無法下載ㄌ....? 請各位高手如何去處理此errorㄋ?
- 9月 08 週一 200320:24
do-while-loop的問題(編號：31094)
請問個位高手
如果我有十二個maskedbox欄位，兩個是一組的，所以共有六組
我要如何去用do-while-loop去做判斷
如果a欄位=0 b欄位=0 就error
如果a欄位＜ ＞0 b欄位=0 就把a欄位的值給b欄位 然後b欄位再去減a欄位
如果我有十二個maskedbox欄位，兩個是一組的，所以共有六組
我要如何去用do-while-loop去做判斷
如果a欄位=0 b欄位=0 就error
如果a欄位＜ ＞0 b欄位=0 就把a欄位的值給b欄位 然後b欄位再去減a欄位
- 8月 28 週四 200301:54
怎用DAO control取得fields的名稱?(編號：30923)
怎用DAO control取得fields的名稱?
我知道DAO control有個 Data1.Recordset.Fields.Count
不知怎用..我運行 msgbox (Data1.Recordset.Fields.Count)都會有Error#91的.
有人教我嗎?
我知道DAO control有個 Data1.Recordset.Fields.Count
不知怎用..我運行 msgbox (Data1.Recordset.Fields.Count)都會有Error#91的.
有人教我嗎?
- 7月 18 週五 200311:25
Array(編號：30295)
我寫了以下的程式﹐但是執行時出現compile error. Expected array。請問該如何寫arrar的code呢﹖
Private Sub cmdCreate_Click()
Dim name As String
Dim score As Integer
Open "c:\tempfile.txt" For Output As #1
Private Sub cmdCreate_Click()
Dim name As String
Dim score As Integer
Open "c:\tempfile.txt" For Output As #1
- 6月 23 週一 200310:11
程式換至另一台電腦上跑就出現Error??(編號：29843)
不知為什麼把檔案copy到別一台電腦上跑就會出現個
Method 'Update'of object '_Recordset' failed
的error
偵錯停在一行rs.Update
本來一開始程式執行時也不認得Trim(txt.txt)中的Trim,一直出錯
Method 'Update'of object '_Recordset' failed
的error
偵錯停在一行rs.Update
本來一開始程式執行時也不認得Trim(txt.txt)中的Trim,一直出錯
- 5月 26 週一 200310:31
msxml problem(編號：29217)
I have used the following code to post a string to other web site. however, I have an error message "Method 'send' of object 'IXMLHTTPRequest' failed, would you give me a information for solve it.
Private Sub XMLHTTPProcess(rData As String)
Dim oXMLHTTP As New XMLHTTP30
Dim objSrvHTTP As Object
oXMLHTTP.open "POST", "https://202.175.17.66/servlet/corpsms.jdsXMLClient", False
Private Sub XMLHTTPProcess(rData As String)
Dim oXMLHTTP As New XMLHTTP30
Dim objSrvHTTP As Object
oXMLHTTP.open "POST", "https://202.175.17.66/servlet/corpsms.jdsXMLClient", False
- 4月 30 週三 200320:03
Byte 相加 overflow(編號：28744)
用 byte + byte 若相加值大於256 會產生Overflow error
用 (byte + byte) mod 256 也一樣
如何解決
謝謝
用 (byte + byte) mod 256 也一樣
如何解決
謝謝
- 4月 13 週日 200314:10
我想用array 做 option 但做不到請朋友們賜教(編號：28438)
我想知道我錯什麼,可以教教我嘛~謝謝~
我的frm 有option 1 to option 11
若果user 沒有click option的話，便會出現ｍｓｇｂｏｘ
但不知何解click 了option 依然會出現msgbox
我已經看過舊文章，好像沒有類似問題
我的frm 有option 1 to option 11
若果user 沒有click option的話，便會出現ｍｓｇｂｏｘ
但不知何解click 了option 依然會出現msgbox
我已經看過舊文章，好像沒有類似問題