Poser une question

Re: lancer une application deux Dim dans la même instruction

desolé de mettre autant de temps a repondre a une ame charitable.

access marche bien

avec les %20 et bien en fait y a plus d'erreur mais il ne se passe rien.


voici ma page en entiere:

<% titre="Choix des serveurs" %>

<!-- #include virtual="/ASP/search_and_find/Pages/_top.asp"-->
<center>
<% liste_server = array("FICHIER", "SQL2003", "TOUS")
%>

<%
sub lancerAppli()
dim command
command = Server.MapPath("exporter.exe")
parametres = "%20C:\Documents%20and%20Settings\taubrun\Mes%20documents\Stage\ASPe\search_and_find\config_exporter\export.ini%20GDSNB%20FICHIER"
response.Write command
dim leShell
On Error Resume Next
Set leShell = CreateObject("Wscript.shell")
leShell.run "cmd",0,True
Set leShell = nothing
response.Write "<br><table><tr><td>commande lancé</td></tr></table>"
end sub
%>

<FORM method="POST">
<% for i=0 to ubound(liste_server)%>
<input type="checkbox" name="server" value="<%=liste_server(i)%>"><% =liste_server(i) %>
<br>
<%next%>
<input type="Submit" value="OK">
</FORM>

<%
if Request.Form("server")<>"" Then
for k=1 to Request.Form("server").count
%>
<p>Vous avez choisi de mettre à jour les bases de données des serveurs:
<%
response.write Request.Form("server").item(k)
%><br>
<%
response.write " "
next
%>
Veuillez attendre la fin de l'éxécution d' Exporter.<br>
</p>
<%
lancerAppli

end if %>


<br>
<!-- #include virtual="/ASP/search_and_find/Pages/_btm.asp"-->

Réponses

Re: lancer une application deux Dim dans la même instruction  Oznog 17/8/2004