How to parecido com WebMail

[Geison C 0]

Olá a todos, este eh meu primeiro post.

 

Sou programador delphi MAS, sou novato no ASP. muito novato.

 

O que eu eu quero fazer em asp.

 

* Fazer um banco de dados em firebird com os campos (codigo, titulo, assunto, destinatario, remetente)

* Fazer o ASP se conectar ao mesmo

* Fazer aparecer em uma tabela no browser os registros do banco, (titulo, destinatário, remetente)

* Fazer com que ao clicar em (titulo), abra uma nova janela mostrando todos os dados do cadastro clicado,

 

O que eu já fiz:

 

* Fazer um banco de dados em firebird com os campos (codigo, titulo, assunto, destinatario, remetente)

* Fazer o ASP se conectar ao mesmo

* Fazer aparecer em uma tabela no browser os campos, (titulo, destinatário, remetente)

 

 

Suponhamos que seja um HOTMAIL, ou um forum (como este) interno, no qual você clica no titulo da mensagem e ele abre a mensagem completa em outra janela.

 

Ficou coisa linda, mas nao sei como eu faco para abrir todo o conteudo do registro selecionado em outra janela, ou na mesma janela, creio que deve ser o mesmo raciocinio...

 

Alguem poderia me ajudar ?

[Geison C 0]

vix,,,, bom.. vamos lá;;; (Obrigado pela rapidez na resposta)..

 

esse eh parte do codigo da pagina que mostra as msg.

 

<%

lista.MoveFirst

Do While not lista.Eof%>

 

<td width="140" bgcolor="#F2F2FF" class="style1"><div align="left" class="style8"><%=lista.fields("REMETENTE")%></div></td>

 

<td width="140" bgcolor="#F2F2FF" class="style9"><%=lista.fields("DESTINATARIO")%></td>

 

<div align="left" class="style10"><%=lista.fields("TITULO")%></div>

 

<td width="100" bgcolor="#F2F2FF"><div align="center" class="style9"><%=lista.fields("data")%

 

<%lista.MoveNext

Loop%>

ta agora eu tenho que colocar <a href="detalhes.asp?codigo=<%= rs("codigo")%>"><%= rs("titulo")%></a>

 

Como ficaria se eu ja busco dados com ela ?

 

(desculpe pela falta de massa...)

[Geison C 0]

humm...entendi a parte do recebimento do valor para a variavel.. aparentemente na pagina principal ta funcionando.. pois na barra de status aparece qual o codigo que variavel está.agora no detalhes.aspeu preciso fazer toda a conexao com o banco novamente ?gravacodigo eh a variavel que eu coloquei no form principal..

set strConexao = CreateObject("ADODB.Connection")strConexao.Open("DRIVER=Firebird/InterBase® driver; UID=SYSDBA;PWD=masterkey; DBNAME=localhost:C:\Teste\Mensageiro\Dados\MENSAGEIRO.FDB")cod = request.querystring("gravacodigo")Set lista = Server.CreateObject("ADODB.Recordset")Set lista = strConexao.Execute("Select * from tbmensageiro where codmsg = "&cod)

seria assim ?ou melhor... o que pode estar errado ?

[Geison C 0]

Obrigado por me ajudar !Não dá erro.Mas agora quando eu vou colocar o campo em algum lugar ele dá um erro.Seria assim que se faz o codigo ?

<%=lista.fields("codmsg")%>

<%=lista.fields("remetente")%>

quando executo, no lugar de aparecer os dados aparece:

ADODB.Recordset erro '800a0cc1' O item não pode ser encontrado na coleção correspondente ao nome ou ao ordinal solicitado. /asp/Mensageiro/detalhes.asp, line 38

A linha 38 é <%=lista.fields("codmsg")%>É de outro jeito que escreve para listar ?

[Geison C 0]

é o nome do campo e está digitado do mesmo jeito que no banco de dados... vou colocar o codigo completo do asp pra você ver..

Eu coloquei apenas um campo para visualizar por enquanto.

 

<%

set strConexao = CreateObject("ADODB.Connection")

strConexao.Open("DRIVER=Firebird/InterBase® driver; UID=SYSDBA;PWD=masterkey; DBNAME=localhost:C:\Teste\Mensageiro\Dados\MENSAGEIRO.FDB")

Set lista = Server.CreateObject("ADODB.Recordset")

cod = request.querystring("gravacodigo")

sql = "Select * from tbmensageiro where codmsg = "&cod

set list = strConexao.execute(sql)

%>

 

<style type="text/css">

<!--

.style1 {font-family: Arial, Helvetica, sans-serif}

.style2 {

font-size: 10px;

font-weight: bold;

}

.style3 {

font-family: Arial, Helvetica, sans-serif;

font-size: 10px;

font-weight: bold;

}

.style6 {font-size: 12px}

.style9 {font-size: 11px; font-weight: bold; }

.style11 {font-family: Arial, Helvetica, sans-serif; font-size: 11px; font-weight: bold; }

-->

</style>

 

<center>

<table width="934" height="103" border="0">

<tr>

<td height="57" colspan="4" bgcolor="#FFFFFF"><img src="img/LOGObARRAsUPERbRASIL1.jpg" width="930" height="57" /></td>

</tr>

<tr>

<td colspan="4" bgcolor="#B9BCFF"> <span class="style6 style1 style2"> :: Caixa de Entrada</span><span class="style3"> ::</span></td>

</tr>

<tr>

<td width="18" height="21" bgcolor="#B9BCFF"><span class="style11">De:</span></td>

<td width="268" bgcolor="#B9BCFF"><%=lista("CODMSG")%></td>

<td width="45" bgcolor="#B9BCFF" class="style1 style6"><span class="style9">Assunto:</span></td>

<td width="586" bgcolor="#B9BCFF" class="style6 style1"> </td>

</tr>

</table>

</center>

<center>

</center>

<table width="938" height="29" border="0">

 

<tr>

<td width="932" height="25" colspan="6" bgcolor="#FFFFFF"><p> </p>

<p> </p></td>

</tr>

 

<tr>

<td width="932" height="25" colspan="6" bgcolor="#FFFFFF"><img src="img/BARRAINFERIORSAF.jpg" width="934" height="23" /></td>

</tr>

</table>

[Geison C 0]

Assim ele mostra aquela pagina: A pagina nao pode ser exibida.Há um problema com a página que você está tentando acessar e ela não pode ser exibida.HTTP 500.

[Geison C 0]

Desabilitando msg ammigaveis ele mostra:

Microsoft OLE DB Provider for ODBC Drivers erro '80004005' [Microsoft][ODBC Driver Manager] Nome da fonte de dados não encontrado e nenhum driver padrão especificado /asp/Mensageiro/detalhes.asp, line 3

a linha 3 é:strConexao.Open("DRIVER=Firebird/InterBase® driver; UID=SYSDBA;PWD=masterkey;estranho, pois na pagina principal ele conecta e faz um select e retorna valores !!?!

[Geison C 0]

Fui verifica a conexao da pagina principal e comparar com a detalhes.. e achei o erro..na string de conexao, tem uma parte que usa o ( r ), e o forum ta transformando em @, foi só trocar e deu certo. retornou o valor do codigo !!Agora só eu fazer o resto dos campos !!lucasBR, muito obrigado pela ajuda !Baixei uma apostila muito boa de asp no emule... mas, duvidas apareceram mais pra frente.... :unsure: