

![]() | Start a set with this search |
![]() | Include this search in one of my sets |
![]() | Exclude this search from one of my sets |
![]() | Permalink to these results Paste this link in email or IM: |
| Atom feed for tracking future search results Paste this URL into your reader: |
6 messages in org.openoffice.fr.prog[prog] Accès à une BDD Sqlite| From | Sent On | Attachments |
|---|---|---|
| Arnaud GUERIN (portable) | Jul 14, 2005 12:58 pm | |
| Laurent Godard | Jul 14, 2005 2:12 pm | |
| Arnaud GUERIN (portable) | Jul 14, 2005 2:22 pm | |
| Francois Gatto (xhydrogene) | Jul 14, 2005 3:02 pm | |
| Francois Gatto (xhydrogene) | Jul 14, 2005 3:12 pm | |
| Arnaud GUERIN (portable) | Jul 14, 2005 3:17 pm |

![]() | Permalink for this message Paste this link in email or IM: |
![]() | Permalink for this thread Paste this link in email or IM: |
| Atom feed for this thread Paste this URL into your reader: |
| Subject: | [prog] Accès à une BDD Sqlite | Actions... |
|---|---|---|
| From: | Arnaud GUERIN (portable) (ague...@free.fr) | |
| Date: | Jul 14, 2005 12:58:50 pm | |
| List: | org.openoffice.fr.prog | |
Bonjour à tous,
Le système: W2kSp4, Ooo114, sqlite3 (via ODBC 0.65)
Voila, j'ai créé une BDD avec SQLite Database Browser 1.2.1 sur un poste distant. J'ai installé sqlite avec le pilote ODBC, et configuré par la même occasion vers ma BDD.
Je veux me connecter à ma BDD pour exploiter les tables et j'ai repris les exemples du livre de programmation Ooo et du site. Jusque là rien d'extraordinaire:
Function ConnexionBDD() As Boolean Rem ************************************************************************* Rem * Connexion à la base de données de gestion de consommables Rem ************************************************************************* Dim oContexte As Object Rem Contexte de la source Dim oSource As Object Rem Source de données Dim sNomSource As String Rem Nom de le source de données Dim sLogin As String Rem Login utilisateur Dim sMotDePasse As String Rem Mot de passe utilisateur
Rem Création du contexte sNomSource = "GestionConso" Rem sNomSource = "BDD_GESTION_CONSO" oContexte = CreateUnoService ("com.sun.star.sdb.DataBaseContext") oSource = oContexte.GetByName (sNomSource)
Rem Paramètres de connexion sLogin = "" sMotDePasse = "" oBDDConso = oSource.GetConnexion (sLogin, sMotDePasse) If IsNull(oBDDConso) Then MsgBox ("Connexion impossible",16) ConnexionBDD = 0 Else ConnexionBDD = 1 End If End Function
Lorsque j'appelle la macro, j'ai un message d'erreur "RunTime Error Basic. Variable d'objet non paramétré". J'avoue que je ne comprends pas cette erreur.
Un peu d'aide s'il vous plait, merci.
-- ++-----------------------------------++ !! Arnaud GUERIN !! !! (Portable) !! !! ague...@free.fr !! ++-----------------------------------++
--- Antivirus avast! : message Sortant sain. Base de donnees virale (VPS) : 0528-4, 14/07/2005 Analyse le : 14/07/2005 21:59:12 avast! - copyright (c) 1988-2005 ALWIL Software. http://www.avast.com







