 |
|
สอบถามปัญหาการรับค่า จาก Label VB.Net บันทึกลงในฐานข้อมูล Access จะต้องเขียนโค้ดอย่างไร |
|
 |
|
|
 |
 |
|
ตามตัวอย่างก็ถูกแล้วน่ะครับ ว่าแต่มี Error หรือไม่
|
 |
 |
 |
 |
Date :
2014-02-21 10:10:19 |
By :
mr.win |
|
 |
 |
 |
 |
|
|
 |
 |
|
 |
 |
 |
|
|
 |
 |
|
มันผิดตรงนี้ครับผมก้ไม่รู้ว่ามันผิดอะไร ผมรบกวนช่วยแก้โค้ดด้วยนะครับ ขอบคุณครับ

|
 |
 |
 |
 |
Date :
2014-02-21 14:28:37 |
By :
tawat |
|
 |
 |
 |
 |
|
|
 |
 |
|
 |
 |
 |
|
|
 |
 |
|
โค้ดนี้เป็นปุ่มบันทึกข้อมูลครับผมดัดแปลงมาจากโค้ดนี้ครับเพื่อที่จะทำการส่าค่าจาก Label บันทึกลงฐานข้อมูลครับ
Code (VB.NET)
Private Sub btnSave_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnSave.Click
Dim sqlADD As String
Dim cm As New OleDbCommand()
Dim objConn As OleDbConnection
Dim dt As New DataTable
Dim strConnString As String
strConnString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=|DataDirectory|\Student_1.mdb"
objConn = New OleDbConnection(strConnString)
objConn.Open()
sqlADD = "INSERT INTO StudentData([ID_STD],[UserName],[LastName],[Class],[Sex],[Password],[ID_Borrowing])VALUES('" & txtID_STD.Text & "','" & txtUserName.Text & "','" & txtLastName.Text & "','" & txtClass.Text & "','" & txtSex.Text & "','" & txtPassWord.Text & "','" & txtBorrowing.Text & "')"
cm = New OleDbCommand(sqlADD, objConn)
cm.ExecuteNonQuery()
MessageBox.Show("บันทึกข้อมูลนักศึกษาแล้ว", "ผลการทำงาน", MessageBoxButtons.OK, MessageBoxIcon.Information)
txtID_STD.Clear()
txtUserName.Clear()
txtLastName.Clear()
txtPassWord.Clear()
txtClass.Clear()
txtSex.Clear()
txtPassWord.Clear()
txtBorrowing.Clear()
objConn.Close()
|
 |
 |
 |
 |
Date :
2014-02-21 14:35:36 |
By :
tawat |
|
 |
 |
 |
 |
|
|
 |
 |
|
 |
 |
 |
|
|
 |
 |
|
ชื่อตารางครับ Borrowing Data ----> [Borrowing Data] 
|
 |
 |
 |
 |
Date :
2014-02-21 17:48:59 |
By :
Downrung |
|
 |
 |
 |
 |
|
|
 |
 |
|
 |
 |
 |
|
|
 |
 |
|
มันก็ยังไม่ได้เลยคับรบกวนดูอีกทีนะครับ

ผมต้องการให้ Label ในฟอร์มนี้บันทึกลง Access หลังจากกดปุ่มยืมกุญแจครับ

ฟอร์มนี้คือฐานข้อมูลที่จะรับค่ามาบันทึกลงในตารางนี้ครับ ผมรบกวนอีกทีนะครับขอบคุณครับ

|
 |
 |
 |
 |
Date :
2014-02-21 23:35:51 |
By :
tawat |
|
 |
 |
 |
 |
|
|
 |
 |
|
 |
 |
 |
|
|
 |
 |
|
มี , เกินมาครับ
|
 |
 |
 |
 |
Date :
2014-02-22 09:49:14 |
By :
mr.win |
|
 |
 |
 |
 |
|
|
 |
 |
|
 |
 |
 |
|
|
 |
 |
|
มีเกินมาตรงไหนอ่ะครับ รบกวนช่วยดูให้ผมหน่อยนะครับผมกลัวว่าจะไม่ทันอ่ะครับผมทำเป้นโครงการครับ
|
 |
 |
 |
 |
Date :
2014-02-22 10:57:21 |
By :
tawat |
|
 |
 |
 |
 |
|
|
 |
 |
|
 |
 |
 |
|
|
 |
 |
|
มันยังผิดอยู่เลยครับช่วยผมด้วยผมไม่รู้จะทำยังไงแล้ว

|
 |
 |
 |
 |
Date :
2014-02-22 13:26:28 |
By :
tawat |
|
 |
 |
 |
 |
|
|
 |
 |
|
 |
 |
 |
|
|
 |
 |
|
VALUES('" & lblID_Borrowing.Text & "',)"
, เกินมา
|
 |
 |
 |
 |
Date :
2014-02-22 21:39:07 |
By :
Downrung |
|
 |
 |
 |
 |
|
|
 |
 |
|
 |
 |
 |
|
|
 |
 |
|
ยังไม่ได้เลยครับรบกวนช่วยแก้ไขให้ได้ไหมครับ

|
 |
 |
 |
 |
Date :
2014-02-22 23:40:57 |
By :
tawat |
|
 |
 |
 |
 |
|
|
 |
 |
|
 |
 |
 |
|
|
 |
 |
|
เปลี่ยนชื่อตารางค่ะ ต้องไม่มีเว้นวรรค ถ้าจำเป็นก็ใช้ _ แทน
|
 |
 |
 |
 |
Date :
2014-02-23 02:51:28 |
By :
nstk |
|
 |
 |
 |
 |
|
|
 |
 |
|
 |
 |
 |
|
|
 |
 |
|
INSERT ผิด Syntax ครับ
|
 |
 |
 |
 |
Date :
2014-02-23 09:11:18 |
By :
mr.win |
|
 |
 |
 |
 |
|
|
 |
 |
|
 |
 |
 |
|
|
 |
 |
|
ต้องทำยังไงครับรบกวนดูให้ผมที
|
 |
 |
 |
 |
Date :
2014-02-23 09:21:41 |
By :
tawat |
|
 |
 |
 |
 |
|
|
 |
 |
|
 |
 |
 |
|
|
 |
 |
|
ยังไม่ได้คับ

ผมรบกวนช่วยแก้โคดให้ถูกทีครับขอบคุณครับ
|
 |
 |
 |
 |
Date :
2014-02-23 13:55:50 |
By :
tawat |
|
 |
 |
 |
 |
|
|
 |
 |
|
 |
 |
 |
|
|
 |
 |
|
ลอง Copy อันนี้ไปใส่แทน เอาไปทั้งสองบรรทัดเลยนะครับ
Code (VB.NET)
sqlADD = "INSERT INTO [Borrowing Data](ID_Borrowing) VALUES('" & lblID_Borrowing.Text & "')"
Console.writeline(sqlADD) 'ข้อมูลใน sqlADD จะปรากฏใน Output Windows ด้านล่างของ VS ถ้าไม่มี กด Ctrl+Alt+o
ถ้า OK แล้ว ลบบรรทัดที่สองทิ้ง
|
ประวัติการแก้ไข 2014-02-23 16:08:31
 |
 |
 |
 |
Date :
2014-02-23 15:03:29 |
By :
Phol9411 |
|
 |
 |
 |
 |
|
|
 |
 |
|
 |
 |
 |
|
|
 |
 |
|
ยังไม่ได้ครับ

|
 |
 |
 |
 |
Date :
2014-02-23 16:31:19 |
By :
tawat |
|
 |
 |
 |
 |
|
|
 |
 |
|
 |
 |
 |
|
|
 |
 |
|
บรรทัดที่ขึ้นสีเขียวเอาออกไปเลย ไม่ต้องมีแล้ว เพราะคุณได้ใส่ค่าเข้าไปที่ SQL Statement โดยตรงแล้ว ไม่ต้องใส่ผ่าน พารามิตเตอร์อีก
ไหน ๆ ว่าถึงเรื่อง Parameters แล้ว จะช่วยเพิ่มเติมความรู้ให้
วิธีเดิมกับการ insert รายการเดียว ง่ายดีอยู่แล้ว แต่ถ้า หลาย ๆ รายการจากตาราง การนำ Parameters มาช่วย ก็จะทำให้การวนลูปง่ายขึ้น ต่อไปนี้คือตัวอย่างการใช้ parameters
Code (VB.NET)
sqlADD = "INSERT INTO [Borrowing Data](ID_Borrowing) VALUES(@ID_Borrowing)"
cm = New OleDbCommand(sqlADD, objConn)
cm.Parameters.Add(New SqlParameter("@ID_Borrowing", SqlDbType.VarChar, 10))
cm.Parameters.Item("@ID_Borrowing").Value = lblID_Borrowing.Text
cm.ExecuteNonQuery()
|
ประวัติการแก้ไข 2014-02-23 17:03:54 2014-02-23 17:38:33 2014-02-23 19:46:11 2014-02-23 20:09:52
 |
 |
 |
 |
Date :
2014-02-23 16:59:38 |
By :
Phol9411 |
|
 |
 |
 |
 |
|
|
 |
 |
|
 |
 |
 |
|
|
 |
 |
|
มันยังติดอยู่ตรงนี้อ่ะครับ

รบกวนอีกทีนะครับผมมือใหม่คับทำเป็นโปรเจค
|
 |
 |
 |
 |
Date :
2014-02-23 23:15:39 |
By :
tawat |
|
 |
 |
 |
 |
|
|
 |
 |
|
 |
 |
 |
|
|
 |
 |
|
ขอโทษทีครับ ให้เปลี่ยนมาใช้ OleDbParameter รวมทั้งการกำหนด DataType ให้ใช้ OledbType
ว่าแต่ทำไมไม่ใช้แบบเดิมละครับ มันจะทำให้เปลี่ยนจุดผิดไปเรื่อย คนสอนจะไปก่อน
|
 |
 |
 |
 |
Date :
2014-02-23 23:57:33 |
By :
Phol9411 |
|
 |
 |
 |
 |
|
|
 |
 |
|
 |
 |
|
|