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) !!
!! [EMAIL PROTECTED] !!
++-----------------------------------++
---
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
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
