Αρχή :: Ενότητες :: Scripting :: Απαντήσεις     
 

Forum

Εμφάνιση των πρώτων σειρών ενός κειμένου - Από {Kostas}

Πώς μπορώ να εμφανίζω με ASP μόνο τις 3 ή 4 πρώτες γραμμές απο ένα .txt ;

 


Απάντηση από:Faq Admin

Dim objFSO
Set objFSO = Server.CreateObject("Scripting.FileSystemObject")

Dim objTextStream

const strFileName = "D:\path\to\arxio.txt"
const fsoForReading = 1

If objFSO.FileExists("D:\path\to\arxio.txt") then

Set objTextStream = objFSO.OpenTextFile(strFileName, fsoForReading)
Response.Write "" & objTextStream.Read(150) & ""
objTextStream.Close
Set objTextStream = Nothing
Else

Response.Write strFileName & " δεν υπάρχει."
End If

Set objFSO = Nothing


Όπου 150 θα δώσεις το σύνολο των χαρακτήρων που θέλεις να διαβάσεις.



tip: Web hosting Unix με Bandwith + Disk space Απεριόριστο μόνο 2.30 € * F5 για νέο tip

   Πίσω στην προηγούμενη σελίδα






Η Εταιρία | Web Hosting | Domain names | Web Information | Υπηρεσίες | Resellers | Υποστήριξη |
Copyright © 2007–09 4GR.NETWORKS, All rights reserved.