Adapter un code en VB9

Résolu
cs_petchy Messages postés 710 Date d'inscription jeudi 20 février 2003 Statut Membre Dernière intervention 19 mai 2015 - 31 déc. 2008 à 09:48
cs_petchy Messages postés 710 Date d'inscription jeudi 20 février 2003 Statut Membre Dernière intervention 19 mai 2015 - 31 déc. 2008 à 17:36
bonjour


est ce possible d'adapter se code en VB9 "rensei(0) = rs!nomenfant_ctr"
merci
petchy

4 réponses

NHenry Messages postés 15069 Date d'inscription vendredi 14 mars 2003 Statut Modérateur Dernière intervention 29 mai 2023 158
31 déc. 2008 à 12:46
Bonjour,

Le morceau de code est donc du VB6/ADO -> VB9 (2008)

Cela signifie de récupérer la valeur du champs "nomenfant_ctr" du RecordSet  "rs".

Mais je te conseil d'éviter ADO ou DAO avec .NET, préfères utiliser ADO.NET. Bien que plus complexe, Tu as pas mal d'exemple sur le site.

http://nhen0039.chez-alice.fr/index.php
3
NHenry Messages postés 15069 Date d'inscription vendredi 14 mars 2003 Statut Modérateur Dernière intervention 29 mai 2023 158
31 déc. 2008 à 12:08
Bonjour,

Je dirais que oui, mais il faut voir comment tu arrive à cette ligne (ADO/DAO, VB6 ?), car cette syntaxe n'est pas conseillée.

http://nhen0039.chez-alice.fr/index.php
0
cs_petchy Messages postés 710 Date d'inscription jeudi 20 février 2003 Statut Membre Dernière intervention 19 mai 2015 3
31 déc. 2008 à 12:41
Re
se code vient d'un code de VB6
Set rs = New ADODB.Recordset
    rs.Open "SELECT * FROM centre_aéré WHERE Num_ctr=" & Codepsa, Db, adOpenDynamic, adLockOptimistic
'-- rempli les champs text avec les données de la base
   rensei(0) = rs!nomenfant_ctr"
car j'essaye de refaire un prog en VB9,mais c'est tellement diférent.
petchy
0
cs_petchy Messages postés 710 Date d'inscription jeudi 20 février 2003 Statut Membre Dernière intervention 19 mai 2015 3
31 déc. 2008 à 17:36
bonsoir
merci pour ta réponse,
j'ai trouver une source intéréssante,que je vais certainement adapter.
http://www.vbfrance.com//code.aspx?ID=48468
bon réveillon
petchy
0