De l'aide sur vbs

Version imprimable

05/08/2011, 14h44
deidoboy78

1 pièce(s) jointe(s)

De l'aide sur vbs

Bjr à tou(te)s, je suis un "Novice" sur le dev.. Pour l'instant j'utilise vbscript car mon prédécesseur l'utilisait dejà pour l'automatisation..
Mon client voudrais avoir un reporting hebdo sur un outil sur les différentes actions qui se sont déroulées ds une semaine.. Bref, je lui envoit un tableau html édité depuis mon script suite aux différentes actions définies sur celui-ci, le script se base sur 2 fichiers excel pour l'exécution et le retour d'infos souhaitées.. Cela marche bien, seulement le client voudra voir d'autre actions sur le tableau. et ces actions se basent sur un outil web qui fournies en infos une BDD.. J'ai donc reajuster mon script (voir Pj), mais cela ne marche pas. Merci de votre aide et explication!! Bne journée!!
les erreurs:
-Ligne (12,2) : objet requis "
- Ligne (17,1) : aucun texte de commande n'a été défini pour l'objet de commande
-Ligne (19,2) : objet requis "
-Ligne (20,2) : objet requis "
-Ligne (21,2) : objet requis "
-Ligne (24,1) : objet requis "
05/08/2011, 14h50
SfJ5Rpw8

montre nous le code des lignes concernées par ces messages d'erreur .. ( voir balises de [CODE] )

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
' OdbcDSN = "DSN=DNC;UID=sa;PWD="
Odbc = "Provider=SQLOLEDB;Data Source=nom_serveur" & _
"UID="";PWD="";DATABASE=nom_base"
' Remplace l'adresse IP par l'adresse IP de ton SQL SERVER ainsi que le nom de la base
 
Set connect = CreateObject("ADODB.Connection")
Set fso = CreateObject("Scripting.FileSystemObject")
 
connect.Open Odbc
 
Dim p3, resultSet, PROBLEM1M1
sql="SELECT max (*) FROM XXX" & _ 
"WHERE XXX=" & III & " and RRR = " & max(p3.XXX) & " " & from & " " & ((aaa)) & " " & (p3) & " " & where & " " & bbb = p3.number & ") & "";"
 
 
Set resultSet = connect.Execute(sql)
' WScript.Echo resultSet()
WScript.Echo resultSet.Fields(0)
NUMBER=resultSet.Fields(0)
resultSet.Close
connect.Close
 
WScript.Echo "Fin du Traitement OPALE : Le N° de Dossier " & NUMBER & _
" portant " & III & _
" a été mis à jour :" & XXX & " !"
 
Set resultSet = Nothing
Set connect = Nothing
Set fso = Nothing
WScript.Quit(0)

05/08/2011, 15h07
SfJ5Rpw8

tu aurais pu te limiter au lignes posant problème ..!

c'est quoi p3 ?
05/08/2011, 15h12
deidoboy78

Dsl pour les lignes..;)
P3 est une priorité par défaut à la base par rapport à l'info à afficher
Merci d'avance pour ton aide!
05/08/2011, 15h14
deidoboy78

ce je ne comprends réelement pas est : "objet requis "" devant la ligne cela signie quoi?
05/08/2011, 15h18
SfJ5Rpw8

Citation:

Envoyé par deidoboy78

ce je ne comprends réelement pas est : "objet requis "" devant la ligne cela signie quoi?

Tu utilise P3 comme un objet ... :aie: mais celui-ci n'est "créé" nulle-part...
05/08/2011, 15h20
deidoboy78

oui je pense que c'est un objet.. la requête m'a été fournie par mon chef de projet donc... :?
05/08/2011, 15h21
SfJ5Rpw8

je comprends toujours pas :

Citation:

Envoyé par deidoboy78

P3 est une priorité par défaut à la base par rapport à l'info à afficher

:koi:
05/08/2011, 15h27
deidoboy78

aahh.. Non, je voulais dir que P3 est une "propriété" liée à la BDD..Dsl!!
05/08/2011, 15h36
SfJ5Rpw8

s'il s'agit d'un élément de ta base de donnée à utiliser dans ta requête SQL , tu n'as pas à le déclarer dans ton code VB, et tout ce qui est dans ta requête SQL doit être encadré de guillemets.