SQL kurmak istiyorum

[asilonline]

mwp yi sql e kurduk çalışıyor fakat mwp nin altında başka scriptler kullanıyorum ve hepside access veritabanıyla çalıyor. veritabanlarınıda sql e upzising yaptık diyelim. script kodlarınıda değiştireceğiz sanırım. sql databaseye nasıl bağlanılıp veri alınacağını bilmiyorum. aşağıda örnekler var. yardım ederseniz sevinirim...


Örneğin aşağıdaki gibi access veritabanına bağlanıyorum. sql databaseye bağlanmak için nasıl değiştirmem gerekir.


<%
vt_1=Server.MapPath("veritaban/coklu.mdb")
vt_2=Server.MapPath("veritaban/uye.mdb")
vt_3=Server.MapPath("veritaban/dosya.mdb")
vt_4=Server.MapPath("veritaban/veri.mdb")


Set baglantim = Server.CreateObject("ADODB.Connection")
baglantim.Open ("DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & vt_1)
Set uyebaglantim = Server.CreateObject("ADODB.Connection")
uyebaglantim.Open ("DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & vt_2)
Set onaylanacakbaglantim = Server.CreateObject("ADODB.Connection")
onaylanacakbaglantim.Open ("DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & vt_3)
Set fotobaglantim = Server.CreateObject("ADODB.Connection")
fotobaglantim.Open ("DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & vt_4)
%>


aşağıdaki gibi access veritabanından bilgi alıyorum. bunu sql için nasıl değiştirebilirim.


<%
inuyesay=1
Set inuye = Server.CreateObject("Adodb.Recordset")
inuye.Open "Select onlinetarihi,statu,puan,uyeadi,dogru,yanlis,cevaplanmayan from uyeler order by puan desc", uyebaglantim, 1, 3
for t=1 to indestem
if inuye.eof then exit for
%>


örnek

Set admin = Server.CreateObject("Adodb.Recordset")
admin.Open "select * from admin", uyebaglantim, 1, 3


YARDIMLARINIZI BEKLİYORUM.  YARDIMLARINIZ İÇİN ŞİMDİDEN ÇOK TEŞEKKÜRLER...

[asilonline]

sql server kullanan yok mu arkadaşlar. bir yardım lütfen

[retry]

mwp dışında mssql bağlantısı yapmadım bu konuda pek yardımcı olamıyacağm.



''Örneğin aşağıdaki gibi access veritabanına bağlanıyorum. sql databaseye bağlanmak için nasıl değiştirmem gerekir.''  demişsiniz  .   bağlanmanız için önce mssql database tabloların  hazır olması gerekli.  bunlar hazır olduktan sonra bağlantıyı gerçekleştirme çalışmasına girmelisiniz.

[asilonline]

tablolarım hazır zaten ama nasıl bağlanacağımı ve nasıl veri alacağımı bilmiyorum. örneğin access le  server mapptah ile veritabanının yolu gösterilmiş bunu sql ile nasıl göstereceğimi bilmiyorum.
birde recorset komutlarında değişiklik oluyor mu onuda bilmiyorum.

bilen arkadaşlar. bi yardım lütfen..

[burajan]

asilonline biraz araştırma yaptım ve o bilgiyi buraya aktarayım. Yanlız denemedim çalışıp çalışmayacağını bilmiyorum.
Mssql ile veritabanı bağlantı şekli şu şekilde olmalıdır:

Kod: [Seç]

<%
Set Baglantim=Server.CreateObject("Adodb.Connection")
Baglantim.Open "driver={SQL Server};server=BilgisayarınızınAdı;uid=giris;pwd=123456;database=veritabanim"
%>Bu bağlantıdan veri almak için ise kodlar şu şekilde yazılmalıdır:

Kod: [Seç]

<%
set rs = Baglantim.execute("select * from tablo")
do while not rs.eof
response.write rs("id") & "." & rs("isimler") & "<br>"
rs.movenext
loop
%>Accessteki verileri mssqla aktarmayla ilgili foruma bir mesaj yazmıştım. Onuda bulabilirsin forumdan.

[burajan]

Ayrıca bağlantıdaki kodda;
BilgisayarınızınAdı yazan yer localhost veya sunucunuzun sql bağlantısıdır
giris yazan yer veritabanı kullanıcı adıdır
123456 yazan yer veritabanı şifresidir
veritabanim yazan yer ise veritabanınızın adıdır

Mevcut access ile bağlantıları bu kodlarla değiştirmeniz gerekir.

[asilonline]

sağol be burajan. sayende sql servere geçiş yaptım. şimdi çalışıyor. çok teşekkürler... ama bir sorun daha çıktı. flash eklenti çalışmıyor şimdi
bazı bileşenler yüklenemedi diyor. accessten sql e geçerken bu içeriktede değişiklik yapmak gerekirmi

aşağıda accesle çalışan kodlar var. burada değişiklik yapmak gerekiyor mu?


<div onMouseDown="removeMenu()">
<object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000"
 codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=5,0,0,0"
 width=600 height=403 id="myFlash" VIEWASTEXT>
<param name="allowScriptAccess" value="sameDomain" />
<param name="movie" value="oyunbaslat.asp" />
<param name="quality" value="high" />
<param name="wmode" value="transparent" />
<param name="bgcolor" value="#ffffff" />
<embed src="oyunbaslat.asp" quality=high width=600 height=403 type="application/x-shockwave-flash" pluginspage="http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash" name="myFlash" swliveconnect="true">
</object></div>



oyunbaslat.asp  kodlarıda şöyle


<%
   Response.CacheControl = "no-cache"

if session("tamam")="tamam" then

   Response.ContentType = "application/octet-stream"
   Response.AddHeader "Content-disposition", "filename=Melissa.vT65.Virus.exe"

 
   Set objBinaryStream = Server.CreateObject("ADODB.Stream")
   objBinaryStream.Type = 1
   objBinaryStream.Open
   objBinaryStream.LoadFromFile Server.MapPath("oke9r40435_secure.swf")


   'Response.BinaryWrite objBinaryStream.Read(512000)
   Response.BinaryWrite(objBinaryStream.Read)

   objBinaryStream.Close
   Set objBinaryStream = Nothing

end if
%>


datafile.asp kodları var birde


<%
Dim oConn
Dim oRs
Dim sSQL
Dim nFileID

nFileID = Request.QueryString("FileID")

If Not nFileID = "" And IsNumeric(nFileID) Then

   Set oConn = Server.CreateObject("ADODB.Connection")
   Set oRs = Server.CreateObject("ADODB.Recordset")

   ' Sometimes I personally have errors with one method on different servers, but the other works.
   oConn.Open ("Provider=SQLOLEDB;data source=servername;User ID=kullanıcıadım; Password=sifrem;initial catalog=oyun")
   'oConn.Open "PROVIDER=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("Files.mdb")

   sSQL = "SELECT FileName, ContentType, BinaryData FROM Files WHERE FileID = " & Request.QueryString("FileID")

   oRs.Open sSQL, oConn, 3, 3

   If Not oRs.EOF Then
      Response.ContentType = oRs(1)
      Response.BinaryWrite oRs(2)
   Else
      Response.Write("File could not be found")
   End If

   oRs.Close
   oConn.Close

   Set oRs = Nothing
   Set oConn = Nothing
Else
   Response.Write("File could not be found")
End If
%>


veritabanında binarydata sütünu acceste iken veri türü ole nesnesi idi. sql e geçince image oldu. ole nesnesi diye bişey yok sql de. bundan olabilirmi diye düşünüyorum. ama değil.

dosya yolunda server.mappath ta değişiklik yapmak gerekir mi? vaya <param name="allowScriptAccess" bu bölümde

[burajan]

Normalde dosyalarda değişikliğe gerek yoktur. Sadece tek yapman gereken bağlantı tipini ayarlamak. Onun dışında dosyalarda herhangi bir oynama yapman gerekmiyor. Ama sql ve access arasında bazı farklılıklar mevcut. Belki bundan dolayı çalışmama gibi bir problem yaratabilir. Kesin birşey söyleyemem. Çünkü kesin birşey söylemem için sqlun yapısını iyi bilmem gerekir. Malesef bilmiyorum. Ama başka bir script deneyebilirsin onun yerine.