contruccion de sentencia SQL rara

[almaluz]

Hola amigos.
Es correcto este codigo:

Código:

' Verifica si el nombre de usuario ha sido registrado anteriormente
	
	IF existeUsuario( nuevoNombre ) THEN
	errorformulario "Este nombre de usuario no está disponible, por favor elija otro.", paginaregreso
	END IF
	
	' Agrega el nuevo usuario a la base de datos
	
	sqlString = " INSERT INTO usuarios ( " &_
	"usuario, " &_
	"contrasenia, " &_
	"empresa," &_
	"email, " &_
	"calle, " &_
	"ciudad, " &_
	"codpost, " &_
	"provincia, " &_
	"cif, " &_
	"telefono, " &_
	"fax, " &_
	"web," &_
	") VALUES ( " &_
	" ' " & corregircomillas( nuevoNombre ) & " '," &_
	" ' " & corregircomillas( nuevaContrasenia ) & " '," &_
	" ' " & corregircomillas( empresa ) & " '," &_
	" ' " & corregircomillas( email ) & " '," &_
	" ' " & corregircomillas( calle ) & " '," &_
	" ' " & corregircomillas( ciudad ) & " ', " &_
	" ' " & corregircomillas( codpost ) & " '," &_
	" ' " & corregircomillas( provincia ) & " '," &_
	" ' " & corregircomillas( cif ) & " '," &_
	" ' " & corregircomillas( telefono ) & " '," &_
	" ' " & corregircomillas( fax ) & " '," &_
	" ' " & corregircomillas( web ) & " '," &_
	" ) "
	
	con.Execute sqlString
	response.Write sqlString

y esta es la funcion

Código:

 
FUNCTION corregircomillas (cadena)
	corregircomillas = REPLACE(cadena,"'","''")
END FUNCTION

Es que me da un error en la sentencia :(

Gracias chicos.

Juan