PhoEniXFirE

Bom dia galera do forum!! Fiquei com meu site fora do ar, por duas semanas, pois meu servidor de hospedagem perdeu um HD aonde estava meu site e de um monte de clientes e colegas, perdi os db access, pois o q tenho na maquina n foi feito backup. Então estou pedindo pra entrarem e testarem meu sites, na questões, design (aviso logo as cores são assim porque gosto desse jeito, mas podem dar opiniões), a velocidade de acesso do site (quero saber por outros internautas como está), contéudo (se realmente insentiva a um interessado a criar um site) e o mais vocês acharem. vocês vão ver no menu Websites, meus outros trabalhos. Entrem tb. www.phoenixfire.com.br Valews!!

E ae acs_junior, bem dei uma olhada rapida nesse tutorial e pareceu servir bem, mais tarde vou da uma olhada melhor, obrigado pela força, pois estava com duvida na hora de receber os dados do database, não sei como fazer isso no flash, espero q tenha isso no tutorial. George, acho q o grande acs_junior já descobriu, veja ai se serve pra você. Abraços!! Qualquer coisa volto..

Cara o q estou necessitando não é do ASP e sim do Flash, um livro em Html + ASP não tem segredo, quero é em Flash, felizmente estou pesquisando porque so aparece espertinho.

E ae galera? alguém sabe aonde posso encontrar um Livro de Visitas q funcione em Flash e Asp, ou algo do tipo? Abraços!!

E ae olimpia? Cara utilize javascript:history.go(-2), deu certo aqui. Vlews

Estou com um problema parecido, estou utilizando o a função history.back(-2) querendo voltar duas vezes n estou conseguindo, só volta apenas uma vez. Meu IE é o 6.0.26...., qual pode ser o motivo de n voltar duas vezes?

E ae galera, beleza? Como posso fazer para abrir o scene aleatório e n na ordem q está? Estou um banner q tem duas scenes, preciso q eles abram de forma aleatório, se alguém tiver este código, ou saiba como faze-lo e puder me mandar, agradeço. valeu

Cara acho q você postou no forum errado esta duvida, devia ter sido em HTML ou algo do tipo, mas de qualquer forma, tem um jeito pra tocar um wav dentro de uma página: <bgsound src="dfd" loop="1"> no loop é o numero de vezes a ser tocado e se colocar -1, tocara de forma continua.

Amigo, estou utilizando o IIS, n, o PWS, agora n entendi direito, n sei se porque explicou para ou Servidor, ou n, mas poderia me explicar melhor, como fazer isso?

