Forums Últimos mensajes - Powered by IBM
 
Tags Palabras claves

Novato, ayuda urgente

16/12/2003 - 17:11 por Alejandro | Informe spam
Ayuda Hacer una pregunta
Hola tengo este facil codigo, que en teoria no deberia
fallar..

opcion=Request.QueryString("opcion")
fsoForReading = 1

if (opcion=1) then

objFSO = Server.CreateObject
("Scripting.FileSystemObject")
objTextStream = objFSO.OpenTextFile
(Server.MapPath("test2.txt"), fsoForReading)
texto=objTextStream.ReadAll
objTextStream = Nothing
objTextStream.Close
objFSO = Nothing

else
objFSO = Server.CreateObject
("Scripting.FileSystemObject")
objTextStream = objFSO.OpenTextFile
(Server.MapPath("test1.txt"), fsoForReading)
texto=objTextStream.ReadAll
objTextStream = Nothing
objTextStream.Close
objFSO = Nothing
end if


el caso es que me da un: Object doesn't support this
property or method: 'objFSO'

Cual es la razon, por favor...
Gracias.
Alejandro
email Siga el debateRespuesta 1 respuestaRespuesta Tengo una respuesta
DRAGON AGE™: INQUISITION – Matadragones
 

Leer las respuestas

#1 A.Poblacion
17/12/2003 - 08:08 | Informe spam
El código tiene pinta de estar escrito en VBScript. No olvides que en este
lenguaje (a diferencia de C# o VB.Net) es obligatorio usar la palabra Set al
hacer una asignación de una referencia a un objeto.
Por ejemplo, donde dice "objFSO=Server.CreateObject
("Scripting.FileSystemObject")" lo que debe decir es "Set
objFSO=Server.CreateObject ("Scripting.FileSystemObject")" y lo mismo en el
resto de asignaciones a objFSO y objTextStream.


"Alejandro" wrote in message
news:0a9501c3c3ef$4540f1b0$
Hola tengo este facil codigo, que en teoria no deberia
fallar..

opcion=Request.QueryString("opcion")
fsoForReading = 1

if (opcion=1) then

objFSO = Server.CreateObject
("Scripting.FileSystemObject")
objTextStream = objFSO.OpenTextFile
(Server.MapPath("test2.txt"), fsoForReading)
texto=objTextStream.ReadAll
objTextStream = Nothing
objTextStream.Close
objFSO = Nothing

else
objFSO = Server.CreateObject
("Scripting.FileSystemObject")
objTextStream = objFSO.OpenTextFile
(Server.MapPath("test1.txt"), fsoForReading)
texto=objTextStream.ReadAll
objTextStream = Nothing
objTextStream.Close
objFSO = Nothing
end if


el caso es que me da un: Object doesn't support this
property or method: 'objFSO'

Cual es la razon, por favor...
Gracias.
Alejandro

Preguntas similares

 

Busqueda sugerida :