AspDepo.org

asp script deponuz

Son Yorumlananlar

Son 10 Kod

Gösterim

  • Bugün : 306
  • Toplam : 1905890

Yapay Include (tr)

Bu kod 1322 kere okunmuştur.

Kod
Dinamik include yapmak istediğinizde bir alternatif.

<% Include("bilgi.asp") %>

Include edilecek dosyamızda hiç <% ve %>  olamaması lazım. Dolayısıyla HTML işlemlerini REsponse.Write ile yapmamız gerekiyor


<%
Sub  Include(strDosya)
     SET  FSO = Server.CreateObject("Scripting.FileSystemObject") '=> Dosya sistemi nesnemizi yarattık.
     SET  Oku = Fso.OpenTExtFile(Server.Mappath(strDosya)) 'include yapacağımız dosyayı açtık
    strKodlar = Oku.ReadAll '=> Kodlarımızı aldık
    Oku.Close '=> Nesnemizi durdurduk.
     Set  oku =  Nothing  '=> Nesnemizi temizledik.
     Set  Fso =  NoThing  '=> Nesnemizi temizledik.
    Execute(strKodlar) '=> Kodlarımı çalıştırdık.
End  Sub
%>


Telif: Can HANHAN