ennio

por favor me expliquem o porquê desse código não funciona no windows 7 64 bit, porém funciona no windows xp 32 bits normalmente, sem nenhum problema... está funcionando muito bem no S. Operacional XP, quando coloco no windows 7 64 dar a seguinte msg.

CDO.Message.1 error '80040220'
<FONT size=2 face=Arial>The "SendUsing" configuration value is invalid

Observe: não é erro de programação, pois está funcionando bem eu consigo receber as mensagens pelo meu yahoo. O problema é que gostaria de roda no windows 7 64 bits... estou no fórum, mas já venho árduos dias pesquisando isso, e sou vou sossegar quando resolver esse problema do porquê não funciona no windows 64 bit
veja o código:

MEU FORMULÁRIO:

<title>Teste</title>
<form action="cdosys_form.asp" method="post" name="MyForm" id="MyForm">
  <table border="0" align="center" cellpadding="3" cellspacing="1" bgcolor="#FFFEE8">
	<tr> 
  	<td><font size="2" face="Arial, Helvetica, sans-serif"><strong>Primeiro 
    	Nome</strong></font></td>
  	<td> <font size="2" face="Arial, Helvetica, sans-serif"> 
    	<input name="nome" type="text" id="nome" size="30">
    	</font></td>
	</tr>
	<tr> 
  	<td><font size="2" face="Arial, Helvetica, sans-serif"><strong>Sobrenome</strong></font></td>
  	<td><font size="2" face="Arial, Helvetica, sans-serif"> 
    	<input name="sobrenome" type="text" id="sobrenome" size="30">
    	</font></td>
	</tr>
	<tr> 
  	<td><font size="2" face="Arial, Helvetica, sans-serif"><strong>Email </strong></font></td>
  	<td><font size="2" face="Arial, Helvetica, sans-serif"> 
    	<input name="email" type="text" id="email" size="30">
    	</font></td>
	</tr>
	
  	<td valign="top"><font size="2" face="Arial, Helvetica, sans-serif"><strong>Coment&aacute;rios</strong></font></td>
  	<td><font size="2" face="Arial, Helvetica, sans-serif">
    	<textarea name="obs" cols="28" rows="6" wrap="VIRTUAL" id="obs"></textarea>
  	</font></td>
	</tr>
	<tr> 
  	<td colspan="2"><div align="center"> <font size="2" face="Arial, Helvetica, sans-serif"> 
      	<input type="submit" name="Submit" value="Enviar">
      	</font></div></td>
	</tr>
  </table>
</form>

MEU SCRIPT EM ASP:

	'First lets Dim all the variables we need
	Dim MyMail
	Dim MyBody
	Dim MyEmail
	Dim MyFirstname
	Dim MyLastname
	Dim MyComments

	'Now lets get some values for the variables from the form
	MyEmail = Request.Form("email")
	MyFirstname = Request.Form("nome")
	MyLastname = Request.Form("sobrenome")
	MyComments = Request.Form("obs")

	'Now lets build the body of the email from the data in the form
	MyBody = "Nome: "& MyFirstName & vbcrlf
	MyBody = MyBody & "Sobrenome: "& MyLastName & vbcrlf
	MyBody = MyBody & "Email: "& MyEmail & vbcrlf
	MyBody = MyBody & "Comentário:" & vbcrlf
	MyBody = MyBody & MyComments

	'Now lets put the variables and other information we need into the mailing script
	Set MyMail = CreateObject("CDO.Message")
	MyMail.From = MyEmail
	MyMail.To = "[email="enchrys@yahoo.com.br"]enchrys@yahoo.com.br[/email]"
	MyMail.Subject = "Testando  CDOSYS"
	MyMail.TextBody = MyBody
	MyMail.Send
	Set MyMail= nothing
	Response.Write("Email enviado com sucesso!")

primeiramente gostaria de parabenizar a equipe deste fórum, que tanto se empenham.

pessoal, o meu script abaixo está funcionando, mas não está como quero.

primeiro, não sabia sobre o componente aspemail, estudei e tentei rodar o script abaixo e está funcionando tanto formulario.asp e enviar.asp, conforme scripts abaixo. veja só o email que usei o yahoo o considera como spam, também tentei com o bol e joga o e-mail na quarentena, como faço para ficar na caixa de entrada e outra coisa quando coloco no formulario o nome da pessoa e digito o e-mail dela que é diferente do meu que está Mail.username="enchrys@yahoo.com.br" dá o seguinte erro:

Ocorreu um erro: 553 From address not verified - see http://help.yahoo.co...endfrom-07.htm.

Concluindo quero digitar no formulário o nome da pessoa, o email dela, e assunto e tudo isso ir para o meu e-mail chamado enchrys@yahoo.com.br.

formulario.asp

<form method="POST" action="enviar.asp" name="form" target="_self">
<div align="center">
<table border="0" width="43%">
<tr>
<td width="23%"><font face="Arial">Nome:</font></td>
<td width="74%"><font face="Arial"><input type="text" name="fromnome" size="20"></font></td>
</tr>
<tr>
<td width="23%"><font face="Arial">E-Mail:</font></td>
<td width="74%"><font face="Arial"><input type="text" name="fromemail" size="20"></font></td>
</tr>
<tr>
<td width="23%"><font face="Arial">Assunto:</font></td>
<td width="74%"><font face="Arial"><input type="text" name="assunto" size="20"></font></td>
</tr>
<tr>
<td width="23%" valign="top"><font face="Arial">Mensagem:</font></td>
<td width="74%"><font face="Arial"><textarea rows="5" name="mensagem" cols="30"></textarea></font></td>
</tr>
<tr>
<td width="23%"></td>
<td width="74%"><font face="Arial"><input type="submit" value="enviar" name="botao"></font></td>
</tr>
</table>
<p><font face="Arial" size="1"><a target="_self" href="meu site">
<span style="text-decoration: none"><font color="#000000">meu site</font></span></a></font>

enviar.asp

<%
DIM Mail
response.Charset="ISO-8859-1"
Set Mail = Server.CreateObject("Persits.MailSender")
Mail.IsHTML = True
Mail.Host = "smtp.mail.yahoo.com.br"
Mail.Username = "enchrys@yahoo.com.br"
Mail.Password = "minhasenha"
Mail.From = Request.Form("fromemail")
Mail.FromName = Request.Form("fromnome")
Mail.AddAddress "enchrys@yahoo.com.br"
Mail.Subject = Request.Form("assunto")
Mail.Body = Request.Form("mensagem")

On Error Resume Next
Mail.Send
If Err <> 0 Then
 Response.Write "<H2>Ocorreu um erro: " & Err.Description & "</h2>"
End If

If Err = 0 Then
 Response.Write("<H2>Obrigado Sr(a) " & Request.Form("fromnome") & ", seu e-mail foi enviado com sucesso!</H2>")
End If

Set Mail = Nothing

%>

Em miúdos quero explicar minha dúvida e estou pesquisando e não estou conseguindo a solução.

veja bem eu só quero armazenar ou apontar um arquivo doc no banco de dados access e quando chamar minha página asp ele (arquivo doc por exemplo) aparecer. com um arquivo imagem(jpg, gif) eu consigo fazer isso usando o comando

<td><img src="<%=(tb.Fields.Item("arquivo").Value)%>"> </td>

onde arquivo é um esquema onde está apontando para uma imagem .gif

no access apontamento para figura está assim:

no campo arquivo digito o caminhio- imagem/figura.gif

funciona

mudo para um arquivo doc. por exemplo no access tento fazer- no campo arquivo digito o caminho imagem/aula.doc e não aparece o arquivo "aula.doc" na minha página asp. com um arquivo gif ou outro beleza , funciona com um arquivo doc aparece um "x" como não tivesse encontrado... não entendi.
Lembrando de que todos estão na pasta chamada imagem.

obrigado pela sua atenção e ótimo trabalho para você

Pessoal,

Como faço para contar os arquivos acessados em asp e o site mostrar a quantidade de itens daquele assunto por exemplo:
observando de que se clicar em algum titulo ele poderá abrir o arquivo ou abrir no browser.
hardware(3 itens)- quando clico nele aparece algumas informações como
autor- data - titulo - acessos
ennio- 01/12/09- conhecendo hardware - 50
joao - 12/03/09- hardware iniciante - 80
pedro- 14/03/09- hardware básico - 100

como faria isso em asp? usaria algum SGBD com linguagem SQL? Pelo select hardware,cont(*) where cont(*)>=1 daria para atender a quantidade do esquema coluna hardware? Esse acesso como contaria se usário on-line clica ele já começa a contá-lo? o título, acesso serão armazenados no banco? Eu estou sem idéia de como fazer isso, alguém poderia me ajudar, sou grato, estou pesquisando, por favor se alguém souber dá-me um dica de como fazer isso, sou grato.

bom dia,

Preciso de mais exemplos ou outro exemplos diferentes de contagem de página mostrada neste fórum, como poderia usar os objetos Application e Session na página ASP,Qual procedimento, se eu entendi mesmo eu tenho que criar um arquivo global.asa (que é composto application e session) e colocar no meu diretório virtual junto aos meus arquivos asp?

Agradeço a sua ajuda,

pois, estou começando a me desempenhar em ASP, pois mais conhecimento nessa área pretendo compartilhar também e assim desenvolver meu lado profissional, esse é meu objetivo.