ارتباط به db در vb.net

[msaeedd]

چطوری میتونم یه ارتباط با db در vb.net برقرار کنم که اطلاعاتم رو در یک فورم داخل تکس باکس های آن نشون بده و در یک فرم دیگه بتونم از طریق تکس باکس اطلاعات را به db بفرستم و در اون ذخیره کنم؟

[msaeedd]

کسی نیست که به این سوال پیش پا افتاده من جواب بده؟

[arsalansalar]

سلام
اين كد واسه add كردن به بانكه:


con = New OleDbConnection("provider=microsoft.jet.oledb.4.0 ; data source=" & Application.StartupPath() & "\jma.mdb")
Try
Dim strSQL As String = _
"INSERT INTO rifa (fsh,fno)" & _
"VALUES (@fsh,@fno)"
Dim cmd As New OleDbCommand(strSQL, con)
With cmd
.Parameters.Add(New OleDbParameter("@fsh", TextBox1.Text))
.Parameters.Add(New OleDbParameter("@fno", TextBox2.Text))
End With
con.Open()
cmd.ExecuteNonQuery()
con.Close()
Catch sqlExc As OleDbException
MessageBox.Show(sqlExc.ToString, "SQL Exception Error!", _
MessageBoxButtons.OK, MessageBoxIcon.Error)
Catch exc As Exception
End Try
اين كد هم واسه سرچي هست كه مي خواهي انجام شه:

Dim selectSql As String
selectSql = "Select bank from bank where val(id) = '" & tjo.Text & "'"
con = New OleDbConnection("provider=microsoft.jet.oledb.4.0 ; data source=" & Application.StartupPath() & "\jma.mdb")
cmdSelect = New OleDbCommand(selectSql, con)
con.Open()
dr = cmdSelect.ExecuteReader()
If dr.Read Then
TextBox3.Text = dr("bank")
End If
con.Close()
dr.Close()