Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

thaiss

Select em bancos diferentes

Por , em ASP Clássico

Recommended Posts

FabricioGomes    0

FabricioGomes
Postado

se voce quiser criar um select que acesse duas tabelas de bancos diferentes, fica dificil...o que voce pode fazer é criar dois recordsets, cada um de uma tabela, utilizando duas conexoes... depois "na mão" voce cria os relacionamentos....Espero que tenha ajudado...

Compartilhar este post

Link para o post
Compartilhar em outros sites

thaiss    0

thaiss
Postado

Fabricio ..Eu criei assim : <%@LANGUAGE="VBSCRIPT"%><!--#include file="Connections/cadastro.asp" --><%set Recordset1 = Server.CreateObject("ADODB.Recordset")Recordset1.ActiveConnection = MM_cadastro_STRINGRecordset1.Source = "SELECT * FROM tusuario where email = '" & Session("email") & "' AND senha = '" & Session("senha") & "'"Recordset1.CursorType = 0Recordset1.CursorLocation = 2Recordset1.LockType = 3Recordset1.Open()Recordset1_numRows = 0%><%While not Recordset1.EOF%> <html><head><title></title><meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"></head><body bgcolor="#F9F2FF" text="#000000" link="#990000" vlink="#990000" alink="#990000"><font size="2" face="Verdana, Arial, Helvetica, sans-serif"></font><font size="2"><p> </p><p> </p></font><table align="center" border="1" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="87%" height="179"> <tr> <td width="100%" bgcolor="#EFDDFF" height="16" colspan="2"> <p align="center"><MM_REPEATEDREGION NAME="Repeat1" SOURCE="Recordset1"> <b><font face="Verdana" size="2" color="#800080">DADOS DO COMPRADOR</font></b></td> </tr> <tr> <td width="86%" bgcolor="#FFFFFF" height="16"><b><font face="Verdana" size="2" color="#800080">Nome:</font></b> <font face="Verdana" size="2"><%=Recordset1("nome")%></font></td> <td width="14%" rowspan="10" bgcolor="#EFDDFF" height="166"> <p align="center"><u><b><font face="Verdana" size="2" color="#800080"> <a href="atualizar_form.asp"><font color="#800080">ATUALIZAR <br> DADOS</font></a></font></b></u></td> </tr> <tr> <td width="86%" bgcolor="#FFFFFF" height="16"><b><font face="Verdana" size="2" color="#800080">Endereço:</font></b> <font face="Verdana" size="2"><%=Recordset1("endereco")%></font></td> </tr> <tr> <td width="86%" bgcolor="#FFFFFF" height="16"><b><font face="Verdana" size="2" color="#800080">Cidade:</font></b> <font face="Verdana" size="2"><%=Recordset1("cidade")%></font></td> </tr> <tr> <td width="86%" bgcolor="#FFFFFF" height="13"><b><font face="Verdana" size="2" color="#800080">Estado:</font></b> <font face="Verdana" size="2"><%=Recordset1("estado")%></font></td> </tr> <tr> <td width="86%" bgcolor="#FFFFFF" height="16"><b><font face="Verdana" size="2" color="#800080">Cep:</font></b> <font face="Verdana" size="2"><%=Recordset1("endcep")%></font></td> </tr> <tr> <td width="86%" bgcolor="#FFFFFF" height="16"><b><font face="Verdana" size="2" color="#800080">Telefone:</font></b> <font face="Verdana" size="2"><%=Recordset1("telefone")%></font></td> </tr> <tr> <td width="86%" bgcolor="#FFFFFF" height="16"><b><font face="Verdana" size="2" color="#800080">Fax:</font></b> <font face="Verdana" size="2"><%=Recordset1("telfax")%></font></td> </tr> <tr> <td width="86%" bgcolor="#FFFFFF" height="16"><b><font face="Verdana" size="2" color="#800080">CPF/CNPJ:</font></b> <font face="Verdana" size="2"><%=Recordset1("cpfcnpj")%></font></td> </tr> <tr> <td width="86%" bgcolor="#FFFFFF" height="16"><b><font face="Verdana" size="2" color="#800080">E-Mail:</font></b> <font face="Verdana" size="2"><%=Recordset1("email")%></font></td> </tr> <tr> <td width="86%" bgcolor="#FFFFFF" height="16"><b><font face="Verdana" size="2" color="#800080">Data de Cadastro:</font></b> <font face="Verdana" size="2"><%=Recordset1("datau")%></font></td> </tr> <tr> <td width="100%" colspan="2" bgcolor="#EFDDFF" height="12"> </td> </tr></table><%Recordset1.movenext wend %><%Recordset1.Close()%><!--#include file="Connections/shop.asp" --><%set Recordset2 = Server.CreateObject("ADODB.Recordset")Recordset2.ActiveConnection = MM_shop_STRINGRecordset2.Source = "SELECT * FROM Items where ItemDesc = '" & Session("desc") & "'"Recordset2.CursorType = 0Recordset2.CursorLocation = 2Recordset2.LockType = 3Recordset2.Open()Recordset2_numRows = 0%><%While not Recordset2.EOF%><p align="center"> <p align="center"> <table align="center" border="1" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="87%" height="50"> <tr> <td width="100%" bgcolor="#EFDDFF" height="10"> <p align="center"><b><font size="2" face="Verdana" color="#800080">DADOS DA COMPRA</font></b></td> </tr> <tr> <td width="100%" bgcolor="#FFFFFF" height="11"><b> <font size="2" face="Verdana" color="#800080">Produto(s):</font></b><font face="Verdana" size="2"><%=Recordset2("ItemName")%> - <%=Recordset2("ItemDesc")%></font></td> </tr> <tr> <td width="100%" bgcolor="#FFFFFF" height="10"><b> <font size="2" face="Verdana" color="#800080">Valor Total:</font></b><font face="Verdana" size="2"> R$ <%=Recordset2("PricePerUnit")%>,00</font></td> </tr></table><%Recordset2.movenext wend %><%Recordset2.Close()%><p align="center"> <p align="center"><b><font face="Verdana" size="2" color="#800080">CLIQUE ABAIXO PARA ESCOLHER A FORMA DE PAGAMENTO</font></b><p align="center"><a target="_blank" href="boleto.asp"><img border="0" src="../../img/finalizar.gif"></a></p><p align="center"><button name="B1">entrar</button></p></body></html>Esta correto ??

Compartilhar este post

Link para o post
Compartilhar em outros sites

Mário Monteiro    179

Mário Monteiro
Postado

abre o font do html gerado e ve se ficou algum erro escondido...

Compartilhar este post

Link para o post
Compartilhar em outros sites

explore    3

explore
Postado

Cara você pode usar um RecordSet para duas tabela Sim!!!

 

O estilo do RecordSet vai ficar assim:

 

ASP

[*]'Capturando dados de duas tabelas em um único RecordSet

 

[*]/*

 

[*]Vamos supor que tenhamos duas tabelas diferentes em um banco de dados, uma com dados dos clientes e outra com dados dos fornecedores. Ambas as tabelas possuem um campo chamado email, e queremos capturar os emails tanto dos clientes como fornecedores em um único RecordSet.

 

[*]*/

 

[*]'A instrução SQL para capturar estes emails seria aseguinte. 

 

[*]

 

[*] strQ = "SELECT email FROM clientes UNION SELECT email FROM fornecedores" 

 

[*]

 

[*]'Poderiamos ainda nesta intrução limitar os registros de ambas as tabelas com a clausula WHERE 

 

[*] 

 

[*] strQ = "SELECT email FROM clientes WHERE email<>''"

 

[*] strQ = strQ & " UNION SELECT email FROM fornecedores WHERE email<>'' " 

 

[*]

 

[*]'Segue abaixo o código completo para exibir todos os email das duas tabelas na tela

 

[*]

 

[*]Set objCon = Server.CreateObject("ADODB.Connection")

 

[*]objCon.Open "Data Source=C:/base_de_dados.mdb;Provider=Microsoft.Jet.OLEDB.4.0;"

 

[*]

 

[*]strQ = "SELECT email FROM clientes UNION SELECT email FROM fornecedores"

 

[*]Set objRS = Server.CreateObject("ADODB.Recordset")

 

[*]objRS.CursorLocation = 2

 

[*]objRS.CursorType = 1

 

[*]objRS.LockType = 2

 

[*]objRS.Open strQ, objCon,,, &H0001

 

[*]

 

[*]If Not objRS.EOF Then

 

[*] While Not objRS.EOF

 

[*] Response.Write objRS("email") & "<br>"

 

[*] objRS.MoveNext

 

[*] Wend

 

[*]End

 

[*]

 

[*]objRS.Close

 

[*]Set objRS = Nothing

 

[*]

 

[*]objCon.Close

 

[*]Set objCon = Nothing

 

No caso ai estamos usando o UNION!

 

Falo!!!!!!!!

Compartilhar este post

Link para o post
Compartilhar em outros sites

Mário Monteiro    179

Mário Monteiro
Postado

só que são duas tabelas em dois dbs diferentes...

Compartilhar este post

Link para o post
Compartilhar em outros sites

FabricioGomes    0

FabricioGomes
Postado

thaiss, verifique o conteudo das variaveis session... a Session("desc") principalmente, pois se ela estiver com valor errado ou em branco nao aparece a tabela mesmo, pois fica sem registro...

Compartilhar este post

Link para o post
Compartilhar em outros sites
Ir para a lista de tópicos ASP Clássico
×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.

  Aceito