ต่อไป »

[แก๊ว. ..*]

พอดีต้องการกรอกข้อมูลให้รับค่าเข้าไปเก็บใน Microsoft Access อ่ะครับ อยากทราบคำสั่งน่ะครับ เคยเรียนไปและแล้วก็ลืม พวก ADO / DataGrid ไรพวกนี้อ่ะครับ
 

Edit เชื่อ - เชื่อม

[CKSoft]

vb.net หรือ vb6 ครับเนี่ย

[CKSoft]

โค๊ด:

  
           Dim Cmd As OleDbCommand
           Dim SQL As String
           Dim objCmd As New OleDbCommand

           Dim Con = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\[Databasename].mdb")

           SQL = "INSERT INTO [TableName] (*) VALUES ('" & [value1] & "', '" & [value2] & "', '" & [value3] & "', '" & [value4] & "', '" & [value5] & "', '" & [value6] & "')"
           Cmd = New OleDbCommand(SQL, Con)

           Con.Open()
           objCmd = New OleDbCommand(SQL, Con)
           objCmd.ExecuteNonQuery()
           Con.Close()

อันนี้ของ .NET น่าจะประมาณนี้นะครับลองดู

[แก๊ว. ..*]

โค๊ด:

  
           Dim Cmd As OleDbCommand
           Dim SQL As String
           Dim objCmd As New OleDbCommand

           Dim Con = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\[Databasename].mdb")

           SQL = "INSERT INTO [TableName] (*) VALUES ('" & [value1] & "', '" & [value2] & "', '" & [value3] & "', '" & [value4] & "', '" & [value5] & "', '" & [value6] & "')"
           Cmd = New OleDbCommand(SQL, Con)

           Con.Open()
           objCmd = New OleDbCommand(SQL, Con)
           objCmd.ExecuteNonQuery()
           Con.Close()

อันนี้ของ .NET น่าจะประมาณนี้นะครับลองดู

vb10 อ่ะครับ ผมไม่แน่ใจว่าใช้คล้ายๆ VB6 หรือ

[CKSoft]

คำสั่ง query น่าจะเหมือนกันครับ
แต่ตัว vb10 นี่ผมไม่เป็น = = ขอโทษด้วยนะครัยช่วยได้แค่นี้

ปล. vb10 นี่มีชื่ออื่นไหมครับผม google ดูไม่เห็นมีข้อมูลไรเลย

[execter]

โค๊ด:

  
           Dim Cmd As OleDbCommand
           Dim SQL As String
           Dim objCmd As New OleDbCommand

           Dim Con = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\[Databasename].mdb")

           SQL = "INSERT INTO [TableName] (*) VALUES ('" & [value1] & "', '" & [value2] & "', '" & [value3] & "', '" & [value4] & "', '" & [value5] & "', '" & [value6] & "')"
           Cmd = New OleDbCommand(SQL, Con)

           Con.Open()
           objCmd = New OleDbCommand(SQL, Con)
           objCmd.ExecuteNonQuery()
           Con.Close()

อันนี้ของ .NET น่าจะประมาณนี้นะครับลองดู

vb10 อ่ะครับ ผมไม่แน่ใจว่าใช้คล้ายๆ VB6 หรือ

หลังจาก VBB6 แล้วก็กลายเป็น .NET ครับเวอร์ชั่นก็จะเปลี่ยนเป็น 2003 2005 2008 2010 ครับ

[CKSoft]

โค๊ด:

  
           Dim Cmd As OleDbCommand
           Dim SQL As String
           Dim objCmd As New OleDbCommand

           Dim Con = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\[Databasename].mdb")

           SQL = "INSERT INTO [TableName] (*) VALUES ('" & [value1] & "', '" & [value2] & "', '" & [value3] & "', '" & [value4] & "', '" & [value5] & "', '" & [value6] & "')"
           Cmd = New OleDbCommand(SQL, Con)

           Con.Open()
           objCmd = New OleDbCommand(SQL, Con)
           objCmd.ExecuteNonQuery()
           Con.Close()

อันนี้ของ .NET น่าจะประมาณนี้นะครับลองดู

vb10 อ่ะครับ ผมไม่แน่ใจว่าใช้คล้ายๆ VB6 หรือ

หลังจาก VBB6 แล้วก็กลายเป็น .NET ครับเวอร์ชั่นก็จะเปลี่ยนเป็น 2003 2005 2008 2010 ครับ

แล้วตกลง vb10 นี่คือ.... เขาหมายถึง .NET 2010 เหรอ