bonjour

je voudrais connaître la syntaxe d'une fin et début de fichier dans une table.
en vb6 que je maîtrise un peu plus, on écrit simplement rs.eof et rs.bof où rs est une variable de type recordset.

je vous présente le code pour extraire un jeu d'enregistrement

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
Imports System
Imports System.Data
Imports System.Data.OleDb
Imports Microsoft.VisualBasic
 
Public CheminBd As String = "c:\Users\Public\bd abuse\"
Public CONN As OleDbConnection = New OleDbConnection("provider=microsoft.jet.oledb.4.0;data source=" & CheminBd & "GP-CICERT.mdb;jet oledb:database password=onohio;")
 
Public COM As OleDbCommand
   Public Dadpter As OleDbDataAdapter
    Public tab As DataTable
    Public Dset As DataSet
je complète pour écrire que la procédure suivante me permet de récupérer un enregistrement dans une table

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
Sub OuvrirEnregistrement(ByVal bSql As String, ByVal bTable As String)
        COM = New OleDbCommand(bSql)
        Dadpter = New OleDbDataAdapter(COM)
        tab = New DataTable
        Dset = New DataSet
        COM.Connection = CONN
        Dadpter.Fill(Dset, bTable)
        tab = Dset.Tables(bTable)
        COM.CommandType = CommandType.Text
        Dadpter.SelectCommand = COM
    End Sub