Ver Mensaje Individual
  #2 (permalink)  
Antiguo 11/07/2003, 12:34
Avatar de buliwyf
buliwyf
 
Fecha de Ingreso: diciembre-2001
Ubicación: Caracas
Mensajes: 221
Antigüedad: 23 años, 4 meses
Puntos: 1
<% 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
__________________
RTFM antes de preguntar...