Type mismatch: '[string: "5x100/112"]'

[Lino80]

Microsoft VBScript runtime error '800a000d'

Type mismatch: '[string: "5x100/112"]'

/ruote/include/inc_libreria.asp, line 220

Function VisualizzaPrezzo(VisualizzaPrezzo_StringaPrezzo)
		VisualizzaPrezzo_StringaPrezzo = Int(VisualizzaPrezzo_StringaPrezzo) 
		Do While Len(VisualizzaPrezzo_StringaPrezzo) < 3
			VisualizzaPrezzo_StringaPrezzo = "0" & VisualizzaPrezzo_StringaPrezzo
		Loop
		Dim VisualizzaPrezzo_StringaDecimale, VisualizzaPrezzo_StringaIntero
		VisualizzaPrezzo_StringaDecimale = Mid(VisualizzaPrezzo_StringaPrezzo, Len(VisualizzaPrezzo_StringaPrezzo) - 1, 2)
		VisualizzaPrezzo_StringaIntero = Mid(VisualizzaPrezzo_StringaPrezzo, 1, Len(VisualizzaPrezzo_StringaPrezzo) - 2)
		VisualizzaPrezzo = VisualizzaPrezzo_StringaIntero & "," & VisualizzaPrezzo_StringaDecimale
	End Function

come mai da questo errore?

[Lino80]

risolto anche questo tnx