Jump to content


bruno_nunes

Member Since 17/07/2003
Offline Last Active 05/07/2004, 05:16
-----

Topics I've Started

Comando De Gravação

25/04/2004, 18:54

Beleza pessoal ? já faz um grande tempo que naum tenho postado aqui... Mas vou precisar da ajuda de vcs...

Aqui na minha empresa (Info13) temos um programa conhecido como G3. Nós estamos com uma idéia que eu achei muito legal... fazer um "LiveUpdate" como do Norton Anti-virus e do AVG...

O programa pode chamar uma página da internet, assim queremos que o usuario faça o login e verificamos quais arquivos temos de envia-lo... ai eh que começa os problemas:

1 - preciso saber se com algum comando posso ler um arquivo texto (vai ser enviado pelo programa) e comparar no banco de dado;
2 - depois de comparar, saber se existe algum comando que faça o "download" e já grave esses arquivos na máquina do usuário...

Caso alguem tenha alguma ideia me ajude por favor...

Valeu, muito obrigado,
Bruno Nunes.

E-mail Em Html

09/10/2003, 16:22

Blz pessoal ?

Naum consigo enviar um e-mail através de ASP, vou passar o codigo, mas esse naum dah certo...

  Set objCDONTS = Server.CreateObject("CDONTS.NewMail")
  objCDONTS.From    = Request.Form("Nome") & " <" & Request.Form("E-Mail") & ">"

  strbody = ""

  strbody = "<html><head><title>Fa&ccedil;a seu Pedido - Confirmação de Pedido</title></head><body>" & VbCrLf

  strbody = strbody & "<table width='100%' border='1'>" & VbCrLf

  strbody = strbody & "<tr><td><font size='2' face='Tahoma, Verdana, Arial'>" & Request.Form("Texto") & "</font></td></tr>" & VbCrLf

  strbody = strbody & "</table>" & VbCrLf

  strbody = strbody & "</body></html>"

  objCDONTS.To      = "teste@info13.com.br"
  objCDONTS.Subject = "Teste de E-mail"
  objCDONTS.Body    = strBody
  objCDONTS.Send
  Set objCDONTS = Nothing
 
  Response.Redirect "teste2.asp"


nesse caso, ele manda tudo em texto, tipo, as tags, o texto tudo misturado...
manda o e-mail assim:

<html><head><title>Fa&ccedil;a seu Pedido - Confirmação de Pedido</title></head><body>
<table width='100%' border='1'>
<tr><td><font size='2' face='Tahoma, Verdana, Arial'>Teste de e-mail...</font></td></tr>
</table>
</body></html>


se alguem puder me ajudar eu agradeço,

falow !!! B)

Top 5 De 3 Tabelas...

12/09/2003, 10:33

Olá pessoal...

dei uma sumidinha mais voltei com dúvidas...

tenho um forum feito td em asp, feito pra minha empresa... e a algum tempo pedi que me ajudassem com um comando que pegasse as ultiimas 5 msgs que fossem postadas...

acontece que mudaram algumas coisas e agora preciso, se houver..., de um comando que pegue os ultimos 5 posts de 3 tabelas diferentes... mas td junto !!! dah pra entender ?!?!?!!!

Eh assim, tem 3 tabelas (ex: tab1, tab2, tab3), quando um fulano posta na tab2, depois outro posta na 3, outro posta na 3, outro posta na 1 e o ultimo posta na 2, tem que aparecer assim:

- msg da tab2 (ultima...)
- msg da tab1 (penultima...)
- msg da tab3 (antipenultma)
- msg da tab3 (segunda...)
- msg da tab2 (primeira...)

se alguem entendeu e puder me ajudar, eu agradeço...

Falow !!! ;)

Como Carregar Do Bd Os Ultimos 5

12/08/2003, 11:36

Voltei com duvidas...

Fiz um forum em asp bem simplezinho, no bd tem a tabela forum como o nome do forum e o codigo e tem a tabela com as mensagens.

As mensagens tem um codigo unico crescente (chave primaria) e eu preciso numa pagina colocar e linkar as ultimas 5 msg postadas... como eu posso fazer isso ? mas naum de cada forum, de tds juntos.

imagino que seja um comando sql, mas naum sei qual...

Agradeço desde jah pela atenção de vcs !!!

Falow!!! ;)

Erro Do Bd... No Servidor

06/08/2003, 10:01

blz galera ? to precisando de uma ajudinha com, urgência... :D

tenho dois problemas:

1 - coloquei uma página numa pasta teste antes de colokar no site e tah dando esse erro :

Microsoft OLE DB Provider for ODBC Drivers error '80004005'

[Microsoft][ODBC Microsoft Access Driver] Unrecognized database format 'E:\Clientes\unicasa.com.br\teste\user\database\bd1.mdb'.

/teste/htm/entrar.asp, line 70


Linha 70:
66 - Set Conexao = Server.CreateObject ("ADODB.Connection")
67 - Conexao.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=E:\Clientes\unicasa.com.br\teste\user\database\bd1.mdb"
68 - Set RS = Server.CreateObject ("ADODB.RecordSet")
69 - sql = "SELECT * FROM cond WHERE CodPre = '" & cint(Session("txtcod")) & "' "
70 - RS.Open sql, Conexao, 3, 3

2 - quando vou mudar o chmod dos bd no cute ftp tah dando erro:

500 - synthax error


se vcs poderem me ajudar eu agradeço !!! :lol:

IPB Skin By Virteq