VB2005 Make connection in code and use wizzards????

[bodylojohn]

Hello my friends,

Is it possible to build my connectionstring in code like this:

Imports System.Data.OleDb 
Dim oOleDbConnection As OleDbConnection 
Dim sConnString As String = _ 
    "Provider=Microsoft.Jet.OLEDB.4.0;" & _ 
    "Data Source=C:\myPath\myJet.mdb;" & _ 
    "User ID=Admin;" & _ 
    "Password=" 
oOleDbConnection = New OleDb.OleDbConnection(sConnString) 
oOleDbConnection.Open()

And then use the wizards to make a detailform and use the binding navigator, etc...???

[stanav]

I don't hink you can do that... Using either wizards or code entirely, but not mixing the 2... Maybe I'm wrong though

[bodylojohn]

Thank you stanav..

You know what the problem is....

I would love to do everything in code...but I am afraid that I will run into problems.

Things like:
-navigating through the records
-Detail forms etc...

And those are things wich you can do very nice with the wizzards...

[warrenayen]

I do all of my programming for databases in code. I've never used a wizard. I have no problem with updating, inserting, deleting, and navigating. I can show you...?

[bodylojohn]

I do all of my programming for databases in code. I've never used a wizard. I have no problem with updating, inserting, deleting, and navigating. I can show you...?

I would appreceate that very very much....

I hope to hear from you..

Thanks in advance

[warrenayen]

Well I e-mailed you the functions that I created, but it's really this simple:

Dim sqlConnection As SqlClient.SqlConnection
Dim SqlDataAdapter As SqlClient.DataAdapter
Dim myTable as DataTable
Dim sqlCommand as SqlClient.SqlCommand
 
sqlConnection = New SqlClient.SqlConnection("connection string")
sqlDataAdapter = New SqlClient.SqlDataAdapter("SQL Query", sqlConnection)
 
myTable = New DataTable("table name")
 
sqlDataAdapter.Fill(myTable)
 
'this will update a record. What you do is make sure you have the current row's ID. All tables should have a Primary Key.
sqlCommand = New SqlClient.SqlCommand("UPDATE tablename SET field = '" & value & "' WHERE IDField = '" & value & "'", sqlConnection) 'change the "value" to the real value, and the tablename, field, and IDField to the fieldnames
sqlConnection.Open
sqlCommand.ExecuteNonQuery
sqlConnection.Close
 
'this will insert a record. What you do is make sure you have the current row's ID. All tables should have a Primary Key.
sqlCommand = New SqlClient.SqlCommand("INSERT INTO tablename (field = '" & value & "') VALUES (" & value & "," & value & ") WHERE IDField = '" & value & "'", sqlConnection) 'change the "value" to the real value, and the tablename, field, and IDField to the fieldnames
sqlConnection.Open
sqlCommand.ExecuteNonQuery
sqlConnection.Close
 
'this will update a record. What you do is make sure you have the current row's ID. All tables should have a Primary Key.
sqlCommand = New SqlClient.SqlCommand("DELTE tablename WHERE IDField = '" & value & "'", sqlConnection) 'change the "value" to the real value, and the tablename, field, and IDField to the fieldnames
sqlConnection.Open
sqlCommand.ExecuteNonQuery
sqlConnection.Close
 
'this will "navigate"
Me.TextBox1.Text = myTable.Rows(index)("Fieldname") 'change index to the selected row, and Fieldname to the name of the column you want to display

That's the code I use