tstsst
سه شنبه 23 اسفند 1390, 17:30 عصر
سلام
من برای ادد کردن به دیتا بیسم از این کد استفاده می کن که درست هم ادد می کنه ولی مشکل اینجاست که بعد از ادد مقدار تمام ستون ها برابر با اخرین چیزی که ادد کردم می شه ؟!!؟
Dim coner As String = "Provider=Microsoft.JET.OLEDB.4.0;Persist Security Info=False;Data Source=" & Application.StartupPath & "\Sky.mdb"
Dim Conn As OleDbConnection
Dim Dtadp As New OleDbDataAdapter
Conn = New OleDbConnection(coner)
Conn.Close()
Conn.Open()
Dtadp.InsertCommand = New OleDbCommand("INSERT INTO `tofs` (`ID`, `Hour`, `Min`) VALUES ('" & TextBox1.Text & "','" & NumericUpDown1.Value & "','" & NumericUpDown2.Value & "')", Conn)
Dtadp.InsertCommand.ExecuteNonQuery()
Conn.Close()
Dtadp.Dispose()
و اگه همونو این طوری بنویسم
Dim coner As String = "Provider=Microsoft.JET.OLEDB.4.0;Persist Security Info=False;Data Source=" & Application.StartupPath & "\Sky.mdb"
Dim Conn As OleDbConnection
Dim Dtadp As New OleDbDataAdapter
Conn = New OleDbConnection(coner)
Conn.Close()
Conn.Open()
Dtadp.InsertCommand = New OleDbCommand("INSERT INTO tofs (ID,Hour,Min) VALUES ('" & TextBox1.Text & "','" & NumericUpDown1.Value & "','" & NumericUpDown2.Value & "')", Conn)
Dtadp.InsertCommand.ExecuteNonQuery()
Conn.Close()
Dtadp.Dispose()
این خطا رو می ده ؟!
Syntax error in INSERT INTO statement.
من برای ادد کردن به دیتا بیسم از این کد استفاده می کن که درست هم ادد می کنه ولی مشکل اینجاست که بعد از ادد مقدار تمام ستون ها برابر با اخرین چیزی که ادد کردم می شه ؟!!؟
Dim coner As String = "Provider=Microsoft.JET.OLEDB.4.0;Persist Security Info=False;Data Source=" & Application.StartupPath & "\Sky.mdb"
Dim Conn As OleDbConnection
Dim Dtadp As New OleDbDataAdapter
Conn = New OleDbConnection(coner)
Conn.Close()
Conn.Open()
Dtadp.InsertCommand = New OleDbCommand("INSERT INTO `tofs` (`ID`, `Hour`, `Min`) VALUES ('" & TextBox1.Text & "','" & NumericUpDown1.Value & "','" & NumericUpDown2.Value & "')", Conn)
Dtadp.InsertCommand.ExecuteNonQuery()
Conn.Close()
Dtadp.Dispose()
و اگه همونو این طوری بنویسم
Dim coner As String = "Provider=Microsoft.JET.OLEDB.4.0;Persist Security Info=False;Data Source=" & Application.StartupPath & "\Sky.mdb"
Dim Conn As OleDbConnection
Dim Dtadp As New OleDbDataAdapter
Conn = New OleDbConnection(coner)
Conn.Close()
Conn.Open()
Dtadp.InsertCommand = New OleDbCommand("INSERT INTO tofs (ID,Hour,Min) VALUES ('" & TextBox1.Text & "','" & NumericUpDown1.Value & "','" & NumericUpDown2.Value & "')", Conn)
Dtadp.InsertCommand.ExecuteNonQuery()
Conn.Close()
Dtadp.Dispose()
این خطا رو می ده ؟!
Syntax error in INSERT INTO statement.