ASP Image og replace

Det er ikke en sti du har, men en url, og ja, uden at kende Persits.Jpeg vil
jeg bestemt tro at du kun kan gøre det med en sti til billedet.

oki.. Jeg har nu fået bixet noget sammen ved hjælp af split funktionen.. Jeg vil lige høre om der er en alternativ løsning til hvordan det kan laves.. Min kode er som følgene:

<%
tekst = "[IMG]http://www.case-modding.dk/pic/artikel/18/18_logo.jpg[/IMG]"

set regcon = new RegExp
regcon.pattern = "\[img\](.*?)\[\/img\]"
regcon.ignoreCase = true
regcon.Global = true

text = regcon.replace(tekst, "$1")

Dim MyArray, Msg
MyArray = Split(text, "/", -1, 1)
' MyArray(0) contains "VBScript".
' MyArray(1) contains "is".
' MyArray(2) contains "fun!".
Msg = "0: " & MyArray(0) & "<br> 1: " & MyArray(1)
Msg = Msg & "<br>2: " & MyArray(2)
Msg = Msg & "<br>3: " & MyArray(3)
Msg = Msg & "<br>4: " & MyArray(4)
Msg = Msg & "<br>5: " & MyArray(5) 'Navnet på mappen
Msg = Msg & "<br>6: " & MyArray(6) 'Navnet på filen
response.write Msg & "<br>"
Path = Server.Mappath("pic\artikel\" & MyArray(5) & "\" & MyArray(6))
response.write Path & "<br><br>"

response.write text

' Create instance of AspJpeg
Set Jpeg = Server.CreateObject("Persits.Jpeg")
' Compute path to source image

' Open source image
Jpeg.Open Path

Response.Write "<p><b>Billedet var : </b>" & Jpeg.Width & "x" & Jpeg.height & ".</p>"
           
if Jpeg.Width < 300 then
response.write "mindre"
else
response.write "større"
end if

'tekst = regcon.replace(tekst, "<img width=""300"" src=""$1"" onclick=""popup(''$1'',''Billedevisning'');""><br>Klik for at forstørre billedet!")

%>

lukker