Erreur de syntax ? ou de Dim ?? plz need help

Résolu
cs_Darm
Messages postés
5
Date d'inscription
jeudi 10 avril 2008
Statut
Membre
Dernière intervention
7 août 2009
- 7 août 2009 à 12:16
nhervagault
Messages postés
6063
Date d'inscription
dimanche 13 avril 2003
Statut
Modérateur
Dernière intervention
15 juillet 2011
- 7 août 2009 à 12:59
Bon j'en peu plus j'ai beau regarder partout, j'ai beau essayé plein de truc je comprend pas chez les autres ça marche mais pas chez moi, c'est pourquoi je pense que j'ai du oublier un truc, mais quoi donc ???

Merci d'avance pour votre aide.

Je suis sous Access 2007
Mon problème, je reçois la fameuse erreur "too few parameters expected 1"
J'ai deja essayé plein de truc vu sur des forum, pcq je suis loin d'etre le seul à l'avoir eu, mais je sais pas ça marche pas chez moi


Function champoktest()

Dim devnameVal As String
Dim db As DAO.Database
Dim rst As Recordset
Dim devnameeval As String

DoCmd.Close acTable, "site"

Set db = CurrentDb
    '''' recuperation du champ
devnameVal = Forms![champOK].[devname].Value
    '''' definition de la requete sql
sql1 = "SELECT site.site FROM site Where " & devnameVal & " Like site.site & '*'"
    '''' execution de la requete
Set rst = db.OpenRecordset(sql1, adOpenDynamic, adLockReadOnly)
    '''' on verifie si site a la bonne syntax
If rst.RecordCount = 0 Then
    '''' si ce n'est pas le cas message d'erreur
MsgBox ("La Syntax du site n'est pas bonne dans " & devnameVal)

Else
rstfield = rst.Fields(0).Name
MsgBox (& rstfield & " ok Dans " & devnameVal)
End If
End Function




Merci d'avance
A voir également:

2 réponses

cs_Darm
Messages postés
5
Date d'inscription
jeudi 10 avril 2008
Statut
Membre
Dernière intervention
7 août 2009

7 août 2009 à 12:52
Ok ben probleme résolu, ça fait deux jours que je suis dessus, et la je tombe sur une page je test et ça marche la soluce :

"SELECT site.site FROM site Where '" & devnameVal & "' Like site.site & '*'"


Guillemets simple avant " & devnameVal & "
3
nhervagault
Messages postés
6063
Date d'inscription
dimanche 13 avril 2003
Statut
Modérateur
Dernière intervention
15 juillet 2011
35
7 août 2009 à 12:59
Salut

Test ta requete dans access directement ca permet de gagner du temps

SELECT site.site FROM site Where " & devnameVal & " Like site.site & '*'"

est faux

SELECT site.site FROM site Where " & devnameVal & " Like 'site.site*'"

Est normalement la solution
0