Connexion à une base oracle par VB
Nguessan
-
Gentilgarçon -
Gentilgarçon -
Bonjour
SVP, j'ai un problème.
J'ai créé une base de données sur Oracle8 et j'ai developpé mes interfaces sur VB6. Je souhaiterais savoir comment mettre mes différents champs d'entrée en relation avec les tables de ma base.
Merci de m'aider!!!
SVP, j'ai un problème.
J'ai créé une base de données sur Oracle8 et j'ai developpé mes interfaces sur VB6. Je souhaiterais savoir comment mettre mes différents champs d'entrée en relation avec les tables de ma base.
Merci de m'aider!!!
A voir également:
- Connexion à une base oracle par VB
- Gmail connexion - Guide
- Base de registre - Guide
- Vb - Télécharger - Langages
- Connexion chromecast - Guide
- Gmail connexion autre compte - Guide
11 réponses
Public connexion As ADODB.Connection
Sub cnx_ora()
Set connexion = New ADODB.Connection
connexion.Provider = "MSDAORA.1"
connexion.Properties("Data Source").Value = "ta base de données"
connexion.Properties("User Id").Value = "ton identifiant"
connexion.Properties("Password").Value = "ton mot de passe"
connexion.Open
End Sub
Private Sub Form_Load()
'se connecter à la base de données Oracle
Call cnx_ora
Dim Rs_Oracle As New ADODB.Recordset
Dim req As String
req = " ta requête expl: select nom, prénom from ma_table;'"
Rs_Oracle.Open req, connexion
Do While Not Rs_Oracle.EOF
text1.text=text1.text + Rs_Oracle!nom & vbCrLf 'vbCrLf pour retourner à la ligne
text2.text=text2.text + Rs_Oracle!prénom & vbCrLf
Loop
.....
.....
End Sub
Bonne chance
Sub cnx_ora()
Set connexion = New ADODB.Connection
connexion.Provider = "MSDAORA.1"
connexion.Properties("Data Source").Value = "ta base de données"
connexion.Properties("User Id").Value = "ton identifiant"
connexion.Properties("Password").Value = "ton mot de passe"
connexion.Open
End Sub
Private Sub Form_Load()
'se connecter à la base de données Oracle
Call cnx_ora
Dim Rs_Oracle As New ADODB.Recordset
Dim req As String
req = " ta requête expl: select nom, prénom from ma_table;'"
Rs_Oracle.Open req, connexion
Do While Not Rs_Oracle.EOF
text1.text=text1.text + Rs_Oracle!nom & vbCrLf 'vbCrLf pour retourner à la ligne
text2.text=text2.text + Rs_Oracle!prénom & vbCrLf
Loop
.....
.....
End Sub
Bonne chance
merci de votre repanse mis uelle est le plus eficace .une interface vb avec une base acces ou bien interface vb avec base oracle
N'oubliez pas de
rajouter dans le menu Projets - Références, Microsoft AtiveX Data Objects 2.x Library.
Bonne chance
rajouter dans le menu Projets - Références, Microsoft AtiveX Data Objects 2.x Library.
Bonne chance
SVP, j'ai un problème.
J'ai créé une base de données sur Oracle9 et j'ai developpé mes interfaces sur VB6. Je souhaiterais savoir comment mettre mes différents champs d'entrée en relation avec les tables de ma base.
Merci de m'aider!!!
J'ai créé une base de données sur Oracle9 et j'ai developpé mes interfaces sur VB6. Je souhaiterais savoir comment mettre mes différents champs d'entrée en relation avec les tables de ma base.
Merci de m'aider!!!
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
Connect = "ODBC;DATABASE=MOKH;UID=" & (utilisateur) & ";PWD=" & mot_de_passe & ";DSN=projetoracle2"
Set db = OpenDatabase("", dbCriteriaUpdate, False, Connect)
Data_univ.DatabaseName = db.Name
Data_univ.RecordSource = "select * from universits where code_wilaya='" & Txt_wilaya & "' AND code_universite='" & Txt_Code_Univ & "' "
Set db = OpenDatabase("", dbCriteriaUpdate, False, Connect)
Data_univ.DatabaseName = db.Name
Data_univ.RecordSource = "select * from universits where code_wilaya='" & Txt_wilaya & "' AND code_universite='" & Txt_Code_Univ & "' "
http://www.supinfo-projects.com/fr/2004/connex_bdd_vb/3/
ce site contient tous les infos concernant votre probleme et merci
ce site contient tous les infos concernant votre probleme et merci
alors tu vois, c'est facile. il suffit de croire en ton pottentiel et après tout deviens possible. Aide toi et le ciel t'aiderai ( ezeiquiel 39 verset 8 )
Non serieusement, rentre dans le module CIP de la base de données et créé un checkpoint. Apres tu verras c'est assez intuitif, laisse toi aller, laisse toi guider par le codage informatique ; tu va prendre ton pied ;)
Non serieusement, rentre dans le module CIP de la base de données et créé un checkpoint. Apres tu verras c'est assez intuitif, laisse toi aller, laisse toi guider par le codage informatique ; tu va prendre ton pied ;)
c'est simple tient mon amis
* dans la propriété connect mis la chaine suivante : ODBC;DSN=oracle;UID=System;PWD=manager
* dans la propriété Recourdesource mis le nom de la table pae exemple tabla1
* donc il reste de relié les champ de texte avec leur valeur
utilisé la composant d'accés aux données DAO
remarque : ODBC c'est un interface qu'on peut créer des différents source de données tesl que oracle, sqlserveur,access..ect il se trouve dans panneau de configuration puis outils d'administration puis entrer les parametre nécessaire telque :
1-le nom de source de données DSN
2- UID : nom utilisateur
3-Service name ( le nom de la base oracle)
4-tester la connexion est entrer le user name "system" pour une base oracle
5-mot de passe
6-service name
a la prochaine
* dans la propriété connect mis la chaine suivante : ODBC;DSN=oracle;UID=System;PWD=manager
* dans la propriété Recourdesource mis le nom de la table pae exemple tabla1
* donc il reste de relié les champ de texte avec leur valeur
utilisé la composant d'accés aux données DAO
remarque : ODBC c'est un interface qu'on peut créer des différents source de données tesl que oracle, sqlserveur,access..ect il se trouve dans panneau de configuration puis outils d'administration puis entrer les parametre nécessaire telque :
1-le nom de source de données DSN
2- UID : nom utilisateur
3-Service name ( le nom de la base oracle)
4-tester la connexion est entrer le user name "system" pour une base oracle
5-mot de passe
6-service name
a la prochaine
Bonjour,
Après différents essais je souhaite partager une méthode pour obtenir une chaîne de connexion à employer pour une connexion ODBC comme dans l'exemple ci-après :
Conn = "DRIVER={Oracle in OraClient10g_home1};SERVER=server;UID=uid;PWD=pwd;DBQ=dbq;DBA=W;APA=T;EXC=F;XSM=Default;FEN=T;QTO=T;FRC=10;FDL=10;LOB=T;RST=T;BTD=F;BAM=IfAllSuccessful;NUM=NLS;DPM=F;MTS=T;MDI=Me;CSR=F;FWC=F;FBS=60000;TLO=O;"
Set Cn = New ADODB.Connection
With Cn
.ConnectionString = Conn
.CursorLocation = adUseClient
.Open
End With
Configuration : VBA Excel, base Oracle
Pour déterminer Conn et le tester, aller dans une feuille Excel quelconque temporaire puis :
o Menu : Données > Données externes > Importer des données > Nouvelle source...
* Type de source de données : Autres/Avancées
* Onglet Fournisseur : Microsoft OLE DB Provider for ODBC Drivers
* Onglet Connexion : Utiliser la chaîne de connexion > Créer
* Option : Nom de source de données > Nouveau...
* Pilote : votre pilote Oracle ODBC (Oracle in OraClient 10g_home1 dans mon cas)
* Nom : test
* Nom d'utilisateur : xxxxx
* Mot de passe : yyyyy
* Choisir test.dsn dans la liste proposée
* Redonner le mot de passe yyyyy
* La chaîne de connexion est désormais disponible : c'est cette chaîne qu'il faut fournir à la macro. En poursuivant l'essai (choix de la table, ...) on finit par tester la chaîne en récupérant des données concrètes de la base.
J'espère avoir pu être utile à certains de même que les contributions des forumers m'a aidé :-) Bon courage
Après différents essais je souhaite partager une méthode pour obtenir une chaîne de connexion à employer pour une connexion ODBC comme dans l'exemple ci-après :
Conn = "DRIVER={Oracle in OraClient10g_home1};SERVER=server;UID=uid;PWD=pwd;DBQ=dbq;DBA=W;APA=T;EXC=F;XSM=Default;FEN=T;QTO=T;FRC=10;FDL=10;LOB=T;RST=T;BTD=F;BAM=IfAllSuccessful;NUM=NLS;DPM=F;MTS=T;MDI=Me;CSR=F;FWC=F;FBS=60000;TLO=O;"
Set Cn = New ADODB.Connection
With Cn
.ConnectionString = Conn
.CursorLocation = adUseClient
.Open
End With
Configuration : VBA Excel, base Oracle
Pour déterminer Conn et le tester, aller dans une feuille Excel quelconque temporaire puis :
o Menu : Données > Données externes > Importer des données > Nouvelle source...
* Type de source de données : Autres/Avancées
* Onglet Fournisseur : Microsoft OLE DB Provider for ODBC Drivers
* Onglet Connexion : Utiliser la chaîne de connexion > Créer
* Option : Nom de source de données > Nouveau...
* Pilote : votre pilote Oracle ODBC (Oracle in OraClient 10g_home1 dans mon cas)
* Nom : test
* Nom d'utilisateur : xxxxx
* Mot de passe : yyyyy
* Choisir test.dsn dans la liste proposée
* Redonner le mot de passe yyyyy
* La chaîne de connexion est désormais disponible : c'est cette chaîne qu'il faut fournir à la macro. En poursuivant l'essai (choix de la table, ...) on finit par tester la chaîne en récupérant des données concrètes de la base.
J'espère avoir pu être utile à certains de même que les contributions des forumers m'a aidé :-) Bon courage
moi aussi j'aime avoir la methode avec laquelle je peut connecter les interfaces aux données tables employee avec nom prenom adresse matricule table congee avec date debut dat fin.....application de gestion de congee svp j n'ai aucune idée ei merci