Hallo,
nun kann ich mit folgendem code textdateien einlesen :-))
<%
Const fsForReading = 1
Dim strDateiname, strInhalt, strInhaltHTML
Dim objFs ' FileSystemObject Objekt
Dim objTextStream ' Textstream Objekt
strDateiname = "C:\14200.htm"
Set objFs = CreateObject("Scripting.FileSystemObject")
Set objTextStream = objFs.OpenTextFile(strDateiname, fsForReading)
strInhalt = objTextStream.ReadAll
strInhaltHTML = Server.HTMLEncode(strInhalt)
strInhaltHTML = Replace(strInhaltHTML,vbCrLf,"<BR>" & vbCrLf)
Response.Write strInhaltHTML
objTextStream.Close
Set objTextStream = Nothing
Set objFs = Nothing
%>
was ich möchte ist eine HTML datei einlesen !! Obige datei 14200.htm
wird als quelltext angezeigt ! :-<
was tun um dies zu ändern ??
danke im voraus
ciao
Michael