 |
 |
 |
 |
 |
 |
 |
||||
 |
 |
 |
||||||||
 |
 |
|||||||||
 |
 |
|||||||||
 |
|
|
|
|
|
|
|
|
|
|
| HOSPEDAGEM DE SITES |
HOSPEDAGEM DE SITES - Manual de Conta Asp
Active Server Pages (ASP) é um ambiente de programação
que fornece a habilidade de combinar HTML, scripting e componentes para
criar aplicações Internet que rodam em seu servidor. Você
pode criar interfaces HTML para suas aplicações adicionando
comandos de scripts em suas páginas e pode encapsular sua lógica
em códigos reutilizáveis (O usuário não pode
ver o código fonte do script original). Você pode também
utilizar componentes instalados em nossos servidores em seus scripts.
Aspmail
Asp e MC Access
FTP
MySQL (Conexão sem DSN)
AspUpload
DSN
Senha em página ASP
AspEmail
O ASPMail é um componete
que possibilita enviar e-mails por páginas Web. Esse objeto é
normalmente utilizado para desenvolvimento de formulários. O Aspmail
só está disponível para contas ASP.
Disponibilizamos um exemplo do AspMail para envio de e-mail por
páginas Web. Em <--Início ASP--> estão os códigos
ASP para envio do
e-mail e em <--Início HTML--> está a parte responsável
por chamar os códigos ASP para o envio do e-mail.
Copie os códigos do exemplo abaixo e crie uma página ASP com o nome de aspmail.asp. Este arquivo deve conter as partes <--Início ASP--> e <--Início HTML--> juntas, uma abaixo da outra. Faça o upload do arquivo aspmail.asp no diretório de sua preferência (dentro da pasta www).
Para o funcionamento correto do script, em <--Início ASP-->, altere apenas os campos abaixo:
Em Mailer.FromName = "Seu_Nome",
substitua a parte "Seu_Nome" pelo nome do Remetente do E-mail
(seu nome).
Na linha Mailer.FromAddress = "seu_nome@seudominio.com.br" substitua
o endereço de e-mail "seu_nome@seudominio.com.br" pelo
endereço de e-mail remetente (seu e-mail).
Na linha Mailer.RemoteHost = "smtp.seudominio.com.br" substitua
a parte "seudominio.com.br" pelo endereço de seu web
site.
Copie os códigos aqui :
<--Início ASP--> (não copie essa linha)
<%
if request("botao") = "enviar" then
Set Mailer = Server.CreateObject("SMTPsvg.Mailer")
Mailer.FromName = "Seu_Nome"
Mailer.FromAddress= "seu_nome@seudominio.com.br"
Mailer.RemoteHost = "smtp.seudominio.com(.br)"
Mailer.AddRecipient "teste", request.form("para")
Mailer.Subject = request.form("assunto")
Mailer.BodyText = request.form("mensagem")
if Mailer.SendMail then
Response.Write "E-MAIL ENVIADO COM SUCESSO!"
else
Response.Write mailer.response
end if
response.end
end if
%>
<--Fim ASP--> (não copie essa linha)
<--Início HTML--> (não copie essa linha)
<html>
<head>
<title>LocalNet - Exemplo de AspMail</title>
<head>
<body>
<form method="POST" action="aspmail.asp">
<p>AspMail - Envio de E-mail através de página Web</p>
<table border="0" width="100%">
<tr>
<td width="14%">Para :</td>
<td width="86%"><input type="text" name="para"
size="20"></td>
</tr>
<tr>
<td width="14%">Assunto :</td>
<td width="86%"><input type="text" name="assunto"
size="20"></td>
</tr>
<tr>
<td width="14%">Mensagem :</td>
<td width="86%"><textarea rows="2" name="mensagem"
cols="20"></textarea></td>
</tr>
<tr>
<td width="14%"></td>
<td width="86%"><input type="submit" value="enviar"
name="botao"></td>
</tr>
</table>
</form>
</body>
</html>
<--Fim HTML--> (não copie essa linha)
* Por se tratar de programação ASP, não ofereceremos
suporte se os códigos do exemplo forem alterados para inclusões
de campos adicionais ou demais alterações.
Utilizando o MsAcces, é possível compartilhar informações
com recursos para criação e publicação de
páginas interativas na Web com links ativos para o seu banco de
dados.
Esse recurso permite que os usuários estendam os aplicativos do
banco de dados para a internet, criando páginas de HTML vinculadas
a dados para consulta, atualização de páginas, etc...
Disponibilizamos um exemplo de integração de um banco de
dados MsAccess 97 utilizando ASP (Active Server Pages).
1 - Criar o Banco de Dados
Seguindo nosso exemplo, você deverá criar um banco de dados com o nome de contatos.mdb. Este banco deve conter uma tabela com o nome de "contatos" e campos "nome" e "email". Adicione alguns registros nesse banco de dados, eles serão apresentados em na página .asp que criaremos.
2 - Criar uma página .asp para apresentação dos dados do banco.
Copie o código abaixo e crie uma página
.asp com o nome de contatos.asp.
Nos códigos, criamos duas tabelas; uma em html normal, e outra
com os códigos ASP responsáveis por receber as informações
do banco de dados e apresenta-las na página.
Copie os códigos aqui :
<--Início--> (não copie essa linha)
<%
Set Conexao = Server.CreateObject("ADODB.Connection")
Set Infobanco= Server.CreateObject("ADODB.RecordSet")
Conexao.Open "DBQ=D:\web\seu_login\dados\nome_do_banco.mdb;Driver={Microsoft
Access Driver (*.mdb)}"
Infobanco.Open "contatos",Conexao
%>
<html>
<body>
<table border="1" width="322">
<% While Not Infobanco.EOF %>
<tr>
<td><%= Infobanco("nome") %></td>
<td><%= Infobanco("email") %></td>
<tr>
<%
Infobanco.MoveNext
Wend
%>
</table>
<p>Código html sem ASP</p>
<table border="1" width="322">
<td width="92">Silva</td>
<td width="214">silva@dominio.com.br</td>
</tr>
<tr>
<td width="92">Ana</td>
<td width="214">anana@provedor.com.br</td>
</td>
</tr>
</table>
</body>
</html>
<%
Infobanco.Close
Conexao.Close
Set Infobanco = Nothing
Set Conexao = Nothing
%>
<--Fim--> (não copie essa linha)
3 - Configurar o arquivo contatos.asp para sua conta
A única alteração para
o funcionamento do exemplo é na linha:
d:\web\seu_login\dados\nome_do_banco.mdb
Esse é o caminho físico para acesso ao banco de dados. Em
"seulogin" altere pelo login de FTP de sua conta e em nome_do_banco.mdb,
pelo nome do banco, no exemplo contatos.mdb
Entenda o código:
Vamos dividir o código do exemplo em
algumas partes e explicar o funcionamento de cada uma:
Os códigos abaixo define o caminho de acesso ao banco abre a conexão
com o banco em sua conta.
<%
Set Conexao = Server.CreateObject("ADODB.Connection")
Set Infobanco= Server.CreateObject("ADODB.RecordSet")
Conexao.Open "DBQ=D:\web\seu_login\dados\nome_do_banco.mdb;Driver={Microsoft
Access Driver (*.mdb)}"
Infobanco.Open "contatos",Conexao
%>
- A parte que se inicia o HTML, configura uma tabela para receber os dados do banco. Note que a tabela ASP que receberá os dados do banco é diferente da tabela HTML. Compare os códigos:
ASP
<html>
<body>
<table border="1" width="322">
<% While Not Infobanco.EOF %>
<tr>
<td><%= Infobanco("nome") %></td>
<td><%= Infobanco("email") %></td>
<tr>
HTML
</table>
<p>Código html sem ASP</p>
<table border="1" width="322">
<td width="92">Silva</td>
<td width="214">silva@dominio.com.br</td>
</tr>
<tr>
<td width="92">Ana</td>
<td width="214">anana@provedor.com.br</td>
</td>
</tr>
</table>
</body>
</html>
- Estes comandos são responsáveis por efetuar o looping no banco para apresentar todos os dados.
<%
Infobanco.MoveNext
Wend
%>
- Para finalizar, deve-se fechar a conexão com o banco de dados com os códigos abaixo:
<%
Infobanco.Close
Conexao.Close
Set Infobanco = Nothing
Set Conexao = Nothing
%>
NOTA: Se os campos ou nome da tabela no banco
de dados "contatos.mdb " ou campos do arquivo exemplo "contatos.asp"
forem alterados, poderão não funcionar corretamente por
se tratar de programação ASP.
Não ofereceremos suporte se os códigos do exemplo forem
alterados para inclusões de campos adicionais ou demais alterações.
Publicar os arquivos no FTP e realizar o teste de acesso via Web
Você pode publicar seus arquivos utilizando um programa de FTP ou
pelo FrontPage. O arquivo "contatos.mdb" deve ser publicado
no diretório "dados" de seu FTP. Ele contém as
permissões necessárias para acesso a bancos de dados.
O arquivo contatos.asp deve ser publicado no diretório "www"
que é o diretório raiz de sua conta, onde deverão
ficar suas páginas, imagens, etc...
Mais detalhes sobre publicação
FTP , Clique Aqui
Mais detalhes sobre publicação Frontpage , Clique Aqui
Conectando bancos de dados MySQL no ASP
O servidor de banco de dados MySQL não
é mais uma exclusividade dos servidores Linux, nem da linguagem
PHP. Com o MyODBC, um driver ODBC para acessar servidores MySQL, diversos
programas e outras linguagens também podem usar essa poderosa ferramenta.
Dentre eles, o Visual Basic, o Delphi, o Excel, o Cold Fusion e o ASP.
São Muitas vantagens.
O MySQL é mais eficiente que o Access, portanto, o seu site pode
ficar muito mais rápido sem que seja feita nenhuma alteração
na programação. Além disso, se você desenvolve
sites em diversas linguagens, não precisa criar bancos de dados
duplicados (um no SQL Server, outro no MySQL, e outros) pois tudo pode
ficar num só local, economizando tempo no desenvolvimento do site.
Conexão sem DSN:
A principal diferença entre uma conexão com DSN e outra sem é quem neste segundo método as informações que você configurou no ODBC são digitadas diretamente no código ASP, sem nenhuma interfase do Windows.
A opção diver define o tipo de banco de dados, a server informa o endereço do servidor, a uid e a pwd os dados do seu usuário e a database seleciona o banco de dados.
<%
Set cnnDB = Server.CreateObject("ADODB.Connection")
cnnDB.ConnectionString = "driver=MySQL;server=mysql.8x.com.br;uid=usuario;pwd=senha;database=banco_de_dados"
cnnDB.Open
%>
A LocalNet não criará DSN para banco Mysql, todas as conexões
terão que ser feitas via ODBC*
* Exceto registro de DSN para coldfusion.
O AspUpload é um objeto da linguagem ASP que permite o envio de
arquivos, para sua conta, através da interface Web.
A HostSul disponibiliza um modelo de AspUpload para seu site.
AspUpload
Para utilizar o AspUpload, é necessário criar dois arquivos. O primeiro arquivo é responsável por selecionar os arquivos para upload e "chamar" o código ASP que irá executar o upload. O segundo receberá as informações dos arquivos selecionados para envia-los ao servidor.
O AspUpload já está ativo em todas as contas ASP, para utilizá-lo, siga os passos abaixo :
1. Copie abaixo os códigos <--Início
seleciona.asp--> e salve com o nome "seleciona.asp". Esse
será o primeiro arquivo.
2. Copie os códigos <--Início aspupload.asp--> e salve
com o nome "aspupload.asp". Esse será o segundo arquivo.
Para o funcionamendo correto do script, em <--Início aspupload.asp-->,
altere apenas os campos abaixo:
Em Set Upload = Server.CreateObject("Persits.Upload") Count
= Upload.Save("d:\web\seu_login\www") altere a parte "seu_login"
pelo nome do seu login utilizado para FTP. O caminho "d:\web\seu_login\www"
se refere ao caminho de sua conta. Neste exemplo, os arquivos serão
enviados para o diretório "www".
Para o funcionamento correto do script, você deve criar um diretório
chamado upload e solicitar a "permissão de gravação"
nesse diretório através do nosso e-mail suporte@hostsul.com.br.
Se você desejar outro nome para o diretório, apenas altere
na linha "d:\web\seu_login\www\upload" a parte "upload",
pelo nome do diretório desejado e solicite a setagem com o nome
do diretório criado.
3. Faça o upload dos arquivos no diretório "upload"
ou no diretório escolhido (dentro do www).
Copie os códigos aqui :
<--Início seleciona.asp--> (não copie essa linha)
<HTML>
<BODY BGCOLOR="white">
<H1>AspSmartUpload : Selecione os Arquivos</H1>
<HR>
<FORM METHOD="POST" ACTION="aspupload.asp" ENCTYPE="multipart/form-data">
<INPUT TYPE="FILE" NAME="FILE1" SIZE="50"><BR>
<INPUT TYPE="FILE" NAME="FILE2" SIZE="50"><BR>
<INPUT TYPE="FILE" NAME="FILE3" SIZE="50"><BR>
<INPUT TYPE="FILE" NAME="FILE4" SIZE="50"><BR>
<INPUT TYPE="SUBMIT" VALUE="Upload">
</FORM>
</BODY>
</HTML>
<--Fim seleciona.asp--> (não copie essa linha)
<--Inicio aspupload.asp--> (não copie essa linha)
UploadScript1.asp
<HTML>
<BODY>
<%
Set Upload = Server.CreateObject("Persits.Upload")
Count = Upload.Save("d:\web\login\www")
Response.Write Count & " Arquivo(s) enviados com sucesso"
%>
</BODY>
</HTML>
<--Fim aspupload.asp--> (não copie essa linha)
Por se tratar de programação ASP, não ofereceremos suporte se os códigos do exemplo forem alterados para inclusões de campos adicionais ou demais alterações.
Em sua conta ASP, você também poderá trabalhar com
DSN (Data Source Name), em suas aplicações ASP.
A criação do DSN sempre será realizada por nossa
equipe de suporte técnico. Para isso, basta entrar em contato conosco
através de do e-mail de suporte suporte@hostsul.com.br, nos informando
o nome do seu banco de dados e a localização dele.
Aconselhamos que seus bancos de dados sejam armazenados dentro de sua
pasta dados, pois esta já tem todas as permissões necessárias
para o correto funcionamento de seu banco de dados, e ela está
em um nível mais seguro de sua conta, onde esta pasta nunca conseguirá
ser acessada via http.
Exemplo
Veja o exemplo de uma conexão ao banco de dados, com dsn com login e senha:
<%
set Conn = server.createobject("adodb.connection")
Conn.open "DSN=dsn"
%>
Onde "dsn" será o nome do DSN solicitada (seu login).
Utilizando o exemplo abaixo, você poderá restringir o acesso
a uma página ASP, definindo login e senha para acesso.
Exemplo: O código é dividido em 3 partes. A primeira parte
se define o usuário e senha, a segunda parte são os códigos
da página protegida e a terceira parte é o formulário
que receberá os dados de usuário e senha. O código
é único, ou seja, não deve ser criado arquivos separados.
Para utilizar o exemplo, basta alterar o nome do usuário e senha,
e incluir os códigos de sua página na parte de página
protegida.
Para testar o modelo, copie o código abaixo e crie um arquivo chamado senha.asp.
<--Início senha.asp--> (não copie essa linha)
<%
if request("botao") = "enviar" then
if request("usuario") = "teste" and request("senha")
= "hostsul" then
%>
<p align="center"><font face="Verdana" size="6"> Essa é a página Secreta !!!</font></p>
<%
response.end
end if
end if
%>
<form method="POST" action="senha.asp">
Login: <input type="text" name="usuario" size="20"><br>
Senha: <input type="password" name="senha" size="20"><br>
<input type="submit" value="enviar" name="botao">
</form>
</html>
<--Fim senha.asp--> (não copie essa linha)
Descrições
Na linha if request("usuario") =
"teste" and request("senha") = "hostsul"
then, se define o usuário e senha. O usuário é "teste"
e senha "hostsul"
Na Linha <p align="center"><font face="Verdana"
size="6">, Essa é a página Secreta !!!</font></p>,
se inicia o código da página protegida.
Na linha <form method="POST" action="senha.asp">,
se inicia o código do formulário que receberá os
dados de usuário e senha.
Segue abaixo um exemplo de código AspE-mail:
<%
Set Mail = Server.CreateObject("Persits.MailSender")
Mail.Host = "smtp.smtp-server.com" ' Specify a valid SMTP server
Mail.From = "sales@veryhotcakes.com" ' Specify sender's address
Mail.FromName = "VeryHotCakes Sales" ' Specify sender's name
Mail.AddAddress "andy@andrewscompany.net",
"Andrew Johnson, Jr."
Mail.AddAddress "paul@paulscompany.com" ' Name is optional
Mail.AddReplyTo "info@veryhotcakes.com"
Mail.AddAttachment "c:\images\cakes.gif"
Mail.Subject = "Thanks for ordering our
hot cakes!"
Mail.Body = "Dear Sir:" & Chr(13) & Chr(10) & _
"Thank you for your business."
On Error Resume Next
Mail.Send
If Err <> 0 Then
Response.Write "Error encountered: " & Err.Description
End If
%>
• Home |