ASPECTO.Net - Notícias

No php:

<?php
if ($conexao = mysql_connect("servidor","usuario","senha"))
{
if (!$banco = mysql_select_db("banco"))
{
die("Erro ao conectar ao banco: ".mysql_error());
}
} else {
die("Erro ao conectar ao servidor: ".mysql_error());
}
?>

Em asp:

<%
strConnection = "Driver={MySQL ODBC 3.51 Driver}; SERVER=servidor; DATABASE=nome_do_banco; UID=usuario; PWD=senha;"
%>

Um erro relativamente comum por parte de desenvolvedores ainda sem muita experiênia, e que os leva frequentemente a achar que existe algum problema no servidor, é o caminho de Bancos de Dados Access.

Comumente o usuário tem, em sua máquina local, um banco no caminho…
c:\inetpub\wwwroot\bd\meubanco.mdb

Funciona em sua máquina local, e quando a página que usa o banco é enviada para o servidor… “A página não pode ser exibida”. A conclusão precipitada, muitas vezes, é que “há um problema no servidor, porque a página está correta, e roda em minha máquina“.

O desenvolvedor deve usar sempre um Caminho Virtual para não ter problemas se houver alguma mudança na configuração do servidor, ou se mudar de provedor e ainda para manter a compatibilidade, usando o mesmo código em seu servidor local e no servidor do produção (o do provedor). Se criou uma pasta “/data” e para lá enviou “meubanco.mdb” deverá usar, como caminho…

Server.MapPath(”\data\meubanco.mdb”)

A função Server.MapPath retorna (ou ‘traduz’) o caminho físico correspondente ao caminho virtual informado. No servidor local, como exempleficado, um…

Response.Write Server.Mappath(”\”) vai gerar…

c:\inetpub\wwwroot\

… e provavelmente será diferente no servidor do provedor. Assim é mantida a compatibilidade, não sendo necessário alterar o código para fazer o ‘upload’.

O código abaixo é um modelo de página de contato que faz uso do componente AspEmail, cujo manual pode ser encontrado aqui, e não deve ser confundido com o AspMail, da ServerObjects!

Como estamos considerando e exigência de autenticação, o remetente não pode ser o usuário que preencheu o formulário. Para contornar o problema e permitir que seja possível responder diretamente por um cliente de correio, um endereço do próprio domínio do site é utilizado como remetente e ao mesmo tempo destinatário. O endereço do solicitante é utilizado como ReplyTo.

É importante lembrar que nesse exemplo não há nenhum teste de consistência. Para uso realmente profissional o desenvolvedor precisa considerar que campos devem ser obrigatórios e se o endereço preenchido é coerente. Isso pode ser feito facilmente usando-se funçôes JavaScript.

<% if Request.Form(”botao”) = “” then %>
<form method=”post”>
<table border=”1″ align=”center” cellPadding=”5″ cellSpacing=”0″>
<tr>
<td>Seu nome
<input name=”nome” /></td>
</tr>
<tr>
<td>Seu email
<input name=”email” /></td>
</tr>
<tr>
<td>Mensagem
<textarea cols=”60″ rows=”6″ name=”mensagem”></textarea></td>
</tr>
<tr>
<td><input name=”botao” type=”submit” /></td>
</tr>
</table>
</form>
<%
else
Set oMail = Server.CreateObject(”Persits.MailSender”)
oMail.Host = “mail.dominio.com.br”
oMail.From = “contato@dominio.com.br”
oMail.UserName = “contato@dominio.com.br”
oMail.PassWord = “senha”
oMail.FromName = Request.Form(”nome”)
oMail.AddAddress “contato@dominio.com.br”, “Página de contato”
oMail.AddReplyTo Request.Form(”email”), Request.Form(”nome”)
oMail.Subject = “Contato pelo site”
oMail.Body = Request.Form (”mensagem”)
oMail.Send

If Err <> 0 Then
Response.Write “<H2>Ocorreu um erro: ” & Err.Description & “</h2>”
else
Response.Write(”<H2>Obrigado, seu e-mail foi enviado com sucesso!</H2>”)
End If
Set oMail = Nothing
end if %>

O código-fonte está em http://noticias.aspecto.net/asp/contato.txt.

Quantos são e quem são os usuários online?
Qual o tempo médio de navegação por usuário?
Quais são os horários de maior atividade?
Qual o máximo de usuários navegando simultaneamente?

Os procedimentos utilizados no Sistema Monitor aqui descrito não são necessariamente os melhores em código ou performance. São, no entanto, o que considerei (segundo meu próprio julgamento) ao alcance da maioria dos usuários. Aqueles que esperam apenas “código mastigado” dificilmente farão proveito desse artigo. Um outro detalhe importante é que estou fazendo uso do Global.asa. Mais tarde vou escrever uma adaptação para quem não pode utilizar global.asa (normalmente em hospedagem gratuita).