Fermr un recordset
seddki
Messages postés
3
Date d'inscription
Statut
Membre
Dernière intervention
-
yakov Messages postés 115 Statut Membre -
yakov Messages postés 115 Statut Membre -
Bonjour,
j'ai un problème qui nécessite la fermeture et puis l'ouverture d'une connexion à la base de donné Access en VB6! j'ai entré Data.recordset.close pour la fermeture, il l'a accepté mais j'ai pas trouvé un moyen pour l'ouvrir (un truc telque Data.Recordset.Open). quelqu'un peut m'aider s'il vous plais c'est urgent! et merci d'avance...
j'ai un problème qui nécessite la fermeture et puis l'ouverture d'une connexion à la base de donné Access en VB6! j'ai entré Data.recordset.close pour la fermeture, il l'a accepté mais j'ai pas trouvé un moyen pour l'ouvrir (un truc telque Data.Recordset.Open). quelqu'un peut m'aider s'il vous plais c'est urgent! et merci d'avance...
1 réponse
lorsque tu as fermé un recordset, il faut, pour l'ouvrir, référencer la connexion consernée.
Par exemple, avec ADODB
dim ic as adodb.connection
dim rs as adodb.recordset
dim base as string
'je définis le chemin d'accès à ma base
base="c:/bd1.mdb"
'j'ouvre ma connection
Set ic = New ADODB.Connection
ic.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & BASE & ";Mode=ReadWrite|Share Deny None;Persist Security Info=False;"
ic.Open
'je définis la commande de mon recordset
sql="select * from clients"
'j'ouvre mon recordset
Set rs = New ADODB.Recordset
rs.CursorLocation = adUseClient
rs.Open sql, ic
'je ferme mon recordset
rs.close
set rs=nothing
'je ferme ma connection
ic.close
set ic=nothing
'si je dois rouvrir le recordset, je recommance comme au début...
J'espère t'avoir aidé...
Par exemple, avec ADODB
dim ic as adodb.connection
dim rs as adodb.recordset
dim base as string
'je définis le chemin d'accès à ma base
base="c:/bd1.mdb"
'j'ouvre ma connection
Set ic = New ADODB.Connection
ic.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & BASE & ";Mode=ReadWrite|Share Deny None;Persist Security Info=False;"
ic.Open
'je définis la commande de mon recordset
sql="select * from clients"
'j'ouvre mon recordset
Set rs = New ADODB.Recordset
rs.CursorLocation = adUseClient
rs.Open sql, ic
'je ferme mon recordset
rs.close
set rs=nothing
'je ferme ma connection
ic.close
set ic=nothing
'si je dois rouvrir le recordset, je recommance comme au début...
J'espère t'avoir aidé...
