Hallo,
<%
DIM MyText
MyText = ReadTextfile("d:\inetpub\wwwroot\mail\", "content", "txt")
Response.Write Replace(MyText, vbcrlf, "<br>" & vbcrlf)
Function ReadTextFile(MyPath, MyFile, MyFileType)
Const ForReading = 1
Dim fso, f
MyFile = MyPath & MyFile & "." & MyFileType
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.OpenTextFile(MyFile, ForReading)
ReadTextFile = f.ReadAll
End Function
%>
Mit freundlichen Gr��en
Hotel Andr�
Andr� Scheres
http://hotelandre.de
http://partnerhotels.com
-----Urspr�ngliche Nachricht-----
Von: Thomas Beckert [mailto:[EMAIL PROTECTED]]
Gesendet: Montag, 30. September 2002 15:46
An: AspGerman Kaffeehaus
Betreff: [aspdecoffeehouse] textdatei einbinden...
hallo liste-
ich m�chte eine datei names .msgXY in meine seite einbinden.
wobei XY variieren kann.
die datei ist reiner text, aber ich wei� nicht, wie ich ihren inhalt auf der
html-seite ausgeben kann....
kann mir jemand weiterhelfen???
| [aspdecoffeehouse] als [EMAIL PROTECTED] subscribed
| http://www.aspgerman.com/archiv/aspdecoffeehouse/ = Listenarchiv
| Sie k�nnen sich unter folgender URL an- und abmelden:
| http://www.aspgerman.com/aspgerman/listen/anmelden/aspdecoffeehouse.asp
| [aspdecoffeehouse] als [email protected] subscribed
| http://www.aspgerman.com/archiv/aspdecoffeehouse/ = Listenarchiv
| Sie k�nnen sich unter folgender URL an- und abmelden:
| http://www.aspgerman.com/aspgerman/listen/anmelden/aspdecoffeehouse.asp
