Visual Basic e SQL

[ILBELLA]

Ciao, sto tentando di fare un programmino in visual basic che interagisca con una tabella di un database Access.
Vorrei, da programma, costruirmi l'istruzione sql (insert,delete,select) e farla eseguire.
Come posso fare, dove posso trovare qualche programma di esempio in cui VB interagisce con Access?

Grazie mille,
Ciao.

[kadosh]

Ti basta instanziarti una variabile, come ad esempio SQL e assergnarle l'istruzione necessaria, del tipo:

sql = "SELECT * FROM nome_tabella WHERE classe = 1"

poi alla fine di tutte le righe sql richiamate usi il comando SQL EXECUTE per farle eseguire in un'unica riga di comando.
Cmq trovi le spiegazioni nel MSDN di MS

[zello]

Vabbè, uso DAO perché me lo ricordo un po' meglio (è qualche annetto che non uso vb, ormai). Ti consiglio di cercare materiale su ADO (Active Data Object), è più - come dire - moderno...
Questo crea un database, inserisce una tabella, un record, poi lo estrae con una query

Codice: Seleziona tutto

Option Explicit
Sub createDb()
    Dim db As Database
    Set db = Workspaces(0).CreateDatabase("c:\temp\prova.mdb", dbLangGeneral)
    Dim tbl As New TableDef
    tbl.Name = "Tabella"
    Dim fld As New DAO.Field
    fld.Type = dbLong
    fld.Name = "Id"
    fld.Attributes = dbAutoIncrField
    tbl.Fields.Append fld
    Set fld = New DAO.Field
    fld.Name = "Stringa"
    fld.Type = dbMemo
    tbl.Fields.Append fld
    db.TableDefs.Append tbl
    Dim rs As Recordset
    Set rs = tbl.OpenRecordset(dbOpenDynaset)
    With rs
        .AddNew
        !Stringa = "Zello was here"
        .Update
    End With
    Set rs = Nothing
    Set rs = db.OpenRecordset("Select * from Tabella;", dbOpenSnapshot)
    Dim s As String
    If (rs.BOF = False) Then
        Do
            s = Str(rs!ID)
            s = s + " - " + rs!Stringa
            MsgBox s, vbOKOnly + vbInformation, "Zello!"
            rs.MoveNext
        Loop Until rs.EOF
    End If
    db.Close
End Sub