ACTIVAÇÃO WEBMAIL  
  Para Activar ou Configurar os seus serviços Net4B   Para utilizar o seu serviço de Faxmail e Webmail
Suporte
 
Menu

Administração do Portal
dial up
Mail
Web Mail
News
Web Host
Fax Mail

Webhost

Windows/IIS

Características

Este alojamento suporta:

  • HTML
  • Javascript
  • ASP (exemplo para enviar e-mails)

Não suporta:

  • PHP
  • CGI
  • Perl
  • FrontPage Extensions

O upload é feito utilizando o protocolo FTP para o servidor ftp.net4b.pt*, os ficheiros da página devem ser colocados na pasta Web.

Os ficheiros iniciais são (por ordem de prioridade):

home.asp
index.htm
index.html
index.asp
default.htm
default.html
default.asp

Pode também guardar ficheiros nesta área de alojamento (só a directoria Web está disponível para a Internet).

A directoria web é disponibilizada através do URL associado ao webhost.

Pode consultar as estatísticas dos acessos à sua página no endereço http://<endereço_do_webhost>/stats será necessário autenticar-se com o seu login de acesso ao webhost.

* Este serviço funciona num sistema Unix.

ASP (Exemplo – Enviar E-mails)

O envio de E-mails via programação nas páginas alojadas em serviços de webhosting em servidores Microsoft Windows na Oni é efectuado através de um componente devidamente registado nos servidores.

O componente usado para o efeito é o AspEmail da Persists.

É objectivo desta descrição é ajudar os clientes dos serviços de webhosting da Oni, a efectuarem uma utilização correcta deste componente sempre que necessitem de enviar emails através das páginas alojadas.

1. Criação de uma instância do componente

Set Mail = Server.CreateObject(“Persits.MailSender”)

2. Propriedades do componente

a. Host As String

Obrigatório. Esta propriedade representa o endereço internet do servidor SMTP que vai ser usado no envio do email.

Mail.Host = “mailhub.lx.esp”


b. From As String

Obrigatório. O endereço de email do emissor.

Mail.From = "exemplo@dominio.pt"


c. FromName As String

O nome completo do emissor.

Mail.FromName = "Nome"

d. Subject As String

O assunto do email.

Mail.Subject = "Este é o assunto do email"

e. Body As String

O corpo do email.

Mail.Body = "Caro Senhor:" & Chr(13) & Chr(10) & "Obrigado pela sua ajuda."

f. AltBody As String

A versão de texto alternativa do corpo da mensagem. A utilização desta propriedade implica que o componente vai gerar mensagens multipart/alternative. Quando esta propriedade é usada a propriedade IsHTML (definida a seguir) fica com o valor True.

g. IsHTML As Boolean

False por defeito. Se for instanciada com o valor True, o componente vai ajustar o CONTENT-TYPE do corpo da mensagem para TEXT/HTML.


3. Métodos do componente

a. AddAddress(Email As String, Optional Name)

Adiciona um endereço de email e opcionalmente o nome completo à lista TO (destinatários da mensagem).

b. AddCC(Email As String, Optional Name)

Adiciona um endereço de email e opcionalmente o nome completo à lista CC (destinatários copiados da mensagem).

c. AddBCC(Email As String, Optional Name)

Adiciona um endereço de email e opcionalmente o nome completo à lista BCC (destinatários copiados da mensagem que não são visíveis).

d. AddReplyTo(Email As String, Optional Name)

Adiciona um endereço de email e opcionalmente o nome completo à lista REPLY-TO (lista de endereços a quem responder).

e. AddAttachment(Path As String)

Adiciona um caminho de um ficheiro à lista de attachments (ficheiros em anexo) que serão enviados com a mensagem.

f. AddEmbeddedImage(Path As String, ContentID As String)

Adiciona um ficheiro de imagem à lista de imagens embutidas no corpo da mensagem. O campo ContentID é uma string sem espaços no meio como “My-image” que será referenciada no HTML do corpo da mensagem da seguinte forma:

<IMG SRC=cid:My-image>

ou

<BODY BACKGROUND=cid:My-image>

g. AddCustomHeader(Header As String)

Adiciona um cabeçalho customizado à mensagem. Exemplo:

Mail.AddCustomerHeader “Return-Receipt-To: <name@domain.com>”

h. AppendBodyFromFile(Path As String, Optional AddToBody)

Adiciona a propriedade Body do texto ou HTML especificado pelo campo Path. Se o campo AddToBody tiver o valor False, o conteúdo do ficheiro é anexado ao AltBody em alternativa ao Body.

i. Send()

Envia uma mensagem. Despoleta uma excepção em caso de erro.


j. EncodeHeader(Header As String) As String

Converte uma string que contém caracteres que não sejam US-ASCII para um formato aceitável para campos de cabeçalho de email como Subject: ou From:. Exemplo:

Mail.Subject = Mail.EncodeHeader(“Assunto qualquer”)


4. Exemplo de uma chamada ao componente através de uma form de HTML

<html>
<head>

<TITLE>Oni</TITLE>

</head>

<body>


<% if Request("enviar") = "sim" then

mailto = "user@domínio.xx"
mailtoName = "User"
Dim strBody
strBody = "Corpo" & Chr(13) & Chr(10) & Chr(13) & Chr(10)
strBody = strBody & "Dados Pessoais" & Chr(13) & Chr(10) & Chr(13) & Chr(10)
strBody = strBody & "Nome: " & Request.Form("Nome") & Chr(13) & Chr(10)
strBody = strBody & "Nº de Indentificação Fiscal: " & Request.Form("nif") & Chr(13) & Chr(10)
strBody = strBody & "Morada: " :Request.Form("Morada") & Chr(13) & Chr(10)
strBody = strBody & "Código Postal: " & Request.Form("cp") & Chr(13) & Chr(10)
strBody = strBody & "Localidade:" & Request.Form("Localidade") & Chr(13) & Chr(10)
strBody = strBody & "Nome do Contacto: " & Request.Form("NContacto") & Chr(13) & Chr(10)
strBody = strBody & "Titulo: " & Request.Form("Titulo") & Chr(13) & Chr(10)
strBody = strBody & "Telefone: " & Request.Form("TContacto") & Chr(13) & Chr(10)
strBody = strBody & "Fax: " & Request.Form("Fax") & Chr(13) & Chr(10) & Chr(13) & Chr(10)
strBody = strBody & "Email: " & Request.Form("Email") & Chr(13) & Chr(10)
strBody = strBody & "Descrição: " & Request.Form("Descricao") & Chr(13) & Chr(10) & Chr(13) & Chr(10)


Set Mail = Server.CreateObject("Persits.MailSender")
Mail.Host = "mailhub.lx.esp"
Mail.From = Request.Form("Email")
Mail.FromName = Request.Form("Nome")
Mail.AddAddress mailto, mailtoName
Mail.Subject = "Contacto"
Mail.Body = strBody

On Error Resume Next

Mail.Send
If Err <> 0 Then
Response.Write "<p>Não foi possível enviar a informação. Por favor tente mais tarde.</p>"
else
Response.Write "<p>Obrigado pelo seu interesse.</p>"
End If
else%>
<form name="Formulário de contactos" action="formmail.asp?enviar=sim" method=post>
<table cellspacing=0 cellpadding=0 width=400 border=0>
<tbody>
<tr>
<td width=150 bgcolor=#ffffff>&nbsp;</td>
<td bgcolor=#ffffff
colspan=4>&nbsp;</td>
</tr>
<tr>
<td width=150 bgcolor=#ffffff>Nome*</td>
<td bgcolor=#ffffff colspan=4>
<input size=40 name=Nome>
</td>
</tr>
<tr>
<td width=150 bgcolor=#ffffff>NIF</td>
<td bgcolor=#ffffff colspan=4>
<input size=40 name=nif>
</td>
</tr>
<tr>
<td width=150 bgcolor=#ffffff>Morada*</td>
<td bgcolor=#ffffff colspan=4>
<input size=40 name=Morada>
</td>
</tr>
<tr>
<td width=150 bgcolor=#ffffff>CP*</td>
<td bgcolor=#ffffff colspan=4>
<input size=40 name=cp>
</td>
</tr>
<tr>
<td width=150 bgcolor=#ffffff>Localidade*</td>
<td bgcolor=#ffffff colspan=4>
<input size=40 name=Localidade>
</td>
</tr>
<tr>
<td width=150 bgcolor=#ffffff>Nome
contacto*</td>
<td bgcolor=#ffffff colspan=4>
<input size=40 name=NContacto>
</td>
</tr>
<tr>
<td width=150 bgcolor=#ffffff>Titulo</td>
<td bgcolor=#ffffff colspan=4>
<input size=40 name=Titulo>
</td>
</tr>
<tr>
<td width=150 bgcolor=#ffffff>Telefone
de contacto*</td>
<td width=20 bgcolor=#ffffff>
<input size=12 name=TContacto>
</td>
<td width=20 bgcolor=#ffffff>Fax</td>
<td bgcolor=#ffffff colspan=2>
<input size=12 name=Fax>
</td>
</tr>
<tr>
<td bgcolor=#ffffff>E-mail</td>
<td bgcolor=#ffffff colspan=4>
<input
class=campos_formulario size=40 name=Email>
</td>
</tr>
<tr>
<td bgcolor=#ffffff>&nbsp;</td>
</tr>
<tr>
<td bgcolor=#ffffff colspan=5>
<p>&nbsp;</p>
</td>
</tr>
<tr align=middle>
<td width=148 bgcolor=#ffffff>&nbsp; </td>
<td align=left bgcolor=#ffffff colspan=4>
<input type=submit value=Enviar>
<input type=reset value=Limpar>
</td>
</tr>
</tbody>
</table>
<p><br>
</p>
</form>

<%end if%>

</td>
</tr>
</table>
</td>
</tr>
<tr>
<td align="right">&nbsp;</td>
</tr>
<tr>
<td align="right">
<p>
</p>
</td>
</tr>
<tr>

<td>&nbsp;</td>
</tr>
</table>
</td>
</tr>
</table>


</td>
</tr>
<tr>
<td width="100%" valign="top" height="13">&nbsp;</td>
</tr>
</table>

</body>
</html>

 

<& /mason/footer &>