Någon som är bra på VB.net som kan göra en kodsnutt som kopplar till en access databas (tex Nwind), och som sen i tex en textbox visar en customer. Hej.Problem med koppling till access
Får inte rätt på det.
Tacksam för hjälp med detta
AndersSv: Problem med koppling till access
Här har du ett exempel på både en DataReader (utkommenterat) och DataSet:
<code>
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim conStr As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Program\Microsoft Visual Studio\VB98\BIBLIO.MDB;Persist Security Info=False"
Dim odbConn As New OleDbConnection()
Dim SQL As String = "SELECT * FROM Authors"
Dim objComm As New OleDbCommand()
'Dim objRRAuthors As OleDbDataReader = Nothing
Dim DA As New OleDbDataAdapter()
Dim dsAuthors As New DataSet()
odbConn.ConnectionString = conStr
odbConn.Open()
objComm.Connection = odbConn
objComm.CommandText = SQL
DA.SelectCommand = objComm
'objRRAuthors = objComm.ExecuteReader()
'While objRRAuthors.Read
' MsgBox(objRRAuthors.GetString(1))
' Exit While
'End While
DA.Fill(dsAuthors, "Test")
Dim drAuthor As DataRow
For Each drAuthor In dsAuthors.Tables.Item("Test").Rows
MsgBox(drAuthor.Item("Author").ToString())
Exit For
Next
End Sub
</code>
Observera att jag bryter loopen för att inte visa så många poster.
Om du bara vill visa en post får du ändra SQL-satsen så att du får den post du är ute efter.
Lycka till!
//fredda