In una tabella con tre campi testo, ad esempio:

codice:
        Dim ConnString As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + Server.MapPath("miodb.mdb")
        Dim cn As New System.Data.OleDb.OleDbConnection(ConnString)
        cn.Open()
        Dim comando As New System.Data.OleDb.OleDbCommand
        comando = New System.Data.OleDb.OleDbCommand("INSERT INTO NOMETABELLA (CAMPO1,CAMPO2,CAMPO3) VALUES ('VALORE1','VALORE2','VALORE3')", cn)
        Try
            Dim affected As Integer
            affected = comando.ExecuteNonQuery()
            If affected > 0 Then
                Response.Write("Inserimento OK")
            End If
        Catch ex As System.Data.OleDb.OleDbException
            Response.Write("Si è verificato un errore: " & ex.Message)
        Finally
            cn.Close()
            comando.Dispose()
        End Try
ma questa illustrata è la tecnica più rudimentale che esista, dai una occhiata anche a questa classe http://msdn.microsoft.com/it-it/libr...cessdatasource(VS.80).aspx