Discussion :

[petitclem]

Bonjour à tous,

je souhaiterai exécuter un script php sur un serveur sans ouvrir le navigateur.

J'ai essayé avec la méthode ShellExecute mais il m'ouvre le navigateur web !

Et, je suis en train d'essayer avec le composant IdHTTP et sa méthode Post mais j'ai du mal à savoir l'utiliser. J'ai beau chercher de l'aide ou des exemple là dessus mais sans succès.

Merci d'avance pour vos réponses et à bientôt !

[sat83]

Si tu souhaite simplement masquer le navigateur, tu peux utiliser le paramètre SW_HIDE avec ShellExecute...

[petitclem]

Bonjour sat83,

j'ai essayé comme ceci :

Code :

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

1
2
 
ShellExecute (NULL, "open" , URL.c_str(), 0, 0, SW_HIDE);

Mais le navigateur s'ouvre quand même !!!

[Crayon]

Tu pourrais utiliser le composant TCppWebBrowser.

[petitclem]

Merci Crayon,

j'ai utilisé TWebBrowser et ça fonctionne.

Par contre, à partir d'une URL où se trouve un fichier .ini, je souhaiterai faire un get avec je pense le composant IdHTTP mais je ne sais pas comment récupérer les infos à l'intérieur sans l'importer sur la machine.

[Crayon]

Je en sais pas si c'est important pour toi, mais je n'ai jamais été capable de dépasser mon proxy avec le composant TIdHTTP. C'est pourquoi j'utilise THttpCli et/ou TSslHttpCli de OverByte: http://www.overbyte.be/frame_index.html

[petitclem]

Bonjour à tous,

j'ai utilisé le composant IdHTTP et j'ai réussi à accéder au fichier ini distant.
Le soucis est que pour pouvoir lire les infos à l'intérieur, je suis obligé de le rapatrier sur ma machine !

N'y aurait il pas une méthode pour le lire sans le sauvegarder sur ma machine ?

Voici mon code :

Code :

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

1
2
3
4
5
 
TMemoryStream * Mem = new TMemoryStream();
IdHTTP_INI->Get(URL_INI, Mem);
Mem->SaveToFile("fichier.ini");
delete Mem;

[Crayon]

Tu mets déjà le fichier dans TMemoryStream, pourquoi tu ne mets pas le résultats dans un buffer avec Mem->Write()?

Je ne sais pas trop les détails de ton fichier, mais voici des fonctions que tu peux utiliser (c'est juste une piste il manque des morceaux):

Code :

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

1
2
3
4
TBytes BytesBuffer;
AnsiString Buffer;
Mem->Write(BytesBuffer, XXXX);
Buffer = BytesToString(BytesBuffer, 0, XXXX, en8Bit);

[petitclem]

Merci Crayon,

je planche là dessus.

Une autre petite question, j'effectue un ping sur un site à l'aide de la commande "system".

Code :

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

1
2
 
system("ping -n 1 www.google.fr");

Comment faire pour faire ceci en tâche de fond ?
Lorsque j'effectue cette commande, il m'affiche la fenêtre ms-dos l'espace d'une seconde et je souhaiterai qu'elle n'apparaisse pas.

[cedni]

Slt

Code :

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

1
2
 
ShellExecute(0,"","cmd.exe","ping.exe -n 1 www.google.fr >resultat.txt",NULL, SW_HIDE );

Non ?

[petitclem]

Salut à tous,

Cedni, j'ai essayé ta commande ShellExecute mais aucun fichier ne se créé !!!

[Crayon]

Étant donnée que tu utilises déjà Indy, pourquoi tu n'ajoutes pas un composant TIdIcmpClient à ton programme.

Pour faire le ping tu fais:

Code :

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

1
2
    IdIcmpClient1->ReceiveTimeout = 1000;
    IdIcmpClient1->Ping("www.google.fr", 0);

Ensuite dans l'évènement OnReply:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
    AnsiString sTime;
    if(AReplyStatus->MsRoundTripTime == 0)
        sTime = "<1";
    else
        sTime = "=";
 
    AnsiString Info;
    Info.sprintf("%d bytes from %s: icmp_seq=%d ttl=%d time%s%d ms",
        AReplyStatus->BytesReceived,
        AnsiString(AReplyStatus->FromIpAddress),
        AReplyStatus->SequenceId,
        AReplyStatus->TimeToLive,
        sTime,
        AReplyStatus->MsRoundTripTime);

Ensuite tu fais ce que tu veux de la String Info.

Le code est un résumé rapide de Indy9Demos\PingGUI.

[petitclem]

Merci Crayon pour ton aide,

j'ai testé ce que tu m'as dit avec le composant TIdIcmpClient mais j'obtiens une erreur EidSocketError access denied à l'exécution de :

Code :

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

1
2
 
IdIcmpClient1->Ping("www.google.fr", 0);

Comment ça se fait ?

[cedni]

Salut

Tiens , voilà un code qui va bien

Code :

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

1
2
3
4
TStringList *RequeteCMDTemp = new TStringList();
RequeteCMDTemp->Add("ping.exe -n 1 www.google.fr >resultat.txt") ;
RequeteCMDTemp->SaveToFile("ping.bat") ;
ShellExecute(0,"","ping.bat","",NULL, SW_HIDE );

++

[Crayon]

j'obtiens une erreur EidSocketError access denied à l'exécution

J'ai trouvé ceci dans la doc:

For Windows NT and Windows 2000, administrator privileges are required to allow TIdICMPClient.Ping to work properly.

[petitclem]

Bonjour à tous,

mon problème est résolu, je l'ai solutionné par le composant TTcpClient !

Code :

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

1
2
3
4
5
6
7
8
9
10
 
        TcpClient->RemoteHost = "www.google.fr";
	bool Connexion = TcpClient->Connect();
 
	if (Connexion == true)
	{
		ShellExecute ( [...] );
	}
	else
		ShowMessage ("Erreur Connexion !");

Encore merci à tous et à bientôt !