 |
| |
ช่วยดูให้หน่อยค่ะ โค้ด บันทึก มันไม่บันทึกให้ ในโปรแกรม วีบี เชื่อกับ ACCESS |
| |
 |
|
|
 |
 |
|
Code (VB.NET)
Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click
Dim s As String
If TextBox1.Text = "" Or TextBox2.Text = "" Or TextBox3.Text = "" Or TextBox4.Text = "" Then
MsgBox("ใส่ข้อมูลให้ครบ", MsgBoxStyle.Information, "ผลการทำงาน")
Exit Sub
End If
s = "insert into s_product(ID_product,n_product,n_number,n_pice) values ("
s += "'" & TextBox1.Text & "',"
s += "'" & TextBox2.Text & "',"
s += "'" & TextBox3.Text & "',"
s += "'" & TextBox4.Text & "'"
s += ")"
ExecuteSQL(s)
MsgBox("บันทึกข้อมูล", MsgBoxStyle.Information, "ผลการทำงาน")
End Sub
Tag : Ms SQL Server 2008
|
|
|
 |
 |
 |
 |
| Date :
2014-01-22 11:59:33 |
By :
pop |
View :
899 |
Reply :
7 |
|
 |
 |
 |
 |
|
|
|
|
 |
 |
|
 |
 |
| |
|
|
|
| |
|
น่าจะเป็นตรงคำสั่งที่ใช้เชื่อมต่อกับฐานข้อมูลน่ะครับ มันคอนเน็ตได้หรือเปล่า
|
| |
|
|
| |
| Date :
2014-01-22 13:26:46 |
By :
Dragons_first |
|
|
| |
|
|
|
|
|
| |
|
|
|
| |
|
|
|
| |
|
คอนเน็ตไม่ได้ค่ะ กดบันทึกแล้ว มันไม่เกิดอะไรขึ้นเลย ไม่บันทึกลงใน ดาต้ากิตด้วย
ช่วยหน่อยน่ะค่ะ ปุ่มบันทึก ไม่ได้เลย
|
| |
|
|
| |
| Date :
2014-01-25 20:10:19 |
By :
เจ้า |
|
|
| |
|
|
|
|
|
| |
|
|
|
| |
|
|
|
| |
|
ใช้การ Debug ดูครับ มันเข้างเงื่อนไขที่ต้องการหรือเปล่า
|
| |
|
|
| |
| Date :
2014-01-26 07:44:01 |
By :
mr.win |
|
|
| |
|
|
|
|
|
| |
|
|
|
| |
|
|
|
| |
|
Debug แล้วค่ะ กดค้นหาได้ ตอนนี้เหลือที่ปุ่มบันทึกข้อมูล เวลากดบันทึกให้มันเพิ่มลงในดาต้ากิต และไปเพิ่มในฐานข้อ access ด้วย
แต่ตอนนี้กด บันทึกเข้าไปไม่มีอะไรเกิดขึ้น พอมีโค้ดแก้ให้หน่อยไหค่ะ
|
| |
|
|
| |
| Date :
2014-01-27 13:26:12 |
By :
เจ้า |
|
|
| |
|
|
|
|
|
| |
|
|
|
| |
|
|
|
| |
|
ตรวจ ชนิดของข้อมูล แต่ละ ตัวมัน เป็น string หมดเลยไหมคะ
|
| |
|
|
| |
| Date :
2014-01-27 13:36:39 |
By :
Honey4U |
|
|
| |
|
|
|
|
|
| |
|
|
|
| |
|
|
|
| |
|
ระหว่างข้อความ
MsgBox("ใส่ข้อมูลให้ครบ", MsgBoxStyle.Information, "ผลการทำงาน")
กับ
MsgBox("บันทึกข้อมูล", MsgBoxStyle.Information, "ผลการทำงาน")
มีอันไหนโผล่มาไหมครับ
|
| |
|
|
| |
| Date :
2014-01-27 14:57:58 |
By :
fonfire |
|
|
| |
|
|
|
|
|
| |
|
|
|
| |
|
|
|
| |
|
myqry = "INSERT INTO tblInformation(Firstname,LastName,Address) "
myqry = myqry + "VALUES('" & txtFirst.Text & "','" & txtLast.Text & "','" & txtAddress.Text & "')"
mycmd = New OleDbCommand
With mycmd
.CommandText = myqry
.Connection = conn
.ExecuteNonQuery()
End With
|
| |
|
|
| |
| Date :
2014-01-27 16:38:38 |
By :
Honey4U |
|
|
| |
|
|
|
|
|
| |
|
|
|
|
|
