Forums Últimos mensajes - Powered by IBM
 
Tags Palabras claves

Problemas con PWS

18/06/2004 - 17:46 por Fernando Uranga | Informe spam
Ayuda Hacer una pregunta
Muy buenas.

En un portátil que usamos como servidor de pruebas con Win2000
Proffesional tenemos instalado Pws 5.0 sp 4. De un día para otro ha
dejado de funcionar. Al intentar abrir culaquier página html o ASP me
dice que hay demasiados usuarios conectados, aunque no es así. Si
aumento el número de usuarios en PWS me abre los html pero los ASP's se
quedan fritos, aunque sea un ASP tan simple como el Hello Wold.

¿A alguien el suena este problema?

Gracias de antemano y un saludo.

Fernando Uranga.
email Siga el debateRespuesta 5 respuestasRespuesta Tengo una respuesta

Preguntas similare

Leer las respuestas

#1 Jorge Oblitas
19/06/2004 - 00:57 | Informe spam
Pareece que se estan quedqndo colgadas tus conexiones... antes de pasar a
resolver el problema quisiera comprobar eso. Si reseteas el servidor el
problema desaparece?

Saludos

Jorge Oblitas

"Fernando Uranga" wrote in message
news:
Muy buenas.

En un portátil que usamos como servidor de pruebas con Win2000
Proffesional tenemos instalado Pws 5.0 sp 4. De un día para otro ha
dejado de funcionar. Al intentar abrir culaquier página html o ASP me
dice que hay demasiados usuarios conectados, aunque no es así. Si
aumento el número de usuarios en PWS me abre los html pero los ASP's se
quedan fritos, aunque sea un ASP tan simple como el Hello Wold.

¿A alguien el suena este problema?

Gracias de antemano y un saludo.

Fernando Uranga.

Respuesta Responder a este mensaje
#2 Jorge Oblitas
21/06/2004 - 19:17 | Informe spam
Voy a ver el codigo. Es probable que estes dejando componentes o recursos en
general sin cerrar o eliminar. Esos se estan acumulando y lelga un momento
en que sobrepasan el numero de conexiones simultaneas que tiene el PWS, que
no debe ser muy grande.

Consejos:

1. revisa el codigo de tu aplicacion y asegurate de cerrar conexiones
2. El tiempo de timeoout de tus aplicaciones setealo al minimo necesario
3. Trata de usar IIS en lugar de PWS

Jorge Oblitas


"Fernando Uranga" wrote in message
news:
Buenas:

Ya no dice lo del número de usuarios, pero los ASP's que usamos para
abrir documentos se quedan irremediablemente colgados.

Ta mando anexo el ASP en cuestión.

Un saludo y gracias.

Fernando Uranga



Jorge Oblitas escribió:
> Pareece que se estan quedqndo colgadas tus conexiones... antes de pasar


a
> resolver el problema quisiera comprobar eso. Si reseteas el servidor el
> problema desaparece?
>
> Saludos
>
> Jorge Oblitas
>
> "Fernando Uranga" wrote in message
> news:
>
>>Muy buenas.
>>
>>En un portátil que usamos como servidor de pruebas con Win2000
>>Proffesional tenemos instalado Pws 5.0 sp 4. De un día para otro ha
>>dejado de funcionar. Al intentar abrir culaquier página html o ASP me
>>dice que hay demasiados usuarios conectados, aunque no es así. Si
>>aumento el número de usuarios en PWS me abre los html pero los ASP's se
>>quedan fritos, aunque sea un ASP tan simple como el Hello Wold.
>>
>>¿A alguien el suena este problema?
>>
>>Gracias de antemano y un saludo.
>>
>>Fernando Uranga.
>>
>
>
>






-
-


<%option explicit%>
<%response.expires=0%>
<%response.buffer = false %>
<html>
<head>
<title></title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">

</head>
<body>
<form name=Formulario>
<%
Dim Test ,sql,conn,nombrefichero
Dim parametrocodint, parametrocodacc, parametronumero
Dim parametrocodniv1, parametrocodniv2, parametrocodniv3
Dim parametrocodaccn1, parametrocodaccn2, parametrocodaccn3
Dim tdatos,resultado,codint,codacc,numero,path,fallo

nombrefichero = request("ARCHIVO")
parametrocodint = request("CODINT")
parametrocodniv1 = request("CODNIV1")
parametrocodniv2 = request("CODNIV2")
parametrocodniv3 = request("CODNIV3")
parametrocodacc = request("CODACC")
parametrocodaccn1 = request("CODACCN1")
parametrocodaccn2 = request("CODACCN2")
parametrocodaccn3 = request("CODACCN3")
parametronumero = request("NUMERO")

Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open application("Conexion")

fallo = 0

if isnull(parametrocodint) or parametrocodint="" then
parametrocodint =""
fallo = 1
end if

if isnull(parametrocodniv1) or parametrocodniv1="" then
parametrocodniv1 =""
fallo = 1
end if

if isnull(parametrocodniv2) or parametrocodniv2="" then
parametrocodniv2 =""
fallo = 1
end if

if isnull(parametrocodniv3) or parametrocodniv3="" then
parametrocodniv3 =""
fallo = 1
end if

if isnull(parametrocodacc) or parametrocodacc="" then
parametrocodacc =""
fallo = 1
end if

if isnull(parametrocodaccn1) or parametrocodaccn1="" then
parametrocodaccn1 =""
fallo = 1
end if
if isnull(parametrocodaccn2) or parametrocodaccn2="" then
parametrocodaccn2 =""
fallo = 1
end if
if isnull(parametrocodaccn3) or parametrocodaccn3="" then
parametrocodaccn3 =""
fallo = 1
end if

if isnull(parametronumero) or parametronumero="" then
parametronumero =""
fallo = 1
end if

if isnull(nombrefichero) or nombrefichero="" then
nombrefichero =""
fallo = 1
end if
'response.write"<br> fallo " & fallo & "<br>"
'response.write"<br> parametrocodint " & parametrocodint & "<br>"
'response.write"<br> parametrocodniv1 " & parametrocodniv1 & "<br>"
'response.write"<br> parametrocodniv2 " & parametrocodniv2 & "<br>"
'response.write"<br> parametrocodniv3 " & parametrocodniv3 & "<br>"
'response.write"<br> parametrocodacc " & parametrocodacc & "<br>"
'response.write"<br> parametrocodaccn1 " & parametrocodaccn1 & "<br>"
'response.write"<br> parametrocodaccn2 " & parametrocodaccn2 & "<br>"
'response.write"<br> parametrocodaccn3 " & parametrocodaccn3 & "<br>"
'response.write"<br> parametronumero " & parametronumero & "<br>"
'response.write"<br> nombrefichero " & nombrefichero & "<br>"
'response.write application("dirdocumentos") & "<br>"

if fallo = 0 then
Set Test = Server.CreateObject("Blobsora.UserControl1")
resultado Test.ExtraerCorpCDO(application("ConexionOle"),application("BaseDatos"),cstr


(parametrocodint),cstr(parametrocodniv1),cstr(parametrocodniv2),cstr(paramet
rocodniv3),cstr(parametrocodacc),cstr(parametrocodaccn1),cstr(parametrocodac
cn2),cstr(parametrocodaccn3),cstr(parametronumero),application("dirdocumento
s")& cstr(nombrefichero),1)
Set Test = Nothing
end if
Conn.close
%>

</form>
</body>
</html>

<%
if fallo=0 then
response.write "<script>location=(


'"&application("httpdocumentos")&""&nombrefichero&"');</script>"
end if
%>
Respuesta Responder a este mensaje
#3 Fernando Uranga
22/06/2004 - 10:24 | Informe spam
Gracias. Me pondré en ello.

Fernando.

Jorge Oblitas escribió:
Voy a ver el codigo. Es probable que estes dejando componentes o recursos en
general sin cerrar o eliminar. Esos se estan acumulando y lelga un momento
en que sobrepasan el numero de conexiones simultaneas que tiene el PWS, que
no debe ser muy grande.

Consejos:

1. revisa el codigo de tu aplicacion y asegurate de cerrar conexiones
2. El tiempo de timeoout de tus aplicaciones setealo al minimo necesario
3. Trata de usar IIS en lugar de PWS

Jorge Oblitas


"Fernando Uranga" wrote in message
news:

Buenas:

Ya no dice lo del número de usuarios, pero los ASP's que usamos para
abrir documentos se quedan irremediablemente colgados.

Ta mando anexo el ASP en cuestión.

Un saludo y gracias.

Fernando Uranga



Jorge Oblitas escribió:

Pareece que se estan quedqndo colgadas tus conexiones... antes de pasar





a

resolver el problema quisiera comprobar eso. Si reseteas el servidor el
problema desaparece?

Saludos

Jorge Oblitas

"Fernando Uranga" wrote in message
news:


Muy buenas.

En un portátil que usamos como servidor de pruebas con Win2000
Proffesional tenemos instalado Pws 5.0 sp 4. De un día para otro ha
dejado de funcionar. Al intentar abrir culaquier página html o ASP me
dice que hay demasiados usuarios conectados, aunque no es así. Si
aumento el número de usuarios en PWS me abre los html pero los ASP's se
quedan fritos, aunque sea un ASP tan simple como el Hello Wold.

¿A alguien el suena este problema?

Gracias de antemano y un saludo.

Fernando Uranga.













-
-



<%option explicit%>
<%response.expires=0%>
<%response.buffer = false %>
<html>
<head>
<title></title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">

</head>
<body>
<form name=Formulario>
<%
Dim Test ,sql,conn,nombrefichero
Dim parametrocodint, parametrocodacc, parametronumero
Dim parametrocodniv1, parametrocodniv2, parametrocodniv3
Dim parametrocodaccn1, parametrocodaccn2, parametrocodaccn3
Dim tdatos,resultado,codint,codacc,numero,path,fallo

nombrefichero = request("ARCHIVO")
parametrocodint = request("CODINT")
parametrocodniv1 = request("CODNIV1")
parametrocodniv2 = request("CODNIV2")
parametrocodniv3 = request("CODNIV3")
parametrocodacc = request("CODACC")
parametrocodaccn1 = request("CODACCN1")
parametrocodaccn2 = request("CODACCN2")
parametrocodaccn3 = request("CODACCN3")
parametronumero = request("NUMERO")

Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open application("Conexion")

fallo = 0

if isnull(parametrocodint) or parametrocodint="" then
parametrocodint =""
fallo = 1
end if

if isnull(parametrocodniv1) or parametrocodniv1="" then
parametrocodniv1 =""
fallo = 1
end if

if isnull(parametrocodniv2) or parametrocodniv2="" then
parametrocodniv2 =""
fallo = 1
end if

if isnull(parametrocodniv3) or parametrocodniv3="" then
parametrocodniv3 =""
fallo = 1
end if

if isnull(parametrocodacc) or parametrocodacc="" then
parametrocodacc =""
fallo = 1
end if

if isnull(parametrocodaccn1) or parametrocodaccn1="" then
parametrocodaccn1 =""
fallo = 1
end if
if isnull(parametrocodaccn2) or parametrocodaccn2="" then
parametrocodaccn2 =""
fallo = 1
end if
if isnull(parametrocodaccn3) or parametrocodaccn3="" then
parametrocodaccn3 =""
fallo = 1
end if

if isnull(parametronumero) or parametronumero="" then
parametronumero =""
fallo = 1
end if

if isnull(nombrefichero) or nombrefichero="" then
nombrefichero =""
fallo = 1
end if
'response.write"<br> fallo " & fallo & "<br>"
'response.write"<br> parametrocodint " & parametrocodint & "<br>"
'response.write"<br> parametrocodniv1 " & parametrocodniv1 & "<br>"
'response.write"<br> parametrocodniv2 " & parametrocodniv2 & "<br>"
'response.write"<br> parametrocodniv3 " & parametrocodniv3 & "<br>"
'response.write"<br> parametrocodacc " & parametrocodacc & "<br>"
'response.write"<br> parametrocodaccn1 " & parametrocodaccn1 & "<br>"
'response.write"<br> parametrocodaccn2 " & parametrocodaccn2 & "<br>"
'response.write"<br> parametrocodaccn3 " & parametrocodaccn3 & "<br>"
'response.write"<br> parametronumero " & parametronumero & "<br>"
'response.write"<br> nombrefichero " & nombrefichero & "<br>"
'response.write application("dirdocumentos") & "<br>"

if fallo = 0 then
Set Test = Server.CreateObject("Blobsora.UserControl1")
resultado >


Test.ExtraerCorpCDO(application("ConexionOle"),application("BaseDatos"),cstr
(parametrocodint),cstr(parametrocodniv1),cstr(parametrocodniv2),cstr(paramet
rocodniv3),cstr(parametrocodacc),cstr(parametrocodaccn1),cstr(parametrocodac
cn2),cstr(parametrocodaccn3),cstr(parametronumero),application("dirdocumento
s")& cstr(nombrefichero),1)

Set Test = Nothing
end if
Conn.close
%>

</form>
</body>
</html>

<%
if fallo=0 then
response.write "<script>location=(



'"&application("httpdocumentos")&""&nombrefichero&"');</script>"

end if
%>





Respuesta Responder a este mensaje
#4 Jorge Oblitas
22/06/2004 - 17:12 | Informe spam
Debes cerrar TEST, pues aunque sea nothing igual ocupa espacio. Hacer un
nothing a COnn tambien ayudaria

Jorge

"Fernando Uranga" wrote in message
news:
Gracias. Me pondré en ello.

Fernando.

Jorge Oblitas escribió:
> Voy a ver el codigo. Es probable que estes dejando componentes o


recursos en
> general sin cerrar o eliminar. Esos se estan acumulando y lelga un


momento
> en que sobrepasan el numero de conexiones simultaneas que tiene el PWS,


que
> no debe ser muy grande.
>
> Consejos:
>
> 1. revisa el codigo de tu aplicacion y asegurate de cerrar conexiones
> 2. El tiempo de timeoout de tus aplicaciones setealo al minimo necesario
> 3. Trata de usar IIS en lugar de PWS
>
> Jorge Oblitas
>
>
> "Fernando Uranga" wrote in message
> news:
>
>>Buenas:
>>
>>Ya no dice lo del número de usuarios, pero los ASP's que usamos para
>>abrir documentos se quedan irremediablemente colgados.
>>
>>Ta mando anexo el ASP en cuestión.
>>
>>Un saludo y gracias.
>>
>>Fernando Uranga
>>
>>
>>
>>Jorge Oblitas escribió:
>>
>>>Pareece que se estan quedqndo colgadas tus conexiones... antes de pasar
>>
> a
>
>>>resolver el problema quisiera comprobar eso. Si reseteas el servidor el
>>>problema desaparece?
>>>
>>>Saludos
>>>
>>>Jorge Oblitas
>>>
>>>"Fernando Uranga" wrote in message
>>>news:
>>>
>>>
>>>>Muy buenas.
>>>>
>>>>En un portátil que usamos como servidor de pruebas con Win2000
>>>>Proffesional tenemos instalado Pws 5.0 sp 4. De un día para otro ha
>>>>dejado de funcionar. Al intentar abrir culaquier página html o ASP me
>>>>dice que hay demasiados usuarios conectados, aunque no es así. Si
>>>>aumento el número de usuarios en PWS me abre los html pero los ASP's


se
>>>>quedan fritos, aunque sea un ASP tan simple como el Hello Wold.
>>>>
>>>>¿A alguien el suena este problema?
>>>>
>>>>Gracias de antemano y un saludo.
>>>>
>>>>Fernando Uranga.
>>>>
>>>
>>>
>>>
>>
>
>

> -
>
>
>
>><%option explicit%>
>><%response.expires=0%>
>><%response.buffer = false %>
>><html>
>><head>
>><title></title>
>><meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
>>
>></head>
>><body>
>><form name=Formulario>
>><%
>>Dim Test ,sql,conn,nombrefichero
>>Dim parametrocodint, parametrocodacc, parametronumero
>>Dim parametrocodniv1, parametrocodniv2, parametrocodniv3
>>Dim parametrocodaccn1, parametrocodaccn2, parametrocodaccn3
>>Dim tdatos,resultado,codint,codacc,numero,path,fallo
>>
>>nombrefichero = request("ARCHIVO")
>>parametrocodint = request("CODINT")
>>parametrocodniv1 = request("CODNIV1")
>>parametrocodniv2 = request("CODNIV2")
>>parametrocodniv3 = request("CODNIV3")
>>parametrocodacc = request("CODACC")
>>parametrocodaccn1 = request("CODACCN1")
>>parametrocodaccn2 = request("CODACCN2")
>>parametrocodaccn3 = request("CODACCN3")
>>parametronumero = request("NUMERO")
>>
>>Set Conn = Server.CreateObject("ADODB.Connection")
>>Conn.Open application("Conexion")
>>
>>fallo = 0
>>
>>if isnull(parametrocodint) or parametrocodint="" then
>>parametrocodint =""
>>fallo = 1
>>end if
>>
>>if isnull(parametrocodniv1) or parametrocodniv1="" then
>>parametrocodniv1 =""
>>fallo = 1
>>end if
>>
>>if isnull(parametrocodniv2) or parametrocodniv2="" then
>>parametrocodniv2 =""
>>fallo = 1
>>end if
>>
>>if isnull(parametrocodniv3) or parametrocodniv3="" then
>>parametrocodniv3 =""
>>fallo = 1
>>end if
>>
>>if isnull(parametrocodacc) or parametrocodacc="" then
>>parametrocodacc =""
>>fallo = 1
>>end if
>>
>>if isnull(parametrocodaccn1) or parametrocodaccn1="" then
>>parametrocodaccn1 =""
>>fallo = 1
>>end if
>>if isnull(parametrocodaccn2) or parametrocodaccn2="" then
>>parametrocodaccn2 =""
>>fallo = 1
>>end if
>>if isnull(parametrocodaccn3) or parametrocodaccn3="" then
>>parametrocodaccn3 =""
>>fallo = 1
>>end if
>>
>>if isnull(parametronumero) or parametronumero="" then
>>parametronumero =""
>>fallo = 1
>>end if
>>
>>if isnull(nombrefichero) or nombrefichero="" then
>>nombrefichero =""
>>fallo = 1
>>end if
>>'response.write"<br> fallo " & fallo & "<br>"
>>'response.write"<br> parametrocodint " & parametrocodint & "<br>"
>>'response.write"<br> parametrocodniv1 " & parametrocodniv1 & "<br>"
>>'response.write"<br> parametrocodniv2 " & parametrocodniv2 & "<br>"
>>'response.write"<br> parametrocodniv3 " & parametrocodniv3 & "<br>"
>>'response.write"<br> parametrocodacc " & parametrocodacc & "<br>"
>>'response.write"<br> parametrocodaccn1 " & parametrocodaccn1 & "<br>"
>>'response.write"<br> parametrocodaccn2 " & parametrocodaccn2 & "<br>"
>>'response.write"<br> parametrocodaccn3 " & parametrocodaccn3 & "<br>"
>>'response.write"<br> parametronumero " & parametronumero & "<br>"
>>'response.write"<br> nombrefichero " & nombrefichero & "<br>"
>>'response.write application("dirdocumentos") & "<br>"
>>
>>if fallo = 0 then
>> Set Test = Server.CreateObject("Blobsora.UserControl1")
>> resultado > >
>


Test.ExtraerCorpCDO(application("ConexionOle"),application("BaseDatos"),cstr
>


(parametrocodint),cstr(parametrocodniv1),cstr(parametrocodniv2),cstr(paramet
>


rocodniv3),cstr(parametrocodacc),cstr(parametrocodaccn1),cstr(parametrocodac
>


cn2),cstr(parametrocodaccn3),cstr(parametronumero),application("dirdocumento
> s")& cstr(nombrefichero),1)
>
>>Set Test = Nothing
>>end if
>>Conn.close
>>%>
>>
>></form>
>></body>
>></html>
>>
>><%
>>if fallo=0 then
>>response.write "<script>location=(
>
> '"&application("httpdocumentos")&""&nombrefichero&"');</script>"
>
>>end if
>>%>
>
>
>

Respuesta Responder a este mensaje
#5 Fernando Uranga
24/06/2004 - 13:58 | Informe spam
Ok, gracias. Tengo que probarlo.

Fernan.

Jorge Oblitas escribió:
Debes cerrar TEST, pues aunque sea nothing igual ocupa espacio. Hacer un
nothing a COnn tambien ayudaria

Jorge

"Fernando Uranga" wrote in message
news:

Gracias. Me pondré en ello.

Fernando.

Jorge Oblitas escribió:

Voy a ver el codigo. Es probable que estes dejando componentes o





recursos en

general sin cerrar o eliminar. Esos se estan acumulando y lelga un





momento

en que sobrepasan el numero de conexiones simultaneas que tiene el PWS,





que

no debe ser muy grande.

Consejos:

1. revisa el codigo de tu aplicacion y asegurate de cerrar conexiones
2. El tiempo de timeoout de tus aplicaciones setealo al minimo necesario
3. Trata de usar IIS en lugar de PWS

Jorge Oblitas


"Fernando Uranga" wrote in message
news:


Buenas:

Ya no dice lo del número de usuarios, pero los ASP's que usamos para
abrir documentos se quedan irremediablemente colgados.

Ta mando anexo el ASP en cuestión.

Un saludo y gracias.

Fernando Uranga



Jorge Oblitas escribió:


Pareece que se estan quedqndo colgadas tus conexiones... antes de pasar





a


resolver el problema quisiera comprobar eso. Si reseteas el servidor el
problema desaparece?

Saludos

Jorge Oblitas

"Fernando Uranga" wrote in message
news:



Muy buenas.

En un portátil que usamos como servidor de pruebas con Win2000
Proffesional tenemos instalado Pws 5.0 sp 4. De un día para otro ha
dejado de funcionar. Al intentar abrir culaquier página html o ASP me
dice que hay demasiados usuarios conectados, aunque no es así. Si
aumento el número de usuarios en PWS me abre los html pero los ASP's











se

quedan fritos, aunque sea un ASP tan simple como el Hello Wold.

¿A alguien el suena este problema?

Gracias de antemano y un saludo.

Fernando Uranga.

















-




<%option explicit%>
<%response.expires=0%>
<%response.buffer = false %>
<html>
<head>
<title></title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">

</head>
<body>
<form name=Formulario>
<%
Dim Test ,sql,conn,nombrefichero
Dim parametrocodint, parametrocodacc, parametronumero
Dim parametrocodniv1, parametrocodniv2, parametrocodniv3
Dim parametrocodaccn1, parametrocodaccn2, parametrocodaccn3
Dim tdatos,resultado,codint,codacc,numero,path,fallo

nombrefichero = request("ARCHIVO")
parametrocodint = request("CODINT")
parametrocodniv1 = request("CODNIV1")
parametrocodniv2 = request("CODNIV2")
parametrocodniv3 = request("CODNIV3")
parametrocodacc = request("CODACC")
parametrocodaccn1 = request("CODACCN1")
parametrocodaccn2 = request("CODACCN2")
parametrocodaccn3 = request("CODACCN3")
parametronumero = request("NUMERO")

Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open application("Conexion")

fallo = 0

if isnull(parametrocodint) or parametrocodint="" then
parametrocodint =""
fallo = 1
end if

if isnull(parametrocodniv1) or parametrocodniv1="" then
parametrocodniv1 =""
fallo = 1
end if

if isnull(parametrocodniv2) or parametrocodniv2="" then
parametrocodniv2 =""
fallo = 1
end if

if isnull(parametrocodniv3) or parametrocodniv3="" then
parametrocodniv3 =""
fallo = 1
end if

if isnull(parametrocodacc) or parametrocodacc="" then
parametrocodacc =""
fallo = 1
end if

if isnull(parametrocodaccn1) or parametrocodaccn1="" then
parametrocodaccn1 =""
fallo = 1
end if
if isnull(parametrocodaccn2) or parametrocodaccn2="" then
parametrocodaccn2 =""
fallo = 1
end if
if isnull(parametrocodaccn3) or parametrocodaccn3="" then
parametrocodaccn3 =""
fallo = 1
end if

if isnull(parametronumero) or parametronumero="" then
parametronumero =""
fallo = 1
end if

if isnull(nombrefichero) or nombrefichero="" then
nombrefichero =""
fallo = 1
end if
'response.write"<br> fallo " & fallo & "<br>"
'response.write"<br> parametrocodint " & parametrocodint & "<br>"
'response.write"<br> parametrocodniv1 " & parametrocodniv1 & "<br>"
'response.write"<br> parametrocodniv2 " & parametrocodniv2 & "<br>"
'response.write"<br> parametrocodniv3 " & parametrocodniv3 & "<br>"
'response.write"<br> parametrocodacc " & parametrocodacc & "<br>"
'response.write"<br> parametrocodaccn1 " & parametrocodaccn1 & "<br>"
'response.write"<br> parametrocodaccn2 " & parametrocodaccn2 & "<br>"
'response.write"<br> parametrocodaccn3 " & parametrocodaccn3 & "<br>"
'response.write"<br> parametronumero " & parametronumero & "<br>"
'response.write"<br> nombrefichero " & nombrefichero & "<br>"
'response.write application("dirdocumentos") & "<br>"

if fallo = 0 then
Set Test = Server.CreateObject("Blobsora.UserControl1")
resultado >>>







Test.ExtraerCorpCDO(application("ConexionOle"),application("BaseDatos"),cstr

(parametrocodint),cstr(parametrocodniv1),cstr(parametrocodniv2),cstr(paramet

rocodniv3),cstr(parametrocodacc),cstr(parametrocodaccn1),cstr(parametrocodac

cn2),cstr(parametrocodaccn3),cstr(parametronumero),application("dirdocumento

s")& cstr(nombrefichero),1)


Set Test = Nothing
end if
Conn.close
%>

</form>
</body>
</html>

<%
if fallo=0 then
response.write "<script>location=(



'"&application("httpdocumentos")&""&nombrefichero&"');</script>"


end if
%>











email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida