Hallo Stabilow!
Die Funktion Split(produktnamen, ";") schlüsselt die einzelnen Werte auf und schreibt sie in ein Variablenfeld.
meinFeld = Split(produktnamen, ";")
for each eintrag in meinFeld
Response.Write eintrag & "<br>"
next
Gruß,
Daniel