Bu hatalar ne hatası?

ilk 6 satırı yapıştırır mısın?

<%@LANGUAGE="VBSCRIPT" CODEPAGE="1254"%>
<%
Response.Buffer = True
Set baglanti = Server.CreateObject("ADODB.Connection")
'baglanti.open "driver={SQL Server};server=;uid=;pwd=;database="
baglanti.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("asddd/erolll###.mdb")

<%VT_YOL = SERVER.MAPPATH("asddd/erolll###.mdb")
	DSN = "DBQ=" & VT_YOL &   ";Driver={Microsoft Access Driver (*.mdb)}"
Set BAGLANTI = Server.CreateObject("ADODB.Connection")
BAGLANTI.Open DSN
%>

dener misin dostum?

maniac conn.asp yi komple mi onunla değiştireyim nasıl yapayım?
---

komple olarak böyle

,,,,,,,,,,


<%@LANGUAGE="VBSCRIPT" CODEPAGE="1254"%>
<%
Response.Buffer = True
Set baglanti = Server.CreateObject("ADODB.Connection")
'baglanti.open "driver={SQL Server};server=;uid=;pwd=;database="
baglanti.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("asddd/erolll###.mdb")
Session.Timeout=15
Session.CodePage=1254
Session.LCID=1055
Response.Charset="iso-8859-9"

trh = FormatDateTime(date)
Set rs = Server.CreateObject("ADODB.Recordset")
rs.open "select * from video",baglanti,1,3
toplam=rs.recordcount
rs.close()

function temizle(yazi)
yazi = Replace(yazi," ","_")
yazi = Replace(yazi,"-","+")
yazi = Replace(yazi,"Ç","C")
yazi = Replace(yazi,"Ş","S")
yazi = Replace(yazi,"İ","i")
yazi = Replace(yazi,"Ü","u")
yazi = Replace(yazi,"Ö","ö")
yazi = Replace(yazi,"ü","u")
yazi = Replace(yazi,"ö","o")
yazi = Replace(yazi,"ş","s")
yazi = Replace(yazi,"ç","c")
yazi = Replace(yazi,":","+")
yazi = Replace(yazi,"I","i")
yazi = Replace(yazi,"ı","i")
yazi = Replace(yazi,"Ğ","g")
yazi = Replace(yazi,"ğ","g")
temizle = yazi
end function
%>

<%@LANGUAGE="VBSCRIPT" CODEPAGE="1254"%>
<%
Response.Buffer = True

VT_YOL = SERVER.MAPPATH("asddd/erolll###.mdb")
	DSN = "DBQ=" & VT_YOL &   ";Driver={Microsoft Access Driver (*.mdb)}"
Set BAGLANTI = Server.CreateObject("ADODB.Connection")
BAGLANTI.Open DSN

Session.Timeout=15
Session.CodePage=1254
Session.LCID=1055
Response.Charset="iso-8859-9"
trh = FormatDateTime(date)
Set rs = Server.CreateObject("ADODB.Recordset")
rs.open "select * from video",BAGLANTI,1,3
toplam=rs.recordcount
rs.close()
function temizle(yazi)
yazi = Replace(yazi," ","_")
yazi = Replace(yazi,"-","+")
yazi = Replace(yazi,"Ç","C")
yazi = Replace(yazi,"Ş","S")
yazi = Replace(yazi,"İ","i")
yazi = Replace(yazi,"Ü","u")
yazi = Replace(yazi,"Ö","ö")
yazi = Replace(yazi,"ü","u")
yazi = Replace(yazi,"ö","o")
yazi = Replace(yazi,"ş","s")
yazi = Replace(yazi,"ç","c")
yazi = Replace(yazi,":","+")
yazi = Replace(yazi,"I","i")
yazi = Replace(yazi,"ı","i")
yazi = Replace(yazi,"Ğ","g")
yazi = Replace(yazi,"ğ","g")
temizle = yazi
end function
%>

Bu sayfa bende çalışıyor dostum... dener misin?

Ah erol yoksa sen conn.asp yi include mu ediyosun? Abi o öyle çalışmaz. Bunu bağlantıyı yaptığın sayfaya yapıştır bakalım. Öle dene bi de! Dışardan include ile bağlantı yapılmaz asp de!

evet include yapıyorum.. Şu an sunucumda problem var. Sunucu taşıyorum, taşıdıktan sonra dediklerini yapıcam.. teşekkürler

include ile çalışmaz... burdayım ben beraber çalıştırırız