A me funziona.
controlla la versione del motore di scripting (5.6 è l'ultima)
codice:
<%
Function GetScriptEngineInfo
Dim s
s = "" ' Crea la stringa contenente le informazioni necessarie.
s = ScriptEngine & " versione "
s = s & ScriptEngineMajorVersion & "."
s = s & ScriptEngineMinorVersion & "."
s = s & ScriptEngineBuildVersion
GetScriptEngineInfo = s ' Restituisce il risultato.
End Function
Response.Write GetScriptEngineInfo
%>
Secondo.
Provala così:
codice:
<%
Function Test(str)
set re = new RegExp
re.Pattern="(\d+)-([^-]+)-([^-]+)"
re.Global=true
set ris = re.Execute(str)
for each rr in ris
sql = "INSERT INTO Software (vID_vSigla, vSigla, vDescrizione) VALUES (" & rr.SubMatches(0) & ",'" & rr.SubMatches(1) & "','" & rr.SubMatches(2) & "')"
Response.Write Sql & "
"
'cn.execute(sql)
next
End Function
Test "1-DV-Controllo-2-DV9-Traslazione"
%>