codice:
dim conn10,str10
str10 = "Provider = SQLOLEDB; Data Source = localhost; User ID = sa; Password = admin; Initial Catalog = basko;"
set conn10 = server.CreateObject("ADODB.Connection")
conn10.open str10
SQL10 = "SELECT * FROM RICHIESTE"
set rs = server.CreateObject("ADODB.Recordset")
rs.open sql10, conn10, 2, 4
SQL10 = "INSERT INTO [RICHIESTE] (IDUSER_ENTRY, IDUSER_ASSEGN, IDSTATO, IDPRIORITA, IDCLASS, IDCANALE, DESCR_RICHIESTA, ISDEL, DATA_OPEN, UPDATETIME) "
data = CDate(FormatDateTime(Now(), 2))
session.LCID = 1040
SQL10 = SQL10 & "VALUES ('" & CInt(i) & "',"
SQL10 = SQL10 & "'" & CInt(a) & "', CInt(1),"
SQL10 = SQL10 & "'" & CInt(b) & "',"
SQL10 = SQL10 & "'" & CInt(c) & "',"
SQL10 = SQL10 & "'" & CInt(d) & "',"
SQL10 = SQL10 & "'" & Replace(Server.HTMLEncode(request.Form("description")), "'", "''") & "', CInt(0),"
SQL10 = SQL10 & "'" & data & "',"
SQL10 = SQL10 & "'" & data & "')"
conn10.execute(SQL10)
conn10.close
set conn10 = nothing
response.Write("Inserimento effettuato!")
in questo codice per iserire via sql, mi da errore di type mismatch per CInt(), perchè??

premetto che le variabili a, b, c, d ed e sono integer