codice:
Sub spesepostali
	provincia = ",CA,NU,OR,SS,"
	spedizione = destinazioneprovincia
	
	'response.write spedizione & "
"
	'response.write provincia & "
"
	'response.write Instr(provincia,spedizione) & "
"
	
	IF Instr(provincia,spedizione) > 0 THEN
	SpeseCorriere = 22
	'response.write SpeseCorriere
	ELSE
	SpeseCorriere = 12
	'response.write SpeseCorriere
	END IF
End Sub
perchè non me le manipola?