Server.CreateObject error

[rodvilleda]

Hola todos. Estoy tratando de crear archivos txt via ASP usando el siguiente codigo que encontré en un tutorial

Código PHP:

  Const fsoForAppend = 8 
 
Dim objFSO 
Set objFSO = Server.CreateObject("Scripting.FileSystemObject") 
 
'Open the text file 
Dim objTextStream 
Set objTextStream = objFSO.OpenTextFile("C:\\Inetpub\\wwwroot\\file.txt", fsoForAppend) 
 
'Display the contents of the text file 
objTextStream.WriteLine "Hello, World!" 
objTextStream.WriteLine "This is fun!!" 
 
Close the file and clean up 
objTextStream.Close 
Set objTextStream = Nothing 
Set objFSO = Nothing  
   

ese codigo me ha funcionado bien en w2000 professional pero al llevarlo a XP Professional no me funciona No tira ningún error, sencillamente se "cuelga" , es decir, no da ningún resultado, ni siquera un error.

que sera???????


gracias de antemano

[Saruman]

prueba con este pa ve....

<%
dim FSO
dim oCarpeta
dim colFicheros
dim oFich
dim mivariable

set FSO = Server.CreateObject("Scripting.FileSystemObject")
set oCarpeta = FSO.GetFolder(Server.MapPath("estrellas"))
set colFicheros = oCarpeta.Files

set oFich = FSO.CreateTextFile( Server.MapPath("estrellas/archivo.txt"), True )

mivariable = "este es el texto que se guardara en el archivo."
oFich.WriteLine(mivariable)
oFich.Close
set oFich = nothing
%>

[rodvilleda]

no...... igual se cuelga..... Será algún problema con los derechos de escritura? En el mismo folder tengo una base de datos que puedo actualizar sin problema, no entiendo.....

[rodvilleda]

ya encontré el problema.... era Norton

http://support.microsoft.com/default...;EN-US;q295375


Saluditos ya me voy a dormir

[ToKaTa]

vaya, curioso.......gracias por poner la solucion rodvilleda , es bueno saberlo...



ToKaTa.