BOBY49_FR
Messages postés2Date d'inscriptiondimanche 15 janvier 2006StatutMembreDernière intervention13 janvier 2007 13 janv. 2007 à 13:06
JE NE COMPREND PAS ? JE N'AI PAS DE LIGNE 18
Private Sub Form_Load()
On Error Resume Next
seconnecter
Set rsSite = New ADODB.Recordset
rsSite.Open "Select * From SITES", cn, 1, 2
Do Until rsSite.EOF
CmbSite.AddItem rsSite.Fields(1)
rsSite.MoveNext
Loop
rsSite.Close
Set rsSite = Nothing
End Sub
mortalino
Messages postés6786Date d'inscriptionvendredi 16 décembre 2005StatutMembreDernière intervention21 décembre 201118 13 janv. 2007 à 14:19
Salut,
lol DarkSidious
Boby49_fr, 1erement, le On Error Resume Next n'a pas lieu d'être, si t'as une erreur quelque part, il faut la gérer, et non l'occulter !
Ensuite, pour pouvoir te répondre il nous faut la procédure où tu insères les données dans ton second MSFlexGrid, avec si possible, la ligne où l'erreur apparait
@++
<hr size="2" width="100%" />
--Mortalino--
Le mystérieux chevalier, "Provençal, le Gaulois"
<!--