split funktion

[Boy]

Hallo,

ich haben ein Problem mit der Split funktion in vbscript:

<%
  strTestIP = objFile.name
  arrTestIP = Split(strTestIP, ".", 2, 0)
  For x = 0 to UBound(arrTestIP)
  Response.Write arrTestIP(x) & "<br>"
  Next
%>

So funktioniert es nicht. Er gibt immer als fehler aus, dass ein Objekt erforderlich ist.

Gebe ich aber für strTestIP einen String ("192.168.12.12") ein funktionierts.

Kann mir da jemand helfen?

[daniel84]

Lass dir mal vor der "Split-Zeile" den Wert von strTestIP ausgeben. Steht da etwas drin?

[Boy]

Die Seite wird gar nicht angezeigt durch diesen Fehler. Daher kann ich auch nicht den Wert ausgeben lassen.

Mein Problem ist, dass ich nicht weiss wie die Syntax lautet, die ich benötige, um den Dateinamen und nicht einen festgelegten String zu splitten.

Da muss es hapern, aber wo?

[daniel84]

Die Seite wird gar nicht angezeigt durch diesen Fehler. Daher kann ich auch nicht den Wert ausgeben lassen.

Doch. Lasse dir den Wert ausgeben (mit response.write), und schreibe auf der folgenden Zeile response.end . Dann sollte es gehen. Dann postest du hier mal den Wert (wobei ich befürchte, dass der Inhalt des Strings eine leere Zeichenkette ist...)

Gruss,
Daniel

[Chris]

Hallo

sag mal, was steht denn da noch oberhalb? bzw. woher/wie kommst du zu diesem objFile.name?

Gruss
Chris

[Karin]

Hallo

Versuchs doch mal so:
(natürlich musst du bei 'getfolder' noch den Pfad angeben.)

---------------
Dim FSO, FldrObj, FileObj, strTestIP, x
dim arrTestIP

Set FSO = CreateObject("Scripting.FileSystemObject")
Set FldrObj = FSO.GetFolder("c:\temp")

For Each FileObj In FldrObj.Files
 strTestIP = FileObj.name
 arrTestIP = Split(strTestIP, ".", 2, 0)

For x = 0 to UBound(arrTestIP)
  response.Write arrTestIP(x) & "<br>"
  response.flush
 Next

Next
-----------------

Das sollte gehen.

Gruss
Karin