 |
|
คือว่าต้องการเพิ่มข้อมูลลงฐานข้อมูลแต่พอเพิ่มแล้วเนี่ย
หากใส่ข้อมูลครบทั้งหมดมันจะเพิ่มให้ แต่หากไม่ใส่ข้อมูลที่ เป็น float
จะเออเรอว่า Incorrect Shyntax near ','.
Dim sqladd As String
Dim comAdd As New SqlCommand
sqladd = "INSERT INTO Doemp_local (empid,dotype,dostart,doend,donum,timstart,timstop,dohor)"
sqladd &= " VALUES ('" & empid.SelectedValue & "',"
sqladd &= "'" & doid.SelectedValue & "',"
sqladd &= "'" & dostart.Value.ToString("d") & "',"
sqladd &= "'" & doend.Value.ToString("d") & "',"
sqladd &= "" & donum.Text & ","
sqladd &= "'" & timstart.Text & "',"
sqladd &= "'" & timstop.Text & "',"
sqladd &= "" & dohor.Text & ")"
comAdd = New SqlCommand
Try
With comAdd
.CommandType = CommandType.Text
.CommandText = sqladd
.Connection = mySQLConn
.ExecuteNonQuery()
End With
Catch ex As Exception
MessageBox.Show(ex.Message, "ผลการตรวจสอบ", MessageBoxButtons.OK, MessageBoxIcon.Error)
Exit Sub
End Try
MsgBox("บันทึกข้อมูลเรียบร้อย")
donum,dohor เป็นค่า float
Tag : - - - -
|
|
|
 |
 |
 |
 |
| Date :
2009-06-05 13:24:31 |
By :
Nicorobin |
View :
1877 |
Reply :
4 |
|
 |
 |
 |
 |
|
|
|
|
 |
