Selam Hasan;
Nasılsın görüşmeyeli
haber1.inc dosyalarının içinde asp kodu çalıştırmıyorsan eğer aağıdaki kod işini görecektir :
x i daha önceden randımize olarak belirdiğini varsayalım :
- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
Dim Dosya, Yazi
Set Dosya=Server.CreateObject ("Scripting.FileSystemObject")
Set Yazi=Dosya.OpenTextFile (Server.Mappath(".") & "\haber" & x & ".inc", 1)
Response.Write (Yazi.ReadAll)
Yazi.close
Set Yazi=Nothing
Set Dosya=Nothing
- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
Bu inc dosyalarının içeriğini aynen istediğin yere yazar.
Ama dediğim gibi inc dosyaları içinde asp kodun varsa eğer o kodları text olarak algılar aynen yazar.
FSO hakkında daha ayrıntılı bilgi edinmek istersen :
http://www.aspnedir.com/makaleler_icerik.asp?id=250
Kolay gelsin.
egf.