چگونه در يك صفحه asp از دو بانك اطلاعاتي جداگانه استفاده كنم

[amirasal2002]

سلام
من مي خواهم در يك صفحه asp از دو ديتا بيس استفاده كنم بايد چي كار كنم
ببينيد مي خواهم يك متغيير را از يك ديتابيس بگيرم و اون را همراه با يك فرم به ديتابيس جديد بفرستم بايد چي كار كنم
در ضمن من در آن صفحه بايد از هر اطلاعات هر دو ديتا بيس استفاه كنم
لطفا راهنمايي كنيد

 

[SunBoy_]

خوب از ديتابيس اول يه object بساز ، بعد اونو open كن، بعد هر چي اطلاعات از ديتابيس فعلي ميخواي تو يه متغير بريز بعد حتما object كه ساختي Close كن .

بعد از ديتابيس دوم يه object بساز با Connection String جداگانه اونو open كن و هر كاري ميخواي انجام بده ، در آخر همه object هايي كه ساختي مساوي با Nothing قرار بده

 

[AliReza26]

خوب از ديتابيس اول يه object بساز ، بعد اونو open كن، بعد هر چي اطلاعات از ديتابيس فعلي ميخواي تو يه متغير بريز بعد حتما object كه ساختي Close كن .

بعد از ديتابيس دوم يه object بساز با Connection String جداگانه اونو open كن و هر كاري ميخواي انجام بده ، در آخر همه object هايي كه ساختي مساوي با Nothing قرار بده

دقيقا.....

 

[hoom]

سلام

كاري نداره،‌ عليرضا هم كه تاييد كرد،‌ پس ديگه مشكلي نيست. از اين كد زير استفاده كنيد. البته بايد اسم ديتابيس ها و جدولها رو عوض كنيد

Dim myDB1, myDB2
Dim RS1, RS2
Dim SQLQuery
Dim strConn

strConn = "DBQ=" & Server.MapPath("first.mdb") & ";" & _
          "Driver={Microsoft Access Driver (*.mdb)};" & _
          "DriverId=25;FIL=MS Access;"

Set myDB1 = CreateObject("ADODB.Connection")
myDB1.Open strConn

strConn = "DBQ=" & Server.MapPath("second.mdb") & ";" & _
          "Driver={Microsoft Access Driver (*.mdb)};" & _
          "DriverId=25;FIL=MS Access;"

Set myDB2 = CreateObject("ADODB.Connection")
myDB2.Open strConn

SQLQuery = "Select * From TABLE1"
Set RS1 =  myDB1.Execute(SQLQuery)

SQLQuery = "Select * From TABLE2"
Set RS2 =  myDB2.Execute(SQLQuery)

هر كاري كه با اطلاعات ميخواهيد بكنيد اينجا قرار بديد
.
.
.

myDB1.Close
myDB2.Close

Set myDB1 = Nothing
Set myDB2 = Nothing
Set RS1 = Nothing
Set RS2 = Nothing

 

[amirasal2002]

دست همگي درد نكنه