Estou com dois global.asa, o primeiro é de um contador de internautas q estão online o outro é de um chat. Mas quando junto os dois, tenho um problema, pois rolagem automárica do chat n funciona, apenas funciona para o internauta q abre o chat, o primeiro internauta a entrar no batepapo, o restante fica sem a rolagem automática, mesmo q todos os usuários abandonem o chat e reste apenas um, ou então, entre um depois com o chat vazio, a rolagem n funciona, apenas quando eu mexo no global.asa, q é quando o chat é reiniciado. o 3º code é o global.asa com usuarios + chat. <script language=VBScript RUNAT=Server> Sub Application_OnStart Application.Lock Application("usu_corrente") = 0 Application.UnLock End sub Sub Session_OnStart Application.Lock Application("usu_corrente") = Application("usu_corrente") + 1 Application.UnLock Application.Lock Application("Contador") = Application("Contador") + 1 Application.UnLock Session.Timeout = 1 End Sub Sub Session_OnEnd Application.Lock Application("usu_corrente") = Application("usu_corrente") - 1 Application.UnLock end sub </SCRIPT> Global.asa do batepapo: <script language=VBScript RUNAT=Server> Application("titulo") = "Bate-Papo - euclidesdacunha.com" Application("fundochat") = "fundo.jpg" Application("tarja_r") = "#F7FFEA" If Session("careta") = "não" Then strCareta = "" else strCareta = "<img src=caretas/" & Session("careta") & ".gif>" end if Sub Application_OnStart Dim sl01_Usuarios(20) Dim sl01_Mensagens(20) Dim sl01_UltimaUsuarios(20) Dim sl01_ParaUsuario(20) Dim sl01_Exclusiva(20) Dim sl01_DeUsuario(20) sl01_Mensagens(0) = "<center><font color=#003366 size=3 face=arial><b>Bate-papo em fase de teste!</b></font></center>" sl01_Exclusiva(0) = 0 sl01_ParaUsuario(0) = 0 sl01_DeUsuario(0) = 0 sl01_Usuarios(0) = "Todos" For i=1 To 19 sl01_Mensagens(i) = "" sl01_Exclusiva(i) = 0 sl01_ParaUsuario(i) = 0 sl01_DeUsuario(i) = 0 sl01_Usuarios(i) = "" Next Application("sl01_Exclusiva") = sl01_Exclusiva Application("sl01_ParaUsuario") = sl01_ParaUsuario Application("sl01_DeUsuario") = sl01_DeUsuario Application("sl01_UltimaUsuarios") = sl01_UltimaUsuarios Application("sl01_Usuarios") = sl01_Usuarios Application("sl01_Mensagens") = sl01_Mensagens 'end sala01 End sub Sub Session_OnStart Session.Timeout = 1 Session("rolagem") = "checked" End Sub Sub Session_OnEnd 'begin sala01 If Session("sl01_Usuario") <> 0 Then Application.Lock sl01_Usuarios = Application("sl01_Usuarios") sl01_Mensagens = Application("sl01_Mensagens") sl01_ParaUsuario = Application("sl01_ParaUsuario") sl01_Exclusiva = Application("sl01_Exclusiva") sl01_DeUsuario = Application("sl01_DeUsuario") For i=18 To 0 Step -1 sl01_Mensagens(i+1) = sl01_Mensagens(i) sl01_Exclusiva(i+1) = sl01_Exclusiva(i) sl01_ParaUsuario(i+1) = sl01_ParaUsuario(i) sl01_DeUsuario(i+1) = sl01_DeUsuario(i) Next sl01_StrNovaMensagem = "<table width=100% border=0 cellspacing=0 cellpadding=0><tr><td><font size=1 face=arial>("+formatdatetime(now,vblongtime)+")</font>" & strCareta & "<font size=2 face=arial color=" & Session("cor") & "><B> " & sl01_Usuarios(Session("sl01_Usuario")) & ": </b></font><font color=#FF0000 size=2 face=arial><b> sai da sala...</font></td></tr></table>" sl01_StrNovaMensagem = sl01_StrNovaMensagem sl01_Mensagens(0) = sl01_StrNovaMensagem sl01_ParaUsuario(0) = 0 sl01_DeUsuario(0) = Session("sl01_Usuario") sl01_Exclusiva(0) = 0 sl01_Usuarios(Session("sl01_Usuario")) = "" 'Retorna a matriz Application("sl01_Mensagens") = sl01_Mensagens Application("sl01_Exclusiva") = sl01_Exclusiva Application("sl01_ParaUsuario") = sl01_ParaUsuario Application("sl01_DeUsuario") = sl01_DeUsuario Application("sl01_Usuarios") = sl01_Usuarios Application.UnLock End if 'end sala01 end sub </SCRIPT> Global.asa com usuarios online + chat: <script language=VBScript RUNAT=Server> ' ========Batepapo============== Application("titulo") = "Bate-Papo - euclidesdacunha.com" Application("fundochat") = "fundo.jpg" Application("tarja_r") = "#F7FFEA" If Session("careta") = "não" Then strCareta = "" else strCareta = "<img src=caretas/" & Session("careta") & ".gif>" end if ' ========Batepapo-Final============= Sub Application_OnStart ' ========Usuários============== Application.Lock Application("usu_corrente") = 0 Application.UnLock ' ========Batepapo============== Dim sl01_Usuarios(20) Dim sl01_Mensagens(20) Dim sl01_UltimaUsuarios(20) Dim sl01_ParaUsuario(20) Dim sl01_Exclusiva(20) Dim sl01_DeUsuario(20) sl01_Mensagens(0) = "<center><font color=#003366 size=3 face=arial><b>Bate-papo em fase de teste!</b></font></center>" sl01_Exclusiva(0) = 0 sl01_ParaUsuario(0) = 0 sl01_DeUsuario(0) = 0 sl01_Usuarios(0) = "Todos" For i=1 To 19 sl01_Mensagens(i) = "" sl01_Exclusiva(i) = 0 sl01_ParaUsuario(i) = 0 sl01_DeUsuario(i) = 0 sl01_Usuarios(i) = "" Next Application("sl01_Exclusiva") = sl01_Exclusiva Application("sl01_ParaUsuario") = sl01_ParaUsuario Application("sl01_DeUsuario") = sl01_DeUsuario Application("sl01_UltimaUsuarios") = sl01_UltimaUsuarios Application("sl01_Usuarios") = sl01_Usuarios Application("sl01_Mensagens") = sl01_Mensagens 'end sala01 End sub '====================== Sub Session_OnStart ' ========Usuários============== Application.Lock Application("usu_corrente") = Application("usu_corrente") + 1 Application.UnLock Application.Lock Application("Contador") = Application("Contador") + 1 Application.UnLock Session.Timeout = 1 ' ========Batepapo============== Session.Timeout = 1 Session("rolagem") = "checked" End Sub Sub Session_OnEnd ' ========Usuários============== Application.Lock Application("usu_corrente") = Application("usu_corrente") - 1 Application.UnLock ' ========Batepapo============== 'begin sala01 If Session("sl01_Usuario") <> 0 Then Application.Lock sl01_Usuarios = Application("sl01_Usuarios") sl01_Mensagens = Application("sl01_Mensagens") sl01_ParaUsuario = Application("sl01_ParaUsuario") sl01_Exclusiva = Application("sl01_Exclusiva") sl01_DeUsuario = Application("sl01_DeUsuario") For i=18 To 0 Step -1 sl01_Mensagens(i+1) = sl01_Mensagens(i) sl01_Exclusiva(i+1) = sl01_Exclusiva(i) sl01_ParaUsuario(i+1) = sl01_ParaUsuario(i) sl01_DeUsuario(i+1) = sl01_DeUsuario(i) Next sl01_StrNovaMensagem = "<table width=100% border=0 cellspacing=0 cellpadding=0><tr><td><font size=1 face=arial>("+formatdatetime(now,vblongtime)+")</font>" & strCareta & "<font size=2 face=arial color=" & Session("cor") & "><B> " & sl01_Usuarios(Session("sl01_Usuario")) & ": </b></font><font color=#FF0000 size=2 face=arial><b> sai da sala...</font></td></tr></table>" sl01_StrNovaMensagem = sl01_StrNovaMensagem sl01_Mensagens(0) = sl01_StrNovaMensagem sl01_ParaUsuario(0) = 0 sl01_DeUsuario(0) = Session("sl01_Usuario") sl01_Exclusiva(0) = 0 sl01_Usuarios(Session("sl01_Usuario")) = "" 'Retorna a matriz Application("sl01_Mensagens") = sl01_Mensagens Application("sl01_Exclusiva") = sl01_Exclusiva Application("sl01_ParaUsuario") = sl01_ParaUsuario Application("sl01_DeUsuario") = sl01_DeUsuario Application("sl01_Usuarios") = sl01_Usuarios Application.UnLock End if 'end sala01 end sub </SCRIPT> Como posso fazer para n ter mais este problema?

E se eu quizesse colocar q este script funcione logo q a pagina for aberta, no caso, logo quando a pagina for carregada ela cheque se o checkbox esta selecionado, pois o q acontece é q o checkbox fica no topo de um frame e n na pagina onde quero q se localiza #MARCA, por isso utilizei parent(0).rolar.checked , como faço desta forma?

Sub Rolagem() if parent(0).rolar.checked then window.location.href = "#MARCA" End if End sub Estou com este código, q funciona assim: Quando rolar estiver clicado, então a página irá para a localização MARCA, como seria este comando em Javascript?

Li o seu post, mas n consegui resolver, como você acha q isso tem haver?

Ainda n. você teria como me passar isso? Fiz outra coisa aqui mas n deu certo. E como funciona tb este cookies?

num da pra colocar o background na página do frame, teria q colocar uma especificação no proprio. RC, euu já tinha tentado desta forma mas ela n funcionou, teria q ser algum comando já isso. Alguém tem mais alguma idéia?

então, me explica qual o problema, pois lendo sua 'explicação' aqui não consegui entender ... Veja bem, estou com um chat, esta funcionando normalmente, quando entro ele pede para eu digitar um nick, normal, digito, funciona beleza, mas estou precisando colocar o formulário para abrir o chat já "logado", o caso em uma outra pagina, fora do chat, oo internauta vai digitar em um input seu nick e ele vaai abrir uma popup com o chat e este já vai poder esta conversando, q é o n esta acontecendo, o internauta digita o seu nick, mas popup abre pedido para digitar o nick, como se tivesse sido pedida antes.

Tem como colocar uma imagem de fundo num frame, especificando isso sem ser pela página, por exemplo pelo código abaixo, ou de outra forma? <frameset framespacing="0" border="false" rows="0,70,0,*,80" frameborder="0"> <frame name="sair" noresize SRC="saindo.asp" SCROLLING="no"> <frame name="top" noresize SRC="top.asp" SCROLLING="no"> <frame name="meio" noresize SRC="display.asp" SCROLLING="no" marginwidth="0" marginheight="0"> <frame name="mensagem" noresize SRC="branco.asp" SCROLLING="auto" marginwidth="0" marginheight="0"> <frame name="baixo" noresize SRC="message.asp" SCROLLING="no" marginwidth="0" marginheight="0"> <noframes> <body topmargin="0" leftmargin="0"> ----- > </body> </noframes> </frameset>

Minha dúvida está em, quando o internauta digitar no input seu nick, o mesmo essa utilizado no chat, mas isso quando ele abre uma janela popup, pois pra enviar de uma página para a outra já consegui, mas n de uma página para uma página popup. resumindo .. é Javascript ou ASP? não consegui entender, hehe dark0, cara, isto q estou querendo fazer é uma junção das duas linguagens + a HTML, o formulário q envia em HTML, o javascript abre a janela e o ASP recebe os dados. Mas n está dando certo, pois n sei aonde está o erro no JS ou no ASP, ou se ate mesmo nos dois. Por isso queria q vocês dessem uma olhada e se alguém tiver uma idéia de como resolver isso? Por isso n saberia te dizer onde esta o devemos mexer, ou seja, o erro. Gostaria de saber o q eu posso fazer de diferente, tentar isso de outras formas. Abraços!!

Minha dúvida está em, quando o internauta digitar no input seu nick, o mesmo essa utilizado no chat, mas isso quando ele abre uma janela popup, pois pra enviar de uma página para a outra já consegui, mas n de uma página para uma página popup.

Já tentei de várias maneiras mas não consegui, quem puder me ajudar. Estou querendo enviar um nick de um formulário para uma outra página mas esta página q vai receber este nick vai ser aberta em uma popup, isso por ser um chat. O código q deveria enviar o nick, mas n estou conseguindo, para a janela popup é este: <form action="Javascript:NewWindow('/chat/chat.asp','chat','730','500','yes')" name="chat" method="GET"> <td width="92" height="1"><font color="#FFFFFF"> </font> <p><input value="digite um nick" onFocus="if (this.value == 'digite um nick') {this.value='';}; return true;" name="nick" size="12" maxlength=30 style="border: 1px solid #808080; font-family:Verdana; font-size:8 pt"> </p> </td> <td width="43" height="1"><font color="#808080"> <input type="image" src="/images/botoes/ok.gif" onClick="submit" border="0" name="ok"></font></td> </form> E o código q vai receber o nick e abri o chat é este: <% Response.Cookies("Nick")=Request.Form("nick") Application.Lock flag = 0 IF Application("usuario1") = "" Then Application("usuario1") = Request.Form("nick") Session("id")=1 flag = 1 END IF IF (Application("usuario2") = "") and (flag = 0) Then Application("usuario2") = Request.Form("nick") Session("id")=2 flag = 1 END IF IF (Application("usuario3") = "") and (flag = 0) Then Application("usuario3") = Request.Form("nick") Session("id")=3 flag = 1 END IF IF (Application("usuario4") = "") and (flag = 0) Then Application("usuario4") = Request.Form("nick") Session("id")=4 flag = 1 END IF IF (Application("usuario5") = "") and (flag = 0) Then Application("usuario5") = Request.Form("nick") Session("id")=5 flag = 1 END IF IF (Application("usuario6") = "") and (flag = 0) Then Application("usuario6") = Request.Form("nick") Session("id")=6 flag = 1 END IF IF (Application("usuario7") = "") and (flag = 0) Then Application("usuario7") = Request.Form("nick") Session("id")=7 flag = 1 END IF IF (Application("usuario8") = "") and (flag = 0) Then Application("usuario8") = Request.Form("nick") Session("id")=8 flag = 1 END IF IF (Application("usuario9") = "") and (flag = 0) Then Application("usuario9") = Request.Form("nick") Session("id")=9 flag = 1 END IF IF (Application("usuario10") = "") and (flag = 0) Then Application("usuario10") = Request.Form("nick") Session("id")=10 flag = 1 END IF IF (Application("usuario11") = "") and (flag = 0) Then Application("usuario11") = Request.Form("nick") Session("id")=11 flag = 1 END IF IF (Application("usuario12") = "") and (flag = 0) Then Application("usuario12") = Request.Form("nick") Session("id")=12 flag = 1 END IF IF (Application("usuario13") = "") and (flag = 0) Then Application("usuario13") = Request.Form("nick") Session("id")=13 flag = 1 END IF IF (Application("usuario14") = "") and (flag = 0) Then Application("usuario14") = Request.Form("nick") Session("id")=14 flag = 1 END IF IF (Application("usuario15") = "") and (flag = 0) Then Application("usuario15") = Request.Form("nick") Session("id")=15 flag = 1 END IF IF (Application("usuario16") = "") and (flag = 0) Then Application("usuario16") = Request.Form("nick") Session("id")=16 flag = 1 END IF IF (Application("usuario17") = "") and (flag = 0) Then Application("usuario17") = Request.Form("nick") Session("id")=17 flag = 1 END IF IF (Application("usuario18") = "") and (flag = 0) Then Application("usuario18") = Request.Form("nick") Session("id")=18 flag = 1 END IF IF (Application("usuario19") = "") and (flag = 0) Then Application("usuario19") = Request.Form("nick") Session("id")=19 flag = 1 END IF IF (Application("usuario20") = "") and (flag = 0) Then Application("usuario20") = Request.Form("nick") Session("id")=20 flag = 1 END IF IF (Application("usuario21") = "") and (flag = 0) Then Application("usuario21") = Request.Form("nick") Session("id")=21 flag = 1 END IF IF (Application("usuario22") = "") and (flag = 0) Then Application("usuario22") = Request.Form("nick") Session("id")=22 flag = 1 END IF IF (Application("usuario23") = "") and (flag = 0) Then Application("usuario23") = Request.Form("nick") Session("id")=23 flag = 1 END IF IF (Application("usuario24") = "") and (flag = 0) Then Application("usuario24") = Request.Form("nick") Session("id")=24 flag = 1 END IF IF (Application("usuario25") = "") and (flag = 0) Then Application("usuario25") = Request.Form("nick") Session("id")=25 flag = 1 END IF IF (Application("usuario26") = "") and (flag = 0) Then Application("usuario26") = Request.Form("nick") Session("id")=26 flag = 1 END IF IF (Application("usuario27") = "") and (flag = 0) Then Application("usuario27") = Request.Form("nick") Session("id")=27 flag = 1 END IF IF (Application("usuario28") = "") and (flag = 0) Then Application("usuario28") = Request.Form("nick") Session("id")=28 flag = 1 END IF IF (Application("usuario29") = "") and (flag = 0) Then Application("usuario29") = Request.Form("nick") Session("id")=29 flag = 1 END IF IF (Application("usuario30") = "") and (flag = 0) Then Application("usuario30") = Request.Form("nick") Session("id")=30 flag = 1 END IF IF (Application("usuario31") = "") and (flag = 0) Then Application("usuario31") = Request.Form("nick") Session("id")=31 flag = 1 END IF IF (Application("usuario32") = "") and (flag = 0) Then Application("usuario32") = Request.Form("nick") Session("id")=32 flag = 1 END IF IF (Application("usuario33") = "") and (flag = 0) Then Application("usuario33") = Request.Form("nick") Session("id")=20 flag = 1 END IF IF (Application("usuario34") = "") and (flag = 0) Then Application("usuario34") = Request.Form("nick") Session("id")=34 flag = 1 END IF IF (Application("usuario35") = "") and (flag = 0) Then Application("usuario35") = Request.Form("nick") Session("id")=35 flag = 1 END IF IF (Application("usuario36") = "") and (flag = 0) Then Application("usuario36") = Request.Form("nick") Session("id")=36 flag = 1 END IF IF (Application("usuario37") = "") and (flag = 0) Then Application("usuario37") = Request.Form("nick") Session("id")=37 flag = 1 END IF IF (Application("usuario38") = "") and (flag = 0) Then Application("usuario38") = Request.Form("nick") Session("id")=38 flag = 1 END IF IF (Application("usuario39") = "") and (flag = 0) Then Application("usuario39") = Request.Form("nick") Session("id")=39 flag = 1 END IF IF (Application("usuario40") = "") and (flag = 0) Then Application("usuario40") = Request.Form("nick") Session("id")=40 flag = 1 END IF Application.UnLock Application("txt1") = "<FONT COLOR=#0000FF>** " & Request.Form("nick") & " Entrou na Sala **</FONT>" Response.redirect "inicio.asp" %> No caso n coloquei nenhuma situação para q o nick seja nada, pois vou colocar um javascript no input nick. Então como posso fazer pra enviar o nick de um formulário para uma janela popup? Qualquer idéia galera, posta aí. Valews!!

E galerinha do Fórum, ninguém sabe como posso fazer resolver este problema incomum ou outra forma pra visualizar os banner sem este erro?

Entra aí, são é o tópico daqui onde estão os servidores que rodam asp. http://scriptbrasil.com.br/forum/index.php?showtopic=24373 Olha, sugiro você fazer este fale conosco por CDONTS, é mais simples de usar e a maioria dos servidores tem, pois é grátis.

Estou utilizando vários sistemas de banners rotativos, o code abaixo é o script pra exibir os banners. <% Set Conexao = CreateObject("ADODB.CONNECTION") conStr ="DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & server.MapPath("/banner/publicidade/banner") ConexaoAberta = FALSE Sub AbreConexao() if not ConexaoAberta then Conexao.Open ConStr ConexaoAberta = True end if end sub Sub FechaConexao() if ConexaoAberta then Conexao.close ConexaoAberta = False end if end sub AbreConexao Sql="SELECT * FROM banner" Set RS = Conexao.Execute(Sql) Do Until RS.EOF or RS.BOF Valores = Valores & RS("ID") & "," RS.Movenext Loop ArraySplit = Split(Left(Valores,Len(Valores)-1),",") Randomize x = CInt(Rnd()*Ubound(ArraySplit)) sID = ArraySplit(x) Sql="SELECT * FROM banner WHERE id = "&sID&"" Set rsMostra = Conexao.Execute(Sql) %> <%if rsMostra("flash")="1" then %> <object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,29,0" width="140" height="70" menu="false"> <param name="movie" value="<%=rsMostra("banner")%>"> <param name="quality" value="high"> <param name="menu" value="false"> </object> <%else%> <font face="Verdana" size="1"><img alt="<%=rsMostra("alt")%>" src="<%=rsMostra("banner")%>" border="0"></font><%end if%><% Sql1 = "UPDATE banner SET exibicoes = exibicoes + 1 WHERE id = "&rsMostra("id")&" " Conexao.Execute(Sql1) %> Puxe essa página por include: <!--#include virtual="banner/publicidade/default.asp" --> O q esta acontecendo de errado é: Além do banner PUBLICIDADE, temos os banners EVENTOS, BANDAS e PARCERIA, onde utilizo o mesmo script para exibir aleatoriamente os arquivos .SWF, q a DEFAULT.ASP puxa estes outros também por include. E esse erro é apresentado: HTTP 500.100 - Servidor interno Erro - erro do ASP Internet Information Services -------------------------------------------------------------------------------- Informações técnicas (para a equipe de suporte) Tipo de erro: (0x80020009) Exceção. /banner/eventos/default.asp, line 34 Mas este n aparece todas as horas, quando eu atualizo a página logo em seguida ela aparece normalmente, ai quando atualizo novamente este erro é apresentado. Fica intermitente, hora funciona, hora n. Parece um conflito nos comandos, ou coisa do tipo, mas mesmo q conflito é esse onde hora funciona, outra n? Na linha 34, temos <%if rsMostra("flash")="1" then %>, onde eu mudei o rsMostra pra rsMostraEVENTOS para os default.asp do /BANNER/EVENTOS/, tentando impedir, mas n modificou em nada, a exibição ficou como antes, abrindo ou n. Alguém sabe o q pode esta acontecendo neste caso? Desde já agradeço!!

Consegui colocar pra funcionar apenas desta forma: NO FORM onSubmit="document.form.f_user.value = document.form.f_user.value + document.form.dominio.value;" Mas n ficou do jeito q desejo, pois acho q a idéia de acrescentar um input em outro n deu certo. Pois estou com um form de logon de e-mail, ele aparece assim na página: [ ]@dominio.com ENTÃO fica chato o usuario colocar o @dominio.com dentro do input, ou então fazer do jeito q conseguir, q foi o internauta digita o login e na hora do submit, nele é adicionado automaticamente o @dominio.com, onde este é o problema, n fica legal a aparecer q foi digitado, teria q ficar escondido., Se alguém puder me ajudar, ou tive um script desta forma. Obrigado!!

Olá, testei sua idéia, mas ele n esta do jeito q eu preciso, porque como disse no post inicial "Agora a inclusão n pode aparecer no input do login, tem q ficar tipo q escondida." Tem outra forma de fazer a inclusão sem aparecer no campo o @euclidesdacunha.com ? Abraços