Base de données ............Niveau -1

Question

Bonjour

Je suis perdu..  D&#233;sirant de faire une toute toute petite application JE RAME. J'ai bien qq supports des livres, vos commentaires, vos exemples......Enfin
Soit une application sur feuille excel que j'essaie de mettre en forme avec VB6.
Quelques noms, une notation par mois, un "pactole" &#224; se distribuer , pour certain FACILE..... Mais moi je coince j'ai telecharger qq exemples??? je lis et j'essaie d'aprendre mais entre 2 livres 4 conceptions 
ADO, ADDOC,ENVIRONNEMENT DATA , DAO , requete acces,requete dans l'application   je suis perdu...................Qulques conseils voir quelques lignes seraient les bienvenues ainsi que vos commentaires Merci Baous

cs_dragon · Answer

tu connais SQL ou pas ??? en partant &#231;a va permettre de savoir comment traiter ta connection. Moi je suis un fou de SQL lol, donc je programme 100% des requ&#234;tes, c,est plus rapide. Ceux qui connaissent pas SQL passe habituellement par des DATA ENVIRONNEMENT, bien que je le conseil pas vraiment.


------------------------------------------------- 
Dragon alias aussi Waxime mais bon, pas le gout de refaire un nouveau profil lol 
-------------------------------------------------

cs_baous · Answer

Bonjour
Merci de ta r&#233;ponse , je connais "un peu" les requetes SQL mais apres en avoir fait dans access, avoir creer une petite appli avec un bouquin Eyrolles acces aux base de donn&#233;es .....Je n'arrive pas a les replac&#233; dans vb6 a quelle moment ? et avec quel connection de base.? Merci de ta r&#233;ponse Cordialement Baous

cs_dan80 · Answer

voici une chaine de connectio adodb

Sub connection()
    Set cn1 = New ADODB.connection
    cn1.Provider = "Microsoft.Jet.Oledb.4.0"
    cn1.ConnectionString = chemin de ta base
    cn1.Open
End Sub

avant ta requete ou a l'ouverture de ton programme tu met:

connection

exemple de requete:

Dim Contacts As ADODB.Recordset
Dim SQLString as string
connectionSQLString "Select * from ContactsSocietes where CodeSociete " & CodeSociete.Text
Set Contacts = New ADODB.Recordset
Contacts.CursorLocation = adUseClient
Contacts.Open SQLString, cn1, adOpenDynamic, adLockOptimistic

access aux donn&#233;es:

Contacts.Fields(0).Value pour la premiere colonne
contacts.movenext   pour l'enregistrement suivant
contacts.movefirst    pour le premier enregistrement
contacts.movelast     pour le dernier enregistrement
contacts.recordcount     pour le nombre d'enregistrement

fais moi signe si t'a encore un probleme

cs_baous · Answer

Bonjour DAN80
Merci beaucoup......Je vais m'y mettre c'est clair et bien expliqu&#233;.....Promis pour le signe en cas de probl&#232;me. Cordialement Baous

cs_baous · Answer

Bonjour DAN80
C'est encore moi.........N'aurais tu pas sur VBFrance un exemple avec une base de donn&#233;es???  Merci Baous

Base de données ............Niveau -1

5 réponses

Discussions similaires