problem with sql statment

Question

hellow to all i am new to vb.net and i am working with data base i try to run the next code Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim sql As String sql = "select Customer.Customer from Customer Where Customer.Customer ID = 1" Dim objconn As New OleDb.OleDbConnection(sConnection) Dim objdataadapter As New OleDb.OleDbDataAdapter(sql, objconn) Dim objds As New DataSet("Customer") Dim objdv As DataView Dim objtabel As DataTable Try objconn.Open() Catch ex As Exception Windows.Forms.MessageBox.Show(ex.Message) End Try If objconn.State = ConnectionState.Open Then Try objdataadapter.Fill(objds, "Customer") objconn.Close() objtabel = objds.Tables("Customer") objdv = objtabel.DefaultView TextBox2.DataBindings.Add("text", objdv, "Customer") Catch ex As Exception Windows.Forms.MessageBox.Show(ex.Message) End Try End If End Sub and when i run it i get a wrong message .. i had cheaked the database i have all the tabels and the customer ID thxx for the help

microuser · Answer

thxx for the help , i had finally found the soultion , now i am faceing another problem i wana pick a value from a tabel that i had created by codeing ... i can't find the tabel in my hd , i creat it when the program loads .. the problem is what to put in the oledbconnection ? here is my code Dim Conn1 As String Conn1 = "provider=microsoft.jet.oledb.4.0;data source=C:\ado.mdb" Dim sql As String sql = "select * from Transaction Where (Transaction_ID =" sql = sql & "'" & TextBox5.Text & "')" Dim objconn As New OleDb.OleDbConnection(Conn1) Dim objdataadapter As New OleDb.OleDbDataAdapter(sql, objconn) Dim objds As New DataSet("Transaction") Dim objdv As DataView Dim objtabel As DataTable Dim ds As DataSet ds = New DataSet("Transaction") objconn.Open() If objconn.State = ConnectionState.Open Then objdataadapter.Fill(myDataSet1, "Transaction") objtabel = objds.Tables("Transaction") DataGrid1.SetDataBinding(myDataSet1, "Transaction") End If End Sub Conn1 it is not a right path because i wana pick the value from the tabel Transaction that i had created when the program load ! thx for anyhelp

pioneerpauls · Answer

Dear friend there is 1 more option try usig SQL connection to connect the Data base Example Dim SQLCon As SqlConnection = New SqlConnection("CONNECTION STRING TO UR DATABASE") Dim sqlda As SqlDataAdapter = New SqlDataAdapter("TYPE UR QUERY HERE", SQLCon ) sqlda.SelectCommand.CommandType = CommandType.Text SQLCon .Open() Dim sqlds As DataSet = New DataSet sqlda.Fill(sqlds) textbox1.text=sqlds.Tables(0).Rows(0).Item("Customer") Keep this coding as base frame and apply in ur application All d Best...Satisa

microuser · Answer

i had change it !! but i get deffrint error ! i had tried trillion method to connect to database and run sql statment witch the user have to put integer into it !! but nothing work for me :( the error that i get when i had changed the Customer_ID is No value given for one or more required parametes thx for the help !

pioneerpauls · Answer

Please check wheather the field name in the table is CustomerID or Customer ID..Because we cannot create field name customer ID wit space in between in SQL.. Since ID is A Key word..

microuser · Answer

hellow to all .. hey man the error that i recive is syntax error (missing operator) in query expression 'Customer.Customer = 1'. thxx for the help great website ...

pioneerpauls · Answer

Dear Friend I hope the connection should be made open b4 passing the command to the adapter.. Dim sql As String sql = "select Customer.Customer from Customer Where Customer.Customer ID = 1" Dim objconn As New OleDb.OleDbConnection(sConnection) Try objconn.Open() Catch ex As Exception Windows.Forms.MessageBox.Show(ex.Message) End Try Dim objdataadapter As New OleDb.OleDbDataAdapter(sql, objconn) I am sorry if this doesnt help u..It will be easy for us to solve ur problem if u give us the ERROR message that is raised... Thanks wit regards Satisa

problem with sql statment

Answers (6)