[VB6 ] 關於程式碼 一下可以一下不行..

[wwokeb (旅行...)]

Private Sub nextcommend_Click()

customdb.Recordset.AddNew <==按新增下一筆 錯這行
customdb.Enabled = False
newcommend.Enabled = True
nextcommend.Enabled = True
End Sub

Private Sub newcommend_Click()
If Trim(Text1.Text) = "" Then
MsgBox "聯絡電話欄位內不得空白"
Exit Sub
End If
If Trim(Text2.Text) = "" Then
MsgBox "客戶名稱欄位內不得空白"
Exit Sub
End If
If Trim(Text3.Text) = "" Then
MsgBox "住址欄位內不得空白"
Exit Sub

End If

customdb.Recordset.MoveLast <===按確定儲存錯這行
customdb.Enabled = True
newcommend.Enabled = True
nextcommend.Enabled = True
End Sub


這個是我寫的程式 我是要新增資料到資料庫裡

昨天我寫完測試的時候可以 可是今天又不行…

為什麼會這樣 我一直找不出來是什麼原因

版上有人可以指點指點我嗎^^"

謝謝吼....

--
是不是學會了什麼事都往心裡放

眼淚掉下的頻率就會日漸增加??

--
※ 發信站: 批踢踢實業坊(ptt.cc) 
◆ From: 220.141.1.83
推 fumizuki:連個訊息都沒有說明...要我們用猜的@_@
推 wwokeb:版大…蝦米訊息呀?? 我很笨...>///<
推 slasher:錯誤訊息吧