- Katılım
- 1 Temmuz 2005
- Mesajlar
- 1,119
- Açılan Konu
- 205
- Tepki puanı
- 0
- Konum
- Eskişehir
Kod:
<%
on error resume next
DB_KLASORU = "db/"
DB_ISMI = "database.mdb"
DB_TAMYOL = DB_KLASORU & DB_ISMI
VT_YOL = SERVER.MAPPATH(DB_TAMYOL)
DSN = "DBQ=" & VT_YOL & ";Driver={Microsoft Access Driver (*.mdb)}"
if BAGLANTI.State = False Then
Set BAGLANTI = Server.CreateObject("ADODB.Connection")
BAGLANTI.Open DSN
End if
%>bu kodu DLL haline getirip DLL'i servera tanıtıp dll dosyasını
Kod:
<%
Dim objPabloSoftwareSolutions
Set objPabloSoftwareSolutions = Server.CreateObject("Baglanti.Class1")
objPabloSoftwareSolutions.ExecuteMain
Set objPabloSoftwareSolutions = Nothing
%>açtığım zaman serverdaki bu dosyayı include eden hiçbir dosya çalışmıyor.
Lütfen yardım
