Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

msgbox error "800a0046"

118 views
Skip to first unread message

Japhet Perez Atristain

unread,
Apr 2, 2003, 12:21:57 PM4/2/03
to
Buen Día.

tengo el siguiente codigo:

<%@ Language=VBScript %>
<%
response.buffer=true

linid= Request.QueryString("idelink")
nomuse= Request.QueryString("usern")
typeacc= Request.QueryString("tipo_ac")

msgbox nomuse

y me arroja el siguiente error:

Error de Microsoft VBScript en tiempo de ejecución error '800a0046'
Permiso denegado: 'msgbox'

/intraweb/admon.asp, line 9

alguien sabe que esta pasando?, porque no me deja usar esta funcion?
gracias por el apoyo que me puedan dar.
Saludos
--
--------------------------
Ing. Japhet Perez Atristain
Sistemas Computacionales
del Sureste
Puebla
Mexico

(Guía de netiquette del foro)
http://perso.wanadoo.es/rubenvigon/foro


jrcz

unread,
Apr 2, 2003, 12:33:54 PM4/2/03
to
Si no estoy mal del lado del servidor no puedes usar esta
función.

Japhet Perez Atristain

unread,
Apr 2, 2003, 12:42:50 PM4/2/03
to
Buen Dia.

Ah, muchas gracias por la info, pero
ahora, te pido que (como dicen aqui en mi tierra)
con manzanas y naranjas me expliques:

del lado del cliente si lo podre observar o como?

gracias!

Matias Iacono

unread,
Apr 2, 2003, 1:08:48 PM4/2/03
to
Como dijeron... al usar codigo que trabaja en el lado del servidor, solo
esta procesando los datos en el, asi que no podrias mostrar un mensajes al
cliente desde este codigo.

Lo que necesitas es usar JS.

Algo asi:

<%@ Language=VBScript %>
<%
response.buffer=true

linid= Request.QueryString("idelink")
nomuse= Request.QueryString("usern")
typeacc= Request.QueryString("tipo_ac")

%>
<script>
alert('<%=nomuse%>')
</script>
<%
Sigue el codigo ASP
%>

"Japhet Perez Atristain" <japhetp (arroba) prodigy (punto) net (punto) mx>
wrote in message news:O2f809T#CHA....@TK2MSFTNGP12.phx.gbl...

Japhet Perez Atristain

unread,
Apr 2, 2003, 1:40:51 PM4/2/03
to
Gracias grupo... una pregunta mas...

o sea que esto:

linid= Request.QueryString("idelink")
nomuse= Request.QueryString("usern")
typeacc= Request.QueryString("tipo_ac")

if linid <> "" then
myvar1= msgbox("¿Esta seguro de eliminar el link " & linid
&"?",4116,"Eliminar de Base de Datos")
if myvar1=6 then
borrardbd(linid)
else
msgbox "No se borrara nada de la Base de Datos",64,"Operación Cancelada"
end if
end if

no jalara los msgbox para mis clientes?

Gracias GRUPO!!!

Matias Iacono

unread,
Apr 2, 2003, 1:45:28 PM4/2/03
to
Exacto

"Japhet Perez Atristain" <japhetp (arroba) prodigy (punto) net (punto) mx>
wrote in message news:ecnaodU#CHA....@TK2MSFTNGP11.phx.gbl...

Japhet Perez Atristain

unread,
Apr 2, 2003, 2:05:29 PM4/2/03
to
y podria alguno de ustedes darme una idea
de como hacer esa validacion por medio de ASP
o por js?

gracias por su apoyo!

Ne0

unread,
Apr 3, 2003, 1:30:27 AM4/3/03
to
Has de utilizar una mezcla de ambos asi
en la pagina donde estan los links

pondria la esto en donde corresponda, en un submit o lo k sea:
esta funcion va en la cabezera:

function borrar(id){
if confirm("esta seguro de borrar el link " + id + "?"){
document,nombreformulario.submit();
}else{
alert("No se borrara nada de la Base de Datos");
}
}

y donde este los links pondria en el evento onClink o en onChange si es un
checkbox, eso depende de ti

y para borrar los datos como lo haces tu pero sin pedir permiso ya que se lo
habias pedido antes:

linid= Request.QueryString("idelink")
nomuse= Request.QueryString("usern")
typeacc= Request.QueryString("tipo_ac")

if linid <> "" then
borrardbd(linid)
end if

Facil no?¿

----- Original Message -----
From: "Japhet Perez Atristain" <japhetp (arroba) prodigy (punto) net (punto)
mx>

"Japhet Perez Atristain" <japhetp (arroba) prodigy (punto) net (punto) mx>
escribió en el mensaje news:OYMXZrU#CHA....@TK2MSFTNGP10.phx.gbl...

Japhet Perez Atristain

unread,
Apr 3, 2003, 2:30:19 PM4/3/03
to
Buen Dia.

Gracias Neo0 (por aquello del arreglo de nick Neo)....
pues la verdad si se me habia ocurrido hacerlo asi, pero
queria ver si habia una forma mas estatica de hacerlo, pero
veo que en efecto tendra que ser como se me habia ocurrido!.

agradezco a todos los que me apoyaron en este hilo.

Quedo de ustedes..

0 new messages