Hallo Hubert,

vielen Dank f�r deine Unterst�tzung. An dem Skript dass du mir geschickt
hast, hab ich eben 2 Stunden gesessen und so elegant hat meine L�sung auhc
nicht ausgesehen. Naja, aber ich hab mal wieder was �ber das FSO und seine
Funktionen gelernt. werde mich sicher mit weiteren Fragen melden.

Merci.
Martin

-----Urspr�ngliche Nachricht-----
Von: Hubert Daubmeier [mailto:[EMAIL PROTECTED]]
Gesendet: Montag, 12. November 2001 15:18
An: ASP Diskussionsliste fuer Anfaenger
Betreff: [aspdebeginners] RE: AW: RE: Objektdaten aus Textdatei lesen



> Hatte auch insgeheim gehofft, dass es ein Universalskript gibt, das
Daten welchen Typ auch immer in eine Datenbank einlesen kann.

Kann es nicht geben. Nicht in endlicher Zeit.

Aber wenn es unbedingt sein muss: h�nge unten mal ein Script an, das aus
HTML Plain text produziert.  Auf �hnliche Art und Weise m��te sich auch
XML auch zu Fuss zerlegen lassen.


--

Viele Gr��e
Hubert Daubmeier




-----Original Message-----
From: Hubert Daubmeier [mailto:[EMAIL PROTECTED]]
Sent: Friday, March 23, 2001 8:22 PM
To: ASP Diskussionsliste fuer Anfaenger
Subject: [aspdebeginners] RE: replace tag




> ... der IIS h�ngt sich jedesmal auf.

Dann hast Du wahrscheinlich eine Endlosschleife eingebaut. Varianten zur
Abhilfe:

A) warte bis er in den Timeout l�uft.  Selbst 90 Sekunden k�nnen ganz
sch�n lange sein  ;-)

B) schreib den kritischen Part in ein VB-Script und teste es dort aus.
Also etwa
   meintext ="ganz was langes oder das unten stehende .."
   msgbox meinefunktion(meintext)

   Function meinefunktion(einText)
     ...
   End Function

Das Ganze packst Du eine Test.vbs und l�sst es laufen. Da siehst Du dann
schon wo es zwickt. Hast Du da eine Endlosschleife drin, schau im
Taskmanager nach Wscript oder Cscript (je nachdem wie Du es gestartet
hast) und kill den.  Auf die Art lassen sich auch Randbedingungen viel
besser testen, was in einem komplexen Datenbankenvironment nicht so
einfach geht.   Hier im Beispiel mal der Funktion einen leeren String
�bergeben (w�re nicht unwahrscheinlich, wenn die Funktion dann zu
spinenn anf�ngt).  Oder gibt ihm per String(65000, 255) mal was Fettes
zum Beissen.

Flutscht die Funktion r�ber nach ASP holen und einfach einbauen.


Weil es interessant klang habe ich es dann gleich mal ausprobiert. Ist
nicht die eleganteste oder schnellste L�sung, lief aber innerhalb von
zwei Minuten  ;-)




meintext = "<P><STRONG>ist eine transaktionsbasierende Software zur
Verbindung der Steuerungs- mit der Unternehmensebene.<BR></STRONG>RSSql
ist ein revolution�res Tool, das online eine Datenverbindung zwischen
Steuerungsebene herstellt. Dabei kann auch von der Datenbank wieder
zur�ck in die Steuerung geschrieben werden! Jeder beliebige
DDE/OPC-Server stellt Daten jeder beliebigen ODBC-Datenbank (Microsoft
SQL Server etc.) zur Verf�gung. RSSql l�uft unter Windows NT/2000 als
Service.</P>"

msgbox htmltotext(meintext)


Function htmltotext(sString)
  Do While instr(1, sString, "<", vbTextCompare) > 0
    sString = car(sString, "<") & cdr(sString, ">")
  Loop
  htmltotext = sString
End Function


'
************************************************************************
********
' *
' * String Funktionen
' *
Function car(sString, sDelim)
  Dim i
  i = InStr(1, sString, sDelim, vbTextCompare)
  If i = 0 Then
    car = ""
  Else
    car = Trim(Left(sString, max(0, i - 1)))
  End If
End Function


Function cdr(sString, sDelim)
  Dim i
  i = InStr(1, sString, sDelim, vbTextCompare)
  If i = 0 Then
    cdr = ""
  Else
    cdr = Trim(Mid(sString, max(0, i + Len(sDelim))))
  End If
End Function


Function Min(a, b)
  If a < b Then Min = a Else Min = b
End Function


Function max(a, b)
  If a > b Then max = a Else max = b
End Function



--

Viele Gr��e
Hubert Daubmeier


| 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

Antwort per Email an