ercanfb Yeni Üye
Kayıt Tarihi: 22-Kasım-2007 Ülke: Turkiye Gönderilenler: 1
|
Gönderen: 22-Kasım-2007 Saat 16:26 | Kayıtlı IP
|
|
|
Merhaba
eskiden baska bir projemde kullanmis oldugum kodu simdiki projemde de kullanmak istedim fakat daha once access veritabanına baglanti yapiordum simdi ise sql servera baglaniyorum.
aynı kodun sadece veritabanı baglanti satirini degistirdim fakat su hatayi aldim:
Operation is not allowed when the object is open. hatanında gosterildigi satiri yeni kod kisminda belirttim.
simdi bu eski calisan kodum accesse baglandigim kod: <%
Option Explicit dim objRS, strSQL, arrRS,cobjRS, cstrSQL, carrRS
'create recordSet object Set objRS = Server.CreateObject("ADODB.Recordset" ) objRS.ActiveConnection = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("FirmaTakip.mdb" )
'Construct SQL statement strSQL = "SELECT x.sehirid, x.sehir, y.ilceid, y.ilce FROM sehir AS x INNER JOIN ilceler AS y ON x.sehirid = y.sehirid ORDER BY x.sehir, y.ilce;"
'execute SQL statement To return a recordSet objRS.Open strSQL
'build an array from the recordSet using GetRows arrRS = objRS.Getrows
'close the recordSet objRS.Close
Set objRS = Nothing %>
bu da yeni projemde kullanmak istedigim ve uzerinde degisiklik yaptigim kod:
<%
Option Explicit dim objRS, strSQL, arrRS,cobjRS, cstrSQL, carrRS,sss
'create recordSet object Set objRS=Server.CreateObject("Adodb.Connection" ) objRS.Open= "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=xxx;pwd=xxxx;Initial Catalog=xxxx;Data Source=xxxx;Auto Translate=False"
'Construct SQL statement strSQL = "SELECT x.sirketid, x.SirketAdi, y.id, y.isim FROM [dbo].[ST$Sirketler] AS x INNER JOIN [dbo].[ST$Kullanicilar] AS y ON x.sirketid = y.Sirket ORDER BY x.SirketAdi, y.isim;"
'execute SQL statement To return a recordSet objRS.Open strSQL // hata satiri
'build an array from the recordSet using GetRows arrRS = objRS.Getrows
'close the recordSet objRS.Close
Set objRS = Nothing %>
hatam nerededir nereyi degistirmem gerekir yada ne eklemem gerekir bilgilendirirseniz cok memnun olurum
tesekkuler!
|