Jump to content


Morena's Content

There have been 20 items by Morena (Search limited from 30/03/2023)


Ordernar por                Order  

#291304 Como Fazer Para Mudar O Idioma

Posted by Morena on 31/01/2004, 00:32 in Outras Linguagens e Tecnologias

Oi galera, tudo bem ?

Tem alguns sites que oferecem a opção para a pessoa escolher o idioma, se estiver em português, ela pode escolher inglês, espanhol ou outros, continuando com o mesmo conteúdo, mudando apenas o idioma.

Gostaria de saber como faço isso ? Se tem algum programinha, ou tem que ser feito tudo manualmente ?

Desde já fico muito agradecida pela ajuda e desculpa se postei o tópico no local errado.

Abraços.



#250120 Conexao.execute(select ?

Posted by Morena on 10/12/2003, 17:08 in ASP

conexao.execute(Select ????

Oi gente... tenho que saber o que colocar no lugar dos pontos de interrogações... Preciso disso com urgencia, e não tenho livro e nem apostila aqui comigo agora.

Obrigada pela ajuda.

Abraços.



#250116 Como Descobrir O Caminho Do Servidor

Posted by Morena on 10/12/2003, 17:02 in ASP

Encontrei o meu script... desculpem mas não sei como colocar para pegar em anexo, então resolvi colocar o codigo aqui mesmo... se alguem precisar é esse:

<%@ LANGUAGE = VBScript %>
<% 'Copyright 2002 Comnecta Tecnologias, www.comnecta.com %>
<B>
<p align="center"><font face="Arial" 6"" size="4" color="#000080"> Sistema de
Reconhecimento de Servidores Web</font>
<FONT SIZE=""6"">
<p>Comnecta Tecnologias - Soluções em Internet</FONT></B><font face="Arial"><BR>
</font>
<font face="Arial"><FONT SIZE="2"><B>Versão 1.5</B><BR></font></font><font face="Arial" size="1"><b>Disponível
Somente para Servidores Web Windows</b></font></p>
<FONT SIZE="2"><HR>
<TABLE BORDER="0" CELLPADDING="0" CELLSPACING="0" WIDTH="980"><TR><TD VALIGN="TOP" width="606" bgcolor="#CCCCCC"><font face="Arial"><B><small>Nome
     do Servidor: </small></B><small><font color="#0000FF"><% = Request.ServerVariables("SERVER_NAME") %></font><BR>
     </small><b><small>Nome do Script: </small></b><small><font color="#0000FF"><% = Request.ServerVariables("SCRIPT_NAME") %></font><BR>
     </small><B><small>Protocolo do Servidor: </small></B><small><font color="#0000FF"><% = Request.ServerVariables("SERVER_PROTOCOL") %></font><BR>
     </small><B><small>Pasta Local: </small></B><small><font color="#0000FF"><% = Request.ServerVariables("PATH_INFO") %></font><BR>
     </small><B><small>Endereço do Físico: </small></B><small><font color="#0000FF"><% = Request.ServerVariables("PATH_TRANSLATED") %></font><BR>
     </small><B><small>Referencia HTTP:// : </small></B><small><font color="#0000FF"><% = Request.ServerVariables("HTTP_REFERER") %>
     </font>
     </small>
     </font></font><font color="#0000FF" face="Arial" size="3"><a href="http://<% = Request.ServerVariables("SERVER_NAME") %>" target="_blank"><% = Request.ServerVariables("SERVER_NAME") %>
   </a>
   <br>
   </font><B><font face="Arial" size="2">Seu IP :</font><small><font face="Arial" SIZE="2">
   </font></small></B><font color="#0000FF" face="Arial" size="3"><%= request.servervariables("REMOTE_ADDR") %>    </font><small><font color="#0000FF"></font>
     </small>
<FONT SIZE="2"><font face="Arial"><small><BR>
     </small></font></font></TD><TD VALIGN="TOP" width="370" bgcolor="#CCCCCC">
<font size 4"" face="Arial"><b>Informações do Sistema</b></font>
<FONT SIZE="2"><font face="Arial"><BR>
<B><small>Sistema</small><small>: </B><font color="#0000FF"><% = ScriptEngine %></font><BR>
<B>Versão: </B><font color="#0000FF"><%  =ScriptEngineMajorVersion() %></font>.<font color="#0000FF"><% =ScriptEngineMinorVersion() %></font><BR>
</small><b><small>Atualizado:

</small> </b><small><font color="#0000FF"><% =ScriptEngineBuildVersion() %></font><BR><b>Tempo
de Respota do Servidor Web:</b><br>
</small><font color="#0000FF"><b><small><%
inicio = Timer
'... uma seqüência de comandos para medir a velocidade
response.write "Processado em " & FormatNumber( Timer - inicio, 2 ) & " segundos"
%>

</small></b></font></font>
 </font>
</TD></TR></TABLE>
<HR>
<font face="Arial"><B>
<FONT SIZE=""4"">CDONTS Object</FONT></B></font><font face="Arial"><B><font size 4"">:&nbsp;</font></B></font><FONT SIZE=""2""><font face="Arial">
<font color="#800000"><% Err.Clear
  On Error Resume Next
  Set objCDONTS = Server.CreateObject("CDONTS.Session")
  If Err.Number <> 0 Then
     Response.Write("<B>NÃO INSTALADO</B>&nbsp;&nbsp;")
  Else
     Response.Write("<B>Versão: </B>" & objCDONTS.Version & " INSTALADO&nbsp;&nbsp;")
  End If
%></font>
<BR>
</font>
<HR>
<font face="Arial">
<FONT SIZE=""4""><B>ADO DB Object:&nbsp;</B></FONT> <font color="#800000"><% Err.Clear
  On Error Resume Next
  Set objConn = Server.CreateObject("ADODB.Connection")
  If Err.Number <> 0 Then
     Response.Write("ADODB.Connection object <B>NÃO INSTALADO</B>")
  Else
     Response.Write("<B>Versão: </B>" & objConn.Version & "<BR>")
  End If
%></font></font>
<HR>
<FONT SIZE=""4""><B>File System Object</B></FONT><font face="Arial"> <font color="#800000">
<% Err.Clear
  On Error Resume Next
  Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
  If Err.Number <> 0 Then
     Response.Write("NÃO INSTALADO")
  Else
     Response.Write("INSTALADO")
  End If
%>
</font></font>
<HR>
<FONT SIZE=""4""><B>ASPMail Object</B></FONT><font face="Arial"> <font color="#800000">
<% Err.Clear
  On Error Resume Next
  Set objASPMail = Server.CreateObject("SMTPsvg.Mailer")
  If Err.Number <> 0 Then
     Response.Write("INSTALADA")
  Else
     Response.Write("VERSÃO INSTALADO " & objASPMail.Version )
     Response.Write("<BR><SMALL>EXPIRA EM:" & objASPMail.Expires & "</SMALL>" )
  End If
  Response.Write("<BR><FONT SIZE=""2"">Para Mais Informações <A HREF=""http://www.serverobjects.com"" TARGET=""RESOURCE WINDOW"">www.serverobjects.com</A></FONT>&nbsp;&nbsp;")
%>
</font> &nbsp;<BR>
</font>
<HR>
<FONT SIZE=""4""><B><font face="Arial">ASPImage Object</font></B></FONT><FONT SIZE=""2"">
<font face="Arial"> <font color="#800000">
<% Err.Clear
  On Error Resume Next
  Set objASPImage = Server.CreateObject("AspImage.Image")
  If Err.Number <> 0 Then
     Response.Write("NÃO INSTALADO")
  Else
     Response.Write("VERSÃO INSTALADA " & objASPImage.Version )
     Response.Write("<BR><SMALL>EXPIRA EM:" & objASPImage.Expires & "</SMALL>")      
  End If
  Response.Write("<BR><FONT SIZE=""2"">Para Mais Informações <A HREF=""http://www.serverobjects.com"" TARGET=""RESOURCE WINDOW"">www.serverobjects.com</A></FONT>")
%>
</font></font>
<HR>
<FONT SIZE=""4""><B>ASPUpload Object</B></FONT><font face="Arial"> <font color="#800000">
<% Err.Clear
  On Error Resume Next
  Set objASPUpload = Server.CreateObject("Persits.Upload.1")
  If Err.Number <> 0 Then
     Response.Write("NÃO INSTALADO")
  Else
     Response.Write("INSTALADO ")
  End If
  Response.Write("<BR><FONT SIZE=""2"">Para Mais Informações <A HREF=""http://www.persits.com"" TARGET=""RESOURCE WINDOW"">www.persits.com</A></FONT>")
%>
</font></font>
<HR>
<FONT SIZE=""4""><B>ASPEmail Object</B></FONT><font face="Arial"> <font color="#800000">
<% Err.Clear
  On Error Resume Next
  Set objASPEmail = Server.CreateObject("Persits.MailSender")
  If Err.Number <> 0 Then
     Response.Write("NÃO INSTALADO")
  Else
     Response.Write("INSTALADO ")
     Response.Write("<BR><SMALL>Expires On:" & objASPEmail.Expires & "</SMALL>")      
  End If
  Response.Write("<BR><FONT SIZE=""2"">Para Mais Informações <A HREF=""http://www.persits.com"" TARGET=""RESOURCE WINDOW"">www.persits.com</A></FONT>&nbsp;&nbsp;")
%>
</font> &nbsp;<BR>
</font>
<HR>
<FONT SIZE=""4""><B><font face="Arial">JMail Object</font></B></FONT><FONT SIZE=""2"">
<font face="Arial"> <font color="#800000">
<% Err.Clear
  On Error Resume Next
  Set objJMail = Server.CreateObject("JMail.SMTPMail")
  If Err.Number <> 0 Then
     Response.Write("NÃO INSTALADO")
  Else
     Response.Write("INSTALADO ")
  End If
  Response.Write("<BR><FONT SIZE=""2"">Para Mais Informações <A HREF=""http://www.dimac.net"" TARGET=""RESOURCE WINDOW"">www.dimac.net</A></FONT>&nbsp;&nbsp;")
%>
</font> &nbsp;<BR>
</font>
<HR>
<FONT SIZE=""4""><B><font face="Arial">Bamboo.SMTP Object</font></B></FONT><font face="Arial"><FONT SIZE=""2"">
<font color="#800000">
<% Err.Clear
  On Error Resume Next
  Set objBamboo = Server.CreateObject("Bamboo.SMTP")
  If Err.Number <> 0 Then
     Response.Write("NÃO INSTALADO")
  Else
     Response.Write("INSTALADO ")
  End If
  Response.Write("&nbsp;&nbsp;")
%>
</font>
</FONT>
<BR>
</font>
<HR>
<font 4"" face="Arial"><b>Informações desta Transmissão</b></font><font face="Arial"><FONT SIZE=""2"">
<font color="#000080"><%
  On Error Resume Next
  vRunDate = Now
  sRunDate = Request.QueryString("DATE")
  If Len(Trim(sRunDate)) = 0 Then
     sRunDate = Request.Form("DATE")
  End If
  Response.Write("<FONT SIZE=""2"">")
  If IsDate(sRunDate) Then
     vRunDate = CDate(sRunDate)
     Response.Write("<BR><FONT SIZE=""2"">RunDate:" & sRunDate)
  Else
     Response.Write("<BR>RunDate: Now")
  End If
  Response.Write("<BR>RunDate : " & vRunDate )
  Response.Write("<BR>CDate(RunDate) : " & CDate(vRunDate) )
  Response.Write("<BR>CDate("" & RunDate) : " & CDate("" & vRunDate) )
%></font>
</FONT>
<!-- Mostrar os 10 últimos visitantes -->
<%
Application.Lock
IF NOT isArray( Application( "lastTen" ) ) THEN
DIM dummy( 10, 3 )
Application( "lastTen" ) = dummy
END IF
lastTen = Application( "lastTen" )
Application.UnLock

' Mover cada visita abaixo no Array
IF lastTen( 9, 0 ) <> "" THEN
FOR i = 0 TO 9
lastTen( i, 0 ) = lastTen( i + 1, 0 )
lastTen( i, 1 ) = lastTen( i + 1, 1 )
lastTen( i, 2 ) = lastTen( i + 1, 2 )
NEXT
END IF

' Somar uma nova entrada
FOR i = 0 TO 9
IF lastTen( i, 0 ) = "" THEN
lastTen( i, 0 ) = Request.ServerVariables( "REMOTE_ADDR" )
lastTen( i, 1 ) = Request.ServerVariables( "HTTP_USER_AGENT" )
lastTen( i, 2 ) = NOW()
EXIT FOR
END IF
NEXT

Application.Lock
Application( "lastTen" ) = lastTen
Application.UnLock 

%>

<br>
</font>
</font></font></font>
<EM><font face="Arial" 2"" size="2"><b>Transmitido: <font color="#FF0000"> <% = Now %></font></b></font></em>
<FONT SIZE=""2""><p>&nbsp;</font><b><font face="Arial" 2"" size="2">Mostrar os
10 Últimos Acessos a este Script:</font></b>
<center>
</p>
<font face="Arial">
<div align="left">
<table bgcolor="#CCCCC0" cellspacing=0 cellpadding=3 border=1>
<tr bgcolor="lightyellow">
<td><font 2"" size="2" color="#000080"><b>Visitas</b></font></td>
<td><font 2"" size="2" color="#000080"><b>Direção IP</b></font></td>
<td><font 2"" size="2" color="#000080"><b>Browser</b></font></td>
<td><font 2"" size="2" color="#000080"><b>Hora de Visita</b></font></td>
</tr>
<FONT SIZE=""2"">
<FONT SIZE=""2"">
<FONT SIZE=""2"">
<% 
FOR i = 0 TO 9 
IF lastTen( i, 0 ) <> "" THEN
%>
</font></font>
</font>
<tr>
<td><font 2"" size="2"><b><%=i + 1%></b></font>&nbsp;</td>
<td><font 2"" size="2"><b><%=lastTen( i, 0 )%></b></font>&nbsp;</td>
<td><font 2"" size="2"><b><%=lastTen( i, 1 )%></b></font>&nbsp;</td>
<td><font 2"" size="2"><b><%=lastTen( i, 2 )%></b></font>&nbsp;</td>
</tr>
<FONT SIZE=""2"">
<FONT SIZE=""2"">
<FONT SIZE=""2"">
<%
END IF
NEXT
%>
</table>
</div>
<BR></font></font>
</font></font>
<EM><font size="1" face="Arial" 2""><BR></font><FONT SIZE=""2""><FONT SIZE=""2"">
<FONT SIZE="2"><CENTER><A HREF="http://www.comnecta.com">Copyright 2002 Comnecta Tecnologias - Soluções em Internet ®, Inc. All rights reserved.</A></CENTER></FONT>
</font>

* OBS: procure sempre usar o BBCODE ao postar como acima. Ex.
seu codigo



#248729 Como Descobrir O Caminho Do Servidor

Posted by Morena on 09/12/2003, 09:45 in ASP

Oi Tarkan, tudo bem?

Eu vou testar os códigos que vc passou, mas eu queria mesmo era o script, ele tinha várias funções, não lembro quem mandou, que pena que fui perder.

Mas muito obrigada assim mesmo.

Abraços.



#248554 Como Descobrir O Caminho Do Servidor

Posted by Morena on 09/12/2003, 00:53 in ASP

Oi galera, tudo bem ?

Eu já enviei um tópico assim, mas tem um tempão, tentei procurá-lo mas não encontrei.

Preciso descobrir o caminho do servidor e quando precisei o pessoal deste forum me passou um script com o nome CaminhoServidor.asp, que ao ser rodado no servidor, ele passava o caminho das pastas entre outras informações.

To querendo só para poder arrumar o meu DSN, pois faço as conexões usando o caminho do servidor... vcs entendem neh.

Resumindo... queria saber se alguém de vcs ainda tem este script para enviar pra mim ? Pois perdi o que eu tinha guardado, e só tinha esta cópia.

Se vcs não tiverem o script, mas souberem onde posso encontrar, tbm já ajuda muito.

Obrigada.



#248528 Validar Campos

Posted by Morena on 09/12/2003, 00:19 in Javascript / DOM / AJAX / ECMAScript

Ai galera muito obrigada, testei o código e agora está funcionando.

Valew.



#246932 Validar Campos

Posted by Morena on 07/12/2003, 12:50 in Javascript / DOM / AJAX / ECMAScript

To tentando fazer uma validação de alguns campos, já procurei o código neste forum, e em outros sites, fiz como encontrei nas pesquisas, mas quando eu deixo o campo vazia, não ocorre a validação, só aparece que está faltando um ponto e virgula (;) depois da palavra Valida.

Alguém pode me ajudar ? Não colei o código todo senão ocuparia muito espaço.

Obrigada.

Meu codigo:
</head>

<script language='JavaScript' type="text/javascript">
<!--
Function Valida(){
if (document.login.value == '')
{
alert("Este campo é obrigatório !");
form.login.focus();
return false;
}
}
-->
</script>

<body>

<form name="form" onsubmit='return Valida()'>

.
.
.

<td width="59%"><input type="text" name="login" size="15" maxlength="10"></td>



#246775 Alguem Sabe?

Posted by Morena on 07/12/2003, 09:58 in ASP

No site www.wmonline.com.br) na seção asp, tem várias opções, dentro de bate papo vc encontra...

Qualquer coisa se não tiver do jeito que vc quiser faz uma busca em outros sites.

Tinha um programa de bate papo legal, vou ver se encontro em algum backup, se quiser me passa seu e-mail para enviar pra ti.

Abraços.



#246191 Como Fazer ?

Posted by Morena on 06/12/2003, 17:20 in Javascript / DOM / AJAX / ECMAScript

Ihhh mas o trabalho só pode ser feito usando ASP ou JavaScript, e no trabalho está falando que tem que usar arquivo do tipo .txt.

O ASP faz isso? Sem querer me desfazer da ajuda do Skuall, será que tem outra pessoa que saiba se tem como fazer em java ou asp?

Mesmo assim, brigadaum Skuall.



#246173 Como Fazer ?

Posted by Morena on 06/12/2003, 17:03 in Javascript / DOM / AJAX / ECMAScript

Todas as páginas devem possuir cabeçalho e rodapé configuradas através de arquivo do tipo texto (com extensão .txt) e devem ser inseridos nos locais específicos de cada pagina.

Eu acho que seria como uma folha de estilo (css), mas não tenho certeza, e também não sei como fazer. Alguém poderia me ajudar ?

Ex: para mudar a cor do link eu poderia fazer assim:
<style>
a:hover{color:#ffcc00;}
</style>

Mas e para colocar esse cabeçalho e rodapé ? É um trabalho da facul, e preciso da ajuda de vocês.

Desculpe se talvez coloquei o tópico no lugar errado.

Abraços e muito obrigada.



#162035 Referência Dao 3.6

Posted by Morena on 03/08/2003, 23:19 in Visual Basic

Olha galera, ninguém me respondeu, mas acho que pelo menos vcs tentaram...

É o seguinte, fiquei sabendo com um amigo meu que para ter a referencia do Microsoft Dao 3.6 é preciso pegar o Service Pack e instalar no computador que tudo fica resolvido.

Tentei fazer isso no meu computador, mas não funcionou, mas no computador da minha irmã funcionou...

Então está ai, se alguém precisar, talvez funcione no de vcs.

Bjinhos.



#141110 Referência Dao 3.6

Posted by Morena on 10/07/2003, 01:20 in Visual Basic

Ou galera, tudo bem ?

Quando começo a desenvolver um projeto em VB, vou em References e adiciono algumas que vou usar.

Não sei como, mas consegui deletar a que se referia ao Microsoft DAO 3.6 Object Library, e não sei qual o nome do arquivo, por isso nem tem como procura-lo no meu computador.

Se alguém souber o nome já me ajuda muito, mas se vcs quiserem enviar o arquivo para mim, podem enviar por e-mail.

Ah eu uso o VB 6.0.

O meu e-mail é agathac19@bol.com.br...

Estou sem acesso a net em casa e por isso estou pedindo para enviarem por e-mail, pois não posso acessar o forum todos os dias como antes.

Fico muito agradecida a todos.

Abraços.



#88217 Janela Em Formatos Diferentes

Posted by Morena on 30/04/2003, 11:26 in HTML, CSS e Metodologias

Muito obrigada Dinho.

Vou testar o código da página que passou depois.

Valew.



#88143 Janela Em Formatos Diferentes

Posted by Morena on 30/04/2003, 09:15 in HTML, CSS e Metodologias

Oi gente...

Se estiver postando no lugar errado, por favor me desculpe.

Estou passando este link para vcs darem uma olhada do que eu to querendo, eu não sei se é uma janela, ou se é um script.
http://www.boldrini.org.br/

Quando a pag abrir vai aparecer um palhacinho se movimentando de um lado ao outro do site.

Gostaria de saber onde posso encontrar algum exemplo para fazer tipo o do palhacinho, mas com outro desenho... se alguem puder me ajudar, desde já fico muito agradecida.

Abraços.



#87519 Validação De Formulario

Posted by Morena on 29/04/2003, 10:00 in HTML, CSS e Metodologias

Dê uma olhada neste tópico, acho que poderá te ajudar.

http://forum.wmonlin...



#87504 Botão Backward Do Navegador...urgente

Posted by Morena on 29/04/2003, 09:31 in ASP

Se vc usar a busca vc vai encontrar algumas coisas que o pessoal do forum ensinou...

Já tentei fazer o que eles ensinaram, mas sei lá pq, no meu caso não funcionou... então fiz uma página de logout e nele redireciono a pessoa para outra página.

E faço uma verificação sempre no inicio das paginas, se Session for igual a vazio redireciono a pessoa para a pagina de login.

Assim ela não tem como voltar enquanto não fazer o login.

Por enquanto do jeito que fiz ta funcionando.

Espero ter ajudado...



#87492 Asp E Linux

Posted by Morena on 29/04/2003, 08:57 in ASP

Vou olhar o link que passou e estuda-lo... heheheh

Mas mesmo assim obrigada pela ajuda.



#87486 Asp E Linux

Posted by Morena on 29/04/2003, 08:47 in ASP

Oi gente...

Desculpa ai a desinformação da minha parte, mas gostaria de saber se tem como rodar asp em servidor Linux?

Antes de colocar um novo tópico fiz a busca, mas não encontrei nada, portanto se alguém souber de um tópico com este assunto, fico muito agradecida se de alguma forma puderem me ajudar... sendo respondendo a minha pergunta ou passando o endereço do tópico.

Obrigada.



#83215 Apostila De Asp

Posted by Morena on 23/04/2003, 09:47 in ASP

No site www.wmonline.com.br vc pode encontrar ótimas apostilas.

Eu tenho uma que recebi de um menino do forum, se quiser envia uma mensagem que mando pra vc.



#77068 Qual A Versao Mais Recente?

Posted by Morena on 13/04/2003, 15:07 in Visual Basic

Eu acho que a versão mais nova do VB é a versão 7.0, mas não tenho tanta certeza...

Eu uso a versão 6.0.




IPB Skin By Virteq