4 replies to this topic

[cidadao_cane]

Olá Pessoal,

tem como cadastrar em dois banco de dados simultaneamente?
Se sim, Como se faz?


Eu fiz assim:

strDBPath = "../bd/r.mdb"
strDBPath = "../bd/c.mdb"

strConn = "Provider=Microsoft.Jet.OLEDB.4.0; Persist Security Info=False; Data Source=" & Server.MapPath(strDBPath)

Somente cadastrou no > strDBPath = "../bd/c.mdb"

É assim que faz?

Os campos são iguais só que em BDs diferentes.

Valeu

[cybermix]

so cadastrou em um pq voce so fez uma conexao. pra explicar melhor olha um exemplo ai

<%
nome = request.form("nome")
email = request.form("email")
senha = request.form("senha")
site = request.form("site")

Set conexao = Server.CreateObject("ADODB.Connection")
Set conexao2 = Server.CreateObject("ADODB.Connection")

conexao.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("dados.mdb")

conexao2.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("dados2.mdb")

sql = "insert into dados (nome, email, senha, site) values ('"&nome&"', '"&email&"', '"&senha&"', '"&site&"')"

conexao.execute(sql)
conexao2.execute(sql)

conexao.close
set conexao = nothing

conexao2.close
set conexao2 = nothing
%>

qq duvida é só postar

[cidadao_cane]

Olá cybermix,


Bom, fiz assim:

Set objConn = Server.CreateObject("ADODB.Connection")
Set objConn2 = Server.CreateObject("ADODB.Connection")
Set objRs = Server.CreateObject("ADODB.Recordset")
objConn.Open strConn
objConn2.Open strConn2

objRs.Open "SELECT * FROM Autor", objConn , 3, 3


objRs.Open "SELECT * FROM Autor", objConn, objconn2 , 3, 3

Não deu certo.

Valeu

[cybermix]

com recordset nunca tentei mas muda isso auqi

objRs.Open "SELECT * FROM Autor", objConn, objconn2 , 3, 3

por isso

objRs.Open "SELECT * FROM Autor", objconn2 , 3, 3

que eu acho q vai funfar

[cidadao_cane]

Olá Cybernix



Consegui. Havia esqucido de colocar o addnew2

E tem que fazer o RecordSet2 também


VALEU

Edição feita por: cidadao_cane, 17/03/2004, 11:52.