 |
| |
Fatal error encountered during command execution. แก้ยังไงครับ VB 2008 ครับ ในการอัพเดท ข้อมูล |
| |
 |
|
|
 |
 |
|
Fatal error encountered during command execution. แก้ยังไงครับ VB 2008 ครับ ในการอัพเดท ข้อมูล ใช้กับ mysql ครับ ช่วยยทที มือไหม่ๆ สุดๆ เลยครับ
*************************
Private Sub Bsv_Click() Handles Bsv.Click
If (TbxName.Text = "" Or TbxAds.Text = "") Then
MsgBox("กรุณากรอกให้ครบ")
Return
End If
Dim sql As String = "Server=localhost;User Id=jd1;Password=1234;Database=jdthai1"
If (TbxID.Text = "") Then
sql = " INSERT INTO customer ("
sql &= "NAME,LASTNAME,ADDRESS,CODECUSTOMER,COMPANY,TELEPHONE,EMAIL)"
sql &= "VALUES(@nm ,@adrs,@lnm,@ccm,@cpn,@tel,@email )"
Else
sql = "UPDATE customer SET "
sql &= "NAME = @nm,ADDRESS = @adrs,LASTNAME=@lnm,COMPANY=@cpn,TELEPHONE=@tel,EMAIL=@email"
sql &= "WHERE CODECUSTOMER =" & TbxID.Text
End If
_cmd = New MySqlCommand(sql, _conn)
_cmd.Parameters.AddWithValue("nm", TbxName.Text)
_cmd.Parameters.AddWithValue("lnm", tbxLname.Text)
_cmd.Parameters.AddWithValue("adrs", TbxAds.Text)
_cmd.Parameters.AddWithValue("cpn", TbxCom.Text)
_cmd.Parameters.AddWithValue("tel", TbxTel.Text)
_cmd.Parameters.AddWithValue("email", TbxEmail.Text)
Dim e As Integer = _cmd.ExecuteNonQuery()
If (e < 1) Then
ToolStripStatusLabel1.Text = "ผิดพลาด."
Else
ToolStripStatusLabel1.Text = "ข้อมูลถูกจัดเก็แเล้ว"
Dim NAME As String = TbxName.Text
ReadData()
FillListbox()
ClearBindings()
If (TabControl1.SelectedIndex = 0) Then
bindings()
End If
Dim idx As Integer = ListBox1.FindStringExact(NAME)
If (idx > -1) Then
ListBox1.SetSelected(idx, True)
End If
UpdateStatus()
End If
End Sub
Tag : .NET, MySQL, VBScript, Excel (Excel.Application), Web (ASP.NET), VB.NET
|
|
|
 |
 |
 |
 |
| Date :
2010-08-14 17:25:17 |
By :
irine |
View :
3733 |
Reply :
4 |
|
 |
 |
 |
 |
|
|
|
|
 |
 |
|
 |
 |
| |
|
|
|
| |
|
_cmd.Parameters.AddWithValue("@nm", TbxName.Text)
_cmd.Parameters.AddWithValue("@lnm", tbxLname.Text)
_cmd.Parameters.AddWithValue("@adrs", TbxAds.Text)
_cmd.Parameters.AddWithValue("@cpn", TbxCom.Text)
_cmd.Parameters.AddWithValue("@tel", TbxTel.Text)
_cmd.Parameters.AddWithValue("@email", TbxEmail.Text)
และจะบอกให้อีกอย่างนะ ถ้าเมื่อไหร่ที่ save ข้อมุลที่เป็นวันที่ล่ะก็ error มาเยือนแน่นอนแล้วเดี๋ยวจะมาบอกว่าต้องแก้ยังไง หุๆ
|
| |
|
|
| |
| Date :
2010-08-14 18:55:53 |
By :
Programmer ด้อยปัญญา |
|
|
| |
|
|
|
|
|
| |
|
|
|
| |
|
|
|
| |
|
ไม่มีวันนที่นะครับ
ที่มีก็
ID
ชื่อ
นามสกุล
ที่อยู่
เบอร์โทร
อีเมลล์
บริษัท
แค่นั้นแหละครับ
ขอบคุณมากครับ เเต่ยังไม่รู้จะแก้ยังไง
|
| |
|
|
| |
| Date :
2010-08-14 18:59:57 |
By :
irine |
|
|
| |
|
|
|
|
|
| |
|
|
|
| |
|
|
|
| |
|
มี error ขึ้นในตอนที่กดปุ่ม เพื่อแก้ไข โดยมันขึ้นว่า
******* Violation of Primary k Constraint 'PK I_Equipment' Cannot insert duplicate key in object ' dbo.I_Equipment' The statement has been terminated********
มัน Primary k error อะไรหรอค่ะช่วยบอกทีCode (VB.NET)
|
| |
|
|
| |
| Date :
2011-09-30 23:15:47 |
By :
กุ๊ก |
|
|
| |
|
|
|
|
|
| |
|
|
|
| |
|
|
|
| |
|
พี่ยาจก c#
ทำไงถ้าจะ insert date ครับ
|
| |
|
|
| |
| Date :
2012-09-29 22:53:04 |
By :
dekkuza |
|
|
| |
|
|
|
|
|
| |
|
|
|
|
|
