Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum. Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

Sujet : recherche dans une base access [ Divers / Débutants ] (mannanaesc)

mercredi 11 juin 2008 à 10:00:10 | recherche dans une base access

mannanaesc

bjs. j'essaie de chercher deux champs d'une base access avec vb6 mé ca marche pa. svp aidez moi. il faut ke je le fasse pour mon projet de stage de 1er cycle. voilà mon code:



RScomar.FindFirst "numcont =" & Text1.Text
If RScomar.NoMatch = False Then
RScomar.FindFirst "codim =" & Text2.Text  'c'est l'instruction qui ne marche pa
 If RScomar.NoMatch = False Then
 MsgBox "2ème étape : Ce numero existe déjà. tapez un autre", vbInformation, "Information"
 Text1.Text = ""
 Text2.Text = ""
 End If
 Else
 MsgBox "2ème étape : Ce numero n'existe pas, nous allons le rajouter à la liste", vbInformation, "Information"
 
RScomar.AddNew
RScomar("numcont") = Text1.Text
RScomar("codim") = Text2.Text
RScomar("caution") = Text3.Text
RScomar("sitcont") = Text4.Text
RScomar.Update
MsgBox ("Le contrat a été ajoutée.")
DBComar.Close
Set DBComar = OpenDatabase(App.Path & "\comar1.mdb")
Set RScomar = DBComar.OpenRecordset("Select * from contrat ")
Set SNcomar = DBComar.OpenRecordset("Select numcont,codim from contrat")
Command1.Enabled = True
RScomar.MoveLast
End If


merci pour votre aide

mercredi 11 juin 2008 à 12:57:31 | Re : recherche dans une base access

cboulas

Membre Club
Réponse acceptée !
essai avec : RScomar.FindFirst "codim ='" & Text2.Text & "'" 'c'est l'instruction qui ne marche pa


Chris...
Web : Firstruner


mercredi 11 juin 2008 à 13:42:49 | Re : recherche dans une base access

mannanaesc

merci pour l'idée. mé cette fois il passe directement pour m'afficher, dans tt les cas, le msgbox  Ce numero existe déjà. tapez un autre"

mercredi 11 juin 2008 à 13:45:24 | Re : recherche dans une base access

mannanaesc

slt. avec mon prg le msg d'erreur c'est: type de donnée incompatible dans l'expression du critere

mercredi 11 juin 2008 à 20:30:45 | Re : recherche dans une base access

cboulas

Membre Club
La réponse est toute faite : en gros par exemple tu essai de mettre du texte dans des chiffres

Chris...
Web : Firstruner


jeudi 12 juin 2008 à 08:37:41 | Re : recherche dans une base access

mannanaesc

bjs. merci pour votre premeire idée. ca y est tt a bien marché. yavé juste kelkes fotes de syntaxes. merci pour votre aide



Cette discussion est classé dans : access, base, rscomar, textrscomar, dbcomar


Répondre à ce message

Sujets en rapport avec ce message

acces à deux tables access en meme temps [ par mannanaesc ] bj. jveu testerl'existance de deux codes de deux tables differentes sous access avec vb6 mé g pa arriver à le faire.svp aider moi. mon code est:Set DB connexion a une base access 97 via vba 6.3 [ par sourire45 ] bonjour tout le monde!!!Voila je suis nouvelle dans le forum et débutante en vba..j ai un eapplication créer avec excel 97 et qui fait appel a une bas Création d'une base access à partir VB6 ? [ par chefinf ] Bonjour, Comment créer une nouvelle Base de données Access avec un code VB6? Pouvez vous me donner le code? Merci d'avance.. [ACCESS] Problème ActiveX [ par med_ali ] Bonjour...J'ai réaliser une base de donnée et des formulaire, que j'ai développer avec un c Access [ par timon23 ] Bonjour a tous J'aimerais savoir comment me connecter à ma base de donnée son nom est : Base.odb car je l'ai fait avec openofficePour l'instant je f vb6 + base donnée access [ par hajar205 ] Bonjour a tous j'ai une application vb6 je l'ai relier FolderBrowserDialog et access [ par blabap ] Bonjour a toutes et a tous,Ca doit etre la première fois que je pose une question sur ce site.Voila mon pb, je suis en train de développer une appli q Base access + VB6 [ par webnoc ] Bonjour, comment je puise verifier ma table s'il est vide ou non NB: base de donnees access + vb6


Nos sponsors

Sondage...

CalendriCode



Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel BAÏSE, Merci à Vincent pour ses précieux conseils
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés
Temps d'éxécution de la page : 0,546 sec

Google Coop CodeS-SourceS Google Coop CodeS-SourceS


Certaines images présentes sur le site (notament certains avatars) sont issues des collections IconShock, donc si vous souhaitez utiliser ces icons vous devez les acheter, ne les copiez pas et ne utilisez pas dans vos sites et applications sans les avoir commandé.