Alguien me ayude.. urgente!!

[cmartinezc75]

Tengo una pregunta !!1


requiero de mandar a escribir un archivo de texto al servidor... ya lo hago.. pero lo realiza automaticamente que entra a la pagina..
asi..
<%
'Crear Ficheros verificando su existencia para no borrarlo si ya esta creado.
'Crear Ficheros
set FSO = Server.CreateObject("Scripting.FileSystemObject")
If fso.FileExists (Server.MapPath("prueba.txt")) Then
response.write("El fichero ya existe")
else
'set oFich = FSO.CreateTextFile ( Server.MapPath("C:\pozo2"), True )
set oFich = FSO.CreateTextFile (("C:\arcims\website\exe-pozos\pozo"), True )
'oFich.WriteLine ("tak-1")
oFich.WriteLine (pozo)

'response.write("Se ha creado el fichero & ofich")
end if
%>

esto es automatico.. es decir... se ejecuta cuando entra a espa pagina.. pero necesito.. ejecutarlo yo... en cualquier momento.. dando click en alguna liga.. para que ejecute.. este proceso.. no se si el codigo de arriba deba de estar dentro de un script.. o algo por el estilo..

gracias... saludos

[buliwyf]

<% IF request("submit")<>"" then

'Crear Ficheros verificando su existencia para no borrarlo si ya esta creado.
'Crear Ficheros
set FSO = Server.CreateObject("Scripting.FileSystemObject")
If fso.FileExists (Server.MapPath("prueba.txt")) Then
response.write("El fichero ya existe")
else
'set oFich = FSO.CreateTextFile ( Server.MapPath("C:\pozo2"), True )
set oFich = FSO.CreateTextFile (("C:\arcims\website\exe-pozos\pozo"), True )
'oFich.WriteLine ("tak-1")
oFich.WriteLine (pozo)

'response.write("Se ha creado el fichero & ofich")
end if

else

%><input type=button value="Escribir Archivo" onclick="location.href='?submit=Escribir'">
<%end if%>

algo asi te podria servir

[rdorlando]

Pudes meter ese codigoi dentro de una funcion o procediminto y llamarla cuando lo nececites.

Podes hacer una funcion que debuelva una cadena
o podecer hacer un procedimiento que cundo lo llames
muestres el archivo.