Bom Dia,
 
    Consegui resolver o problema, para aquele que interessados segue o c�digo:
 
strQuery = "SELECT Tarifador.* FROM Tarifador INNER JOIN Cadastro ON Tarifador.SENHA = Cadastro.Senha WHERE (((Cadastro.email)='"&id&"') AND ((Cadastro.Senha)='"&id2&"')) Order By ndisc, data"
 
----- Original Message -----
Sent: Tuesday, August 05, 2003 5:38 PM
Subject: Help

Tenho duas tabelas ( Cadastro e Valores )
 
    No Form com login e senha do cadastro, quero o relat�rio da Tabela Valores do login e senha digitado.
 
    Estou usando os seguinte c�digo: Como posso fazer isso melhor.
 
Cadastro
<%
Option Explicit
Response.Expires = 0
Dim objConn, objRs, strQuery, id, id2
Dim strConnection
 
'Conectando com o banco de dados contato.mdb
Set objConn =  Server.CreateObject("ADODB.Connection")
objConn.Open "DBQ=" & Server.MapPath("../../database/sumus.mdb") & ";Driver={Microsoft Access Driver (*.mdb)}","username","password"
id = Request("v_email")
id2 = Request("v_senha")
'Seleciona da tabela contato
strQuery = "SELECT * FROM cadastro where email ='"&id&"' and senha ='"&id2&"'"
Set ObjRs = objConn.Execute(strQuery)
%>
 
Valores
<%
Option Explicit
Response.Expires = 0
Dim objConn, objRs, strQuery, id, id2
Dim strConnection
 
'Conectando com o banco de dados contato.mdb
Set objConn =  Server.CreateObject("ADODB.Connection")
objConn.Open "DBQ=" & Server.MapPath("../../database/sumus.mdb") & ";Driver={Microsoft Access Driver (*.mdb)}","username","password"
id = Request("v_email")
id2 = Request("v_senha")
'Seleciona da tabela contato
stringSQL = "SELECT * FROM tarifador WHERE autonum = "&id2
Set objRS = objConn.Execute(stringSQL)
%>

:: http://www.asp10.net
==================================================
:: Solu��es simples para problemas complexos
:: Sistemas de Links, Not�cias, Faq, Loja,
:: Estat�sticas, Artigos, Mural e muito mais.
==================================================
:: Para entrar, sair ou ver o hist�rico da lista
:: Asp10.net visite http://www.asp10.net
==================================================




Voc� se interessa por programa��o, hardware, sistemas operacionais, tecnologia e redes? Ent�o clique aqui e conhe�a mais grupos sobre esses assuntos. Tire d�vidas, envie dicas, troque informa��es com pessoas que gostam do que voc� gosta.
cancelar assinatura - p�gina do grupo

Responder a