Appel Procédure Stockée Access depuis WinForm VB .Net en OLEDB

Recherche :

Mot : Pseudo : Filtrer
Bas de page
Auteur	Sujet : Appel Procédure Stockée Access depuis WinForm VB .Net en OLEDB

Floppy_AD

Bonjour,

Voilà mon problème (je simplifie pour rester clair):

J'ai une base access avec une requête qui utilise une fonction qui est dans un module :

Module :

Code :

Public Function changeNullEnVide(champ)
If (IsNull(champ)) Then
changeNullEnVide = ""
Else
changeNullEnVide = champ
End If
End Function

Requête "TEST" :

Code :

INSERT INTO TABLE2 (CHAMP1, CHAMP2)
SELECT CHAMP1, changeNullEnVide(CHAMP2) FROM TABLE1

Lorsque je lance la requete TEST depuis Access, tout va bien
Mais impossible de lancer cette requête (procédure stockée) depuis VB .Net avec OLEDB :

Code :

' on suppose que conn contient la connexion ouverte
Dim cmd As OleDbCommand
cmd = New OleDbCommand("TEST", conn)
cmd.CommandType = CommandType.StoredProcedure
cmd.ExecuteNonQuery()

Là, j'ai l'erreur :

Code :

Fonction 'changeNullEnVide' non définie dans l'expression.

Qu'est-je oublié ???

Merci d'avance...

Publicité

Floppy_AD

En attendant une solution qui fonctionne en OLEDB, j'utilise ca :

Citation :

Dim accApp As Access.Application

accApp = CreateObject("Access.application" )
accApp.OpenCurrentDatabase("base.mdb" )
accApp.DoCmd.OpenQuery("TEST)
accApp.Quit()
accApp = Nothing

Mais j'attends toujours vos propositions...

FlorentG

Sauf qu'avec la dernière solution, il faut Access d'installé sur le poste, c'est pas top

Sinon, pour exécuter la fonction "changeNullEnVide", c'est un peu louche Je crois pas que c'est nécéssaire du côté de .NET. Ca doit être pris en charge avec les requêtes paramétrées...

olivthill

Bonjour !

Access n'a pas de procédure stockée.
Access a du code VBA, mais il n'est pas possible de le lancer et de le faire s'interpreter en OLE ni avec l'automation. Peut-être avec une future version d'Access.

Par ailleurs, l'instruction NZ() permet de donner une valeur à un champ nul, et la sélection peut se faire avec :

SELECT CHAMP1, NZ(CHAMP2,"" ) FROM TABLE1

Message cité 1 fois

FlorentG

olivthill a écrit :

Access n'a pas de procédure stockée.

Si, en quelques sortes.

Floppy_AD

L'exemple changeNullEnVide n'est qu'un exemple.
Dans la réalité, c'est une fonction qui convertie une date issue de JD-Edwards vers une date au format classique...

Merci de vos réponses, mais ca ne résoud donc pas mon problème, de comment executer ma requete contenant une fonction à moi dedans...

Floppy_AD

Up pour une solution !!!

Message cité 1 fois

Mirolao

Floppy_AD a écrit :

Up pour une solution !!!

Bonjour, je suis nouveau sur ce forum. En fait je me suis inscrit aujourd'hui même (Jeudi 12 Février 2009).
J'ai une solution pour votre problème.
Il suffit d'utiliser la fonction IIF qui prend 3 parametres.
Syntaxe : IIF(Condition,valeur_de_retour_si_condition_vraie,valeur_de_retour_si_condition_fausse)

Faites comme suit:
SELECT CHAMP1, IIF(CHAMP2 IS NULL,'',CHAMP2) AS Alias_de_votre_choix FROM TABLE1.
Remarque : L'alias n'est obligatoire.

La fonction IIF teste la condition CHAMP2 IS NULL. Si celle-ci vrai, la fonction retourne '', sinon elle retourne la valeur de CHAMP2

J'espère que cette réponse vous aidera.
Salut !!

PS: Au fait, il y a toute une panoplie de fonction VB qui peuvent être utilisée dans les requêtes.
J'en donne quelques unes:
LEN(nom_du_champ) --> donne la longueur de la chaine de caractères
MID(nom_du_champ,index_départ,longueur_chaine) --> extrait la sous-chaine qui commence à la position index_départ et qui a pour longueur longueur_chaine
etc.

FORUM HardWare.fr

Programmation

VB/VBA/VBS

Appel Procédure Stockée Access depuis WinForm VB .Net en OLEDB

Sujets relatifs
[C# sous VS.NET] Développement pour PDA/Portable ??	Etats dans access : probleme de comptage de champs vides
comment afficher des données Access sur Excel ?	probleme Formulaire Access en plein écran
connection de plusieurs tables avec ado (access)	Problème de connection à SQL Server depuis ASP.NET
Fichier DBS et Access...?	Base access impossible à ouvrir "MSysDb" non trouvé...access 2003
[RESOLU] Supprimmer les droits sur une base ACCESS	[Access] Un "Conflit d'écriture" aléatoire plante tout
Plus de sujets relatifs à : Appel Procédure Stockée Access depuis WinForm VB .Net en OLEDB

Page générée en 0.027 secondes