# Die Reihenfolge geht so: alle Includes aufl�sen. Dann den Code
# ausf�hren. Klar, warum das so nicht geht?
irgendwie nicht. bei den includes, wenn man sie denn so nennen will, geht es
um links, die zu einer seite geh�ren... sollen. daher habe ich eine *.inc
gemacht, die �ber die id in der datenbank ihren inhalt bekommt.... um sie
ggf. erweiterbar zu halten. daher die "link_ca_id". ich dachte das es so
gehen m�sste. mit includes aufl�sen, kann ich jetzt wirklich nichts
anfangen.
# Irgendwas in der Beschreibung macht mich stutzig. Wenn es tats�chlich
# darum geht Datenbankinhalte auszugeben, dann geht das anders und das im
# folgende gesagte ist hinf�llig.
#
# Wenn es tats�che darum geht eine Datei einzubinden, hiermal eine
# Funktion, die eine HTML Datei nimmt und den Teil zwischen <body> und
# </body> in die aktuelle Seite einf�gt. Kann/muss man halt nach Bedarf
# um�ndern.
#
#
# Sub EmbedFile(sFilename)
# Dim fso, f, s, iWriteFlag
# Const CFORREADING = 1
# Const CVBTEXTCOMPARE = 1
# Set fso = CreateObject("Scripting.FileSystemObject")
# Set f = fso.OpenTextFile(Server.MapPath(sFilename), CFORREADING)
# Do While Not f.AtEndOfStream
# s = f.ReadLine
# if instr(1, s, "<body", CVBTEXTCOMPARE) > 0 then
# iWriteFlag = true
# elseif instr(1, s, "</body", CVBTEXTCOMPARE) > 0 then
# iWriteFlag = false
# else
# if iWriteFlag Then
# response.write s & vbcrlf
# End If
# End If
# Loop
# f.close
# End Sub
#
sorry hubert..... ich bin wohl echt zu "doof". zum teil kann ich mit deinem
tipp was anfangen... aber auch nur zum teil. was wird wo aufgerufen, wo
passiert was??? ich kann damit wirklich nichts anfangen.
# --
#
# Viele Gr��e
# Hubert Daubmeier
#
#
# -----Original Message-----
# From: Alexander Husic [mailto:[EMAIL PROTECTED]]
# Sent: Tuesday, September 18, 2001 1:31 AM
# To: ASP Diskussionsliste fuer Anfaenger
# Subject: [aspdebeginners] dymanische includes
#
#
# hallo liste,
#
# ich bin auf der suche nach einem tut f�r dynamische includes.... ich
# habe zwar hier eine gefunden, doch ist das nicht das, was ich brauche,
# oder ich habe es nicht verstanden.
#
# ich habe nun folgenden ansatz gefunden und versucht abzuwandeln... mit
# "durchschlagendem" erfolg:
#
# strMain = getFileContents("Link_Cat_ID")
#
# If Request.form("cboFile") = "" Then
# strInclude = getFileContents("Link_Cat_ID")
# Else
# strInclude = getFileContents(Request.form("cboFile"))
# End If
# strMain = replace(strMain,"<!-- INCLUDE FILE HERE -->",strInclude)
# Response.Write strMain
#
#
# und folgender fehlermeldung:
#
#
# Laufzeitfehler in Microsoft VBScript- Fehler '800a000d'
# Typen unvertr�glich: 'getFileContents'
# /xperience/asp/main.asp, line 20
#
#
# ich vermute, dass das an dem aufruf des datenbank feldes liegt.... nur
# so br�uchte ich es aber. wer kann mir weiterhelfen????
#
# danke im voraus,
# alexander husic
#
#
#
# | Oft Gefragtes: http://www.aspgerman.com/aspgerman/faq/
# | [aspdebeginners] als [EMAIL PROTECTED] subscribed
# | http://www.aspgerman.com/archiv/aspdebeginners/ = Listenarchiv Sie
# | knnen sich unter folgender URL an- und abmelden:
# | http://www.aspgerman.com/aspgerman/listen/anmelden/aspdebeginners.asp
#
#
# | Oft Gefragtes: http://www.aspgerman.com/aspgerman/faq/
# | [aspdebeginners] als [EMAIL PROTECTED] subscribed
# | http://www.aspgerman.com/archiv/aspdebeginners/ = Listenarchiv
# | Sie knnen sich unter folgender URL an- und abmelden:
# | http://www.aspgerman.com/aspgerman/listen/anmelden/aspdebeginners.asp
| Oft Gefragtes: http://www.aspgerman.com/aspgerman/faq/
| [aspdebeginners] als [email protected] subscribed
| http://www.aspgerman.com/archiv/aspdebeginners/ = Listenarchiv
| Sie knnen sich unter folgender URL an- und abmelden:
| http://www.aspgerman.com/aspgerman/listen/anmelden/aspdebeginners.asp
