Jump to content


direisc

Member Since 07/01/2005
Offline Last Active 11/08/2005, 16:58
-----

Topics I've Started

Cdonts

03/06/2005, 15:15

assim estou usando um sistema aqui q faz um upload e depois redireciona para uma pagina que envia o email
a pagina que envia é assim:
<%
remetente = Trim(Request.QueryString("remetente"))
assunto = Trim(Request.QueryString("assunto"))
mensagem = Trim(Request.QueryString("mensagem"))

//comeca o envio do email agora
set objMail = server.createobject("CDONTS.NewMail")
objMail.From = remetente
objMail.To = "contato@azero.com.br"
objMail.Subject = assunto
objMail.Body = mensagem
objMail.BodyFormat = 0
objMail.MailFormat = 0
objMail.Send
Response.Write "Mensagem e arquivo enviado com sucesso!<br><a href='form_up.asp'>clique aqui para retornar ao formulário de uploads.</a><br>"
Response.Write "Caso já tenha enviado o(s) arquivo(s) que pretendia <a href='close.asp'>clique aqui para fechar esta janela</a>"
set objMail = Nothing
%>
eu mando pra essa pagina uma query bem maluca tipo:
avisar.asp?remetente=diego&assunto=titulo do email&mensagem=texto da mensagem<br><a href="link.jpg>baixar</a>
o problema é que nao esta enviando o email o que eu preciso fazer pra poder resgatar corretamente html da query? eu coloquei aquele trim ali mas nem sei pra que serve pq eu vi ele em varios lugares (scripts) dae coloquei ae pra ver se era ele o responsavel pelo processo mas nao mudo em nada

uma outra duvida seria como escapar caracteres para enviar como a aspa dupla
coloca-se o q tipo var = "testo com ""aspas""."
uma aspas duplas pra escapa a aspa ou coloca barra invertida?
ou o q coloca

Asp Upload E Cdonts

02/06/2005, 14:53

agora nao da mais erro no if so que ainda nao envia ta dando erro agora dizendo q nao pode criar o componente especificado mas eu ja usei ele outrora, so que sem mandar email so fazia o upload mesmo
alguem tem aguma solução
<%
'inicia o componente de upload
Set upload = Server.CreateObject("Persists.Upload")

'faz o upload para o diretório online
upload.Save "\\caminho\para\servidor\new\updown"

'pega os dados do arquivo para ser resgatados posteriormente
Set arquivo = upload.files("file")

'verifica se tem um arquivo, caso positivo ele recolhe os dados.
If Not arquivo Is Nothing Then
	Set remetente = upload.Form("remetente")
	Set assunto = upload.Form("assunto")
	Set mensagem = upload.Form("mensagem")
	Set filename = arquivo.ExtractFilename
	Set link = "<a href='http://www.site.com.br/new/updown/"&filename&"'>"&filename&"</a>"
	Set agrupamento = mensagem&"<br><br>------------------------------Arquivo enviado para o servidor:<br>"&link
	'comeca o envio do email agora
	set objMail = server.createobject("CDONTS.NewMail")
	objMail.From = remetente
	objMail.To = "contato@site.com.br"
	objMail.Subject = assunto
	objMail.Body = agrupamento
	objMail.BodyFormat = 0
	objMail.MailFormat = 0
	objMail.Send
	Response.Write "Mensagem e arquivo enviado com sucesso!<br><a href='form_up.asp'>clique aqui para retornar ao formulário de uploads.</a><br>"
	Response.Write "Caso já tenha enviado o(s) arquivo(s) que pretendia <a href='close.asp'>clique aqui para fechar esta janela</a>"
	set objMail = Nothing
Else
	Response.Write "Erro no envio do arquivo."
End If
%>

Semelhança Entre Php E Asp

02/06/2005, 10:03

Eu to tentando achar mas não lembro onde eu tinha visto, ja usei a busca pra todos os lados e não encontrei o topico que mostrava as semelhancas entre esses dois.
era coisa do tipo:
echo = response.writh

sabem se algume tem o link disso ae e puder me ajudar :unsure:

Html Com Imagem Por Email

01/06/2005, 14:58

// Script criado por Alexx Ares - alexxares@bol.com.br
// © 2004 - Pode usar a vontade! 

// Inicialmente, vamos setar os dados de configuração.
// Podem ser campos enviados por um fórmulário, ou 
// resgatados do banco de dados... basta adicionar os 
// scripts que forem necessários.
// Ex: $nome = "$HTTP_POST_VARS[nome]";

// Primeiro, o nome e email de quem envia
$nome_r = "Seu Nome";
$email_r = "seu@email.com.br";

// Depois, nome e email do destinatário
$nome_d = "Destinatário";
$email_d = "email@destino.com.br";

// Assunto da mensagem
$assunto = "Assunto do email";

// Texto principal da mensagem
$texto = "Texto do seu email. Pode ser formatado com <b>HTML</b>";

// Para enviar cópia oculta, deixe $copia = "sim"
$copia = "sim";

// Email para cópia oculta. Pode ser uma lista de emails, separados por ","
$email_c = "email@oculto.com.br";
if($copia=="sim"){ $bcc = "Bcc: $email_c\n"; } else { $bcc = ""; }

// Pronto, configurado.
// Agora vamos criar as partes do email, corpo e imagens.

// Abaixo o script para adicionar um logotipo no email.
// Para cada imagem que for utilizar, copie e cole o script
// alterando o nome ( no caso, "top" )
$img_top_nome = "top.gif";
$img_top_abre = fopen("caminho/da/imagem/$img_top_nome", "r");
$img_top_show = fread($img_top_abre, filesize("caminho/da/imagem/$img_top_nome"));
$img_top_code = chunk_split(base64_encode($img_top_show));
$img_top_cid = "identificador_da_imagem";

// Abaixo vai o código HTML.
// Lembre-se das regras do PHP, como incluir \ antes de ", etc..
// Não copie e cole direto do seu Frontpage ou Dreamweaver...
$body_html = "<html><head>
<meta http-equiv=\"Content-Type\" content=\"text/html; charset=iso-8859-1\">
</head><body bgcolor=\"#FFFFFF\"><div align=\"center\">
<table width=\"478\" border=\"0\" cellspacing=\"10\" cellpadding=\"0\"><tr><td>
<img src=\"cid:$img_top_cid\"></td></tr><tr><td>
<p><font face=\"Verdana, Arial\" size=\"1\">$texto</font></p>
<p><font face=\"Verdana, Arial\" size=\"1\"><b>
Sua assinatura vai aqui!
</a></b></font></p></td></tr></table></div></body></html>";

// Script para transformar o código em texto simples
// Não é necessário alterar.
$body_text = str_replace("<br>","\n",$body_html);
$body_text = strip_tags("$body_text");


// O Email é no formato MIME multipart.
// Abaixo os separadores das partes
$sep_0 = "===SEPARADOR_0000000000===";
$sep_1 = "===SEPARADOR_1111111111===";

// Aqui começa o Header da mensagem. Não é necessário alterar nada.
$header = "";
$header.= "From: $nome_r <$email_r>\n";
$header.= "$bcc";
$header.= "Content-type: multipart/related; type=\"multipart/alternative\";\n";
$header.= "              boundary=\"$sep_0\"\n";
$header.= "MIME-Version: 1.0\n";

// Altere para 1 e para High e o email terá "urgência"
$header.= "Priority: 3\n";
$header.= "X-Priority: Normal\n";

// Programa que enviou o email  =)
$header.= "X-Mailer: Alexx Ares HTML Mail 2004\n";
$header.= "          © Alexx Ares - alexxares@bol.com.br\n";
$header.= "\n\n";

// Aviso para emails antigos que não suportam MIME
$header.= "Esta é uma mensagem multi-partes em formato MIME.\n";
$header.= "\n";
$header.= "This is a multi-part message in MIME format.\n";
$header.= "\n\n";

// Aqui começa o corpo do email. 
// Ele vai com dois códigos alternativos, HTML e texto puro
// O próprio programa de email escolhe o melhor
// No final, vão as imagens.
$mensagem = "--$sep_0\n";
$mensagem.= "Content-Type: multipart/alternative; boundary=\"$sep_1\"\n";
$mensagem.= "\n";

$mensagem.= "--$sep_1\n";
$mensagem.= "Content-Type: text/plain; charset=\"iso-8859-1\"\n";
$mensagem.= "Content-Transfer-Encoding: 7bit\n";
$mensagem.= "\n$body_text\n";
$mensagem.= "\n";

$mensagem.= "--$sep_1\n";
$mensagem.= "Content-Type: text/html; charset=\"iso-8859-1\"\n";
$mensagem.= "Content-Transfer-Encoding: 7bit\n";
$mensagem.= "\n$body_html\n";
$mensagem.= "\n";

$mensagem.= "--$sep_1--\n";
$mensagem.= "\n";

// Aqui o código para uma imagem.
// para mais imagens, copie e cole, alterando o nome "top"
$mensagem.= "--$sep_0\n";
$mensagem.= "Content-Type: image/gif; name=\"$img_top_nome\"\n";
$mensagem.= "Content-Transfer-Encoding: base64\n";
$mensagem.= "Content-ID: <$img_top_cid>\n";
$mensagem.= "\n$img_top_code\n";
$mensagem.= "\n";

// Fim da mensagem!
$mensagem.= "--$sep_0--";

// Agora é só enviar!!
$enviar = @mail("$nome_d<$email_d>","$assunto",$mensagem,$header);
estou tentando usar este code ae so q meu email ta chegando em branco o q pode ser?

Problemas De Adaptação

30/05/2005, 16:56

assim ja fiz isso no PHP so que o site que vo fazer so tem asp no servidor <_< e o dono nao quer efetuar a troca do plano (até porque vai custar R$60,00 pra tal ação, isso é coisa do servidor terra)
então vo te que usar em ASP mesmo
só que eu não sei tanto de ASP quanto eu sei de PHP, que por sinal já é muito pouco, então é assim é um sistema de login com banco de dados até ai sem problemas ne
no codigo em php eu faço assim:
conecto no db pego uma queri tipo select * from tabela where login=login AND senha = senha
blz sem problemas no asp é igual
so que pra verificar e passar as variaveis eu faco a seguinte verificacao vejo se afetou pelo menos uma linha do banco
se este nume for 1 eu executo as funcoes e pego os dados e mando um echo com &ok=true&variavel=1 e por ae vai
so que no ASP eu não to sabendo pegar a quantidade de linhas afetadas na consulta e nem os dados especificos da linha
alguem pode dar uma forcinha ae

bom aki esta o codigo em php que eu to usando queria passar o maledito pra ASP
so que com coneccao ao MSDE (igual ao sql server)
<?
include("config.php");
$usuario = $_POST["usuario"];
$senha = $_POST["senha"];
$logar = @mysql_query("SELECT * FROM usuarios WHERE usuario_usuario = '$usuario' AND usuario_senha = '$senha'");
$logado = mysql_num_rows($logar);
if($logado == 1) {
	$tipo = mysql_result($logar,0,"usuario_tipo");
	$nome = mysql_result($logar,0,"usuario_nome");
	echo "&ok=1&tipo=$tipo&nome=$nome";
} else {
	echo "&ok=0";
}
?>

IPB Skin By Virteq