L
Lakrom
Hi to all, how to put msgbox in this asp page, this send me a message
Denied permission: 'MsgBox'
<% Set Conn=server.createobject("ADODB.connection")
Conn.open application("StrConRuta")
set rs = Conn.Execute("select rut from encuestarutaparaiso where rut='" &
rut_usuario & "'")
if not rs.eof then
msgbox "Gracias por tu interes pera ya has respondido esta encuesta"
end if
Set rs= Conn.Execute("Select * from tabladatos where rut = '" & rut_usuario
& "'")
if rut_usuario<>"-" then
if not rs.eof then
session("rut")=rut_usuario
response.redirect("encuesta.asp")
else
msgbox "Tu no estás registrado"
response.Redirect("index.asp")
end if
else
msgbox "Tu no eres usuario"
response.Redirect("index.asp")
end if
Conn.Close
set rs = nothing
%>
Denied permission: 'MsgBox'
<% Set Conn=server.createobject("ADODB.connection")
Conn.open application("StrConRuta")
set rs = Conn.Execute("select rut from encuestarutaparaiso where rut='" &
rut_usuario & "'")
if not rs.eof then
msgbox "Gracias por tu interes pera ya has respondido esta encuesta"
end if
Set rs= Conn.Execute("Select * from tabladatos where rut = '" & rut_usuario
& "'")
if rut_usuario<>"-" then
if not rs.eof then
session("rut")=rut_usuario
response.redirect("encuesta.asp")
else
msgbox "Tu no estás registrado"
response.Redirect("index.asp")
end if
else
msgbox "Tu no eres usuario"
response.Redirect("index.asp")
end if
Conn.Close
set rs = nothing
%>