很急~VB TRY CATCH~END TRY 问题~

pikachew

很急~VB TRY CATCH~END TRY 问题~
  Private Sub btnSave_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnSave.Click
If txtID.Text <> "" Then
strsql = "insert into Table1 (stfID,staffname,staffage,staffadd,staffposition,staffsex,stafftime) values ('" _
           & txtID.Text & "','" _
           & txtName.Text & "','" _
            & txtAge.Text & "','" _
       & txtAddress.Text & "','" _
          & txtPosition.Text & "','" _
     & txtSex.Text & "','" _
        & txtTime.Text & "')"
            MsgBox("Saved")
        Else
            MsgBox("invalid", vbCritical)

        End If

        Dim acscmd As New OleDb.OleDbCommand
        acscmd.CommandText = strsql
        acscmd.Connection = acsconn
        acsda.SelectCommand = acscmd
        acsdr = acscmd.ExecuteReader
        acscmd.ExecuteNonQuery()
        acscmd.Dispose()

        Me.filllistview()
    End Sub
这是小弟的CODING
想请问下
如果要用TRY CATCH ENDTRY确保当同样的ID时不能被SAVE??
因为如果同样的ID SAVE了会有RUNTIME ERROR
请问要如何解决此问题呢？
谢谢

goodhermit95

在出现runtime error的部分try catch...

宅男-兜着走

那么急？？？？？
----------------------------------------------------------------------------------------------------------------------------------------------

简单。

在database内 set ID = unique.

那么同样的资料就会 throw exception.

forexen

如果 stfID 是user keyin 的，你可以写：

sql = "select * from table1 where stfid = '" & txtid.text & "' "
if  ds.tables(0).rows.count > 0 then
msgbox("invalid staff id")
else
sql insert command
end if

forexen

通常stfid 是 autogenerate 的。比如，IT001, IT002, ACC001,ACC002,HR001,HR002
这样就不会出现duplicate staffid 了。如果是出现duplicate data, 用 try catch 不是最好的方法，因该check 你的 program 错在哪里。

pikachew

SOLVE 到了。谢谢帮忙。
还有一个问题就是我想问
概念大概是这样。
CAR PARK PARKINg ticketing system
每当读取DATABASE 里的资料，就会在其户口扣取钱。
比如说, 每当RFID TAGS 被SCAN 到时，DATABASE里有一个FIELD我命它为BALANCE. BALANCE 会减少。应该如何下手呢？
谢谢
balance = balance - 10.
大概这样~

forexen

If RFIDTags= True then
select balance  from balancedatabase
If balance >10 then
balance = balance - 10
else
msgbox("Please top up your amount")
end if
End if

宅男-兜着走

很奇怪， 你竟然都已经会把 Balance Select 出来了， 那么RFID Scan 了 Event 你 Catch 到了， Select Data， 扣掉 Balance 然后再 save 回去 database。

你都会 query + hardware integration 了， 那么还有什么难度呢？

pikachew

谢谢~帮满~

sven86

别用ｔｒｙ　ａｎｄ　ｃａｔｃｈ　．

建议你先用ｓｅｌｅｃｔ　ｃｏｍｍａｎｄ　查找ｕｓｅｒ　输入的ｕｓｅｒ　ｉｄ．
如果ｕｓｅｒ　ｉｄ　存在在ｄａｔａｂａｓｅ　里，　可以告诉ｕｓｅｒ　说不能用。


　用ｔｒｙ　ａｎｄ　ｃａｔｃｈ　会把任何ｅｒｒｏｒ　都抹杀掉