visual basic

anotaciones de Núria Trias

Public Sub ConnectToAccess()
    Dim conn As New System.Data.OleDb.OleDbConnection()
    conn.ConnectionString = & _ "Provider=Microsoft.Jet.OLEDB.4.0;Data source=" & _ "C:\Documents and Settings\username\My Documents\dbFile.mdb"
    Try
        conn.Open()
    Catch ex As Exception
        MessageBox.Show("Failed to connect to data source")
    Finally
        conn.close()
    End Try
End Sub
For each Row in Dt.Rows
    Row("field_name").toString
Next
  • windows/prog/vbasic.txt
  • Darrera modificació: 29/10/2017 03:15
  • per mate