Discussion :

[carkiko]

Bonjour,

J'ai un petit problème, grâce à mon script VBS j'ouvre une page PHP qui effectue un traitement. Mais je souhaiterais que cela soit transparent pour l'utilisateur, c'est-à-dire qu'il ne voie pas l'affichage de la page PHP.
Est-ce possible ? Si oui, comment faire ...

Code VBS :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
 
value = demande
if codeRetour <> 1 then			
    value2 = 0
else 
    value2 = 1
    value3 = "Message d'erreur"
end if
 
if value <> "" AND value2 <> "" then
    ' Envoi des informations suite à l'exécution
    Set IE = CreateObject("InternetExplorer.Application")
    IE.visible = 0
    IE.navigate "http://localhost/test.php?numero_demande=""" & value & """" & "&" & "code_err=" &  """"  & value2 &  """"  & "&" & "message_err=" &  """"  & value3 &  """"
    IE.quit
    Set IE = Nothing
end if

Code PHP :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
 
$numD = (isset($_GET["numero_demande"])) ? $_GET["numero_demande"] : NULL;
$codeErr = (isset($_GET["code_err"])) ? $_GET["code_err"] : NULL;
$msgErr = (isset($_GET["message_err"])) ? $_GET["message_err"] : NULL;
// Traitement ...

Merci de votre aide !

[ProgElecT]

Salut

Pourquoi, ligne 13, IE.visible = 0 , à la rigueur IE.visible = False bien qu'inutile car par défaut suite à la création de l'instance InternetExplorer l'affichage ne devrait pas se faire.

[carkiko]

Salut

Pourquoi, ligne 13, IE.visible = 0 , à la rigueur IE.visible = False bien qu'inutile car par défaut suite à la création de l'instance InternetExplorer l'affichage ne devrait pas se faire.

Effectivement, cette ligne ne sert à rien.

Le problème que j'ai, c'est que quand le VBS appel le PHP avec les paramètres pour le GET cela ouvre la page PHP et je souhaiterais que celle-ci ne s'ouvre pas.

[ProgElecT]

Je suppose que tu as essayé de mettre IE.visible = False après la ligne IE.navigate et que cela n'a pas résolu le problème ?

[carkiko]

Je suppose que tu as essayé de mettre IE.visible = False après la ligne IE.navigate et que cela n'a pas résolu le problème ?

Exactement cela n'a rien changé. La page s'ouvre toujours...

[ProgElecT]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
If Value <> "" And value2 <> "" Then
    ' Envoi des informations suite à l'exécution
    Set IE = CreateObject("InternetExplorer.Application")
    IE.Visible = True: IE.Top = -IE.Height  ' <------------------ l'ajout -------------------
    IE.navigate "http://localhost/test.php?numero_demande=""" & Value & """" & "&" & "code_err=" & """" & value2 & """" & "&" & "message_err=" & """" & value3 & """"
    IE.quit
    Set IE = Nothing
End If

Des fois ......