LikeForYou
- 26 Eyl 2017
- 728 Mesaj
Bu kod ile istenilen Access veritabanları yaratılabilmektedir. Eğer hata ile karşılaşılıyorsa IIS'in yazma yetkisinin klasör oluşturulacak dizinde verilmiş olması gereklidir.
Kod:
<%Â
Function vtolustur(vtAd)
 On Error Resume Next
 Set oCatalog = Server.CreateObject("ADOX.Catalog")
 oCatalog.Create"provider=Microsoft.jet.oledb.4.0;data source="&sunucu.MapPath(vtAd)
 vtolustur = Err.Number = 0
End Function
 if vtolustur("veritabaniAdi.mdb") then
 Â
    Response.Write("Access Dosyası Oluşturuldu.")
Â
 end if
%>
