[vbs] Insert Into

[Aki]

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

[teorema55]

Se sono integer non ci vuole il singolo apice intorno alle variabili nella query

[teorema55]

Per esempio, non

SQL10 = SQL10 & "VALUES (' " & CInt(i) & " ',"

ma

SQL10 = SQL10 & "VALUES (" & CInt(i) & ","

[teorema55]

Inoltre in questa riga

SQL10 = SQL10 & "'" & CInt(a) & "', CInt(1),"

penso ci sia da sistemare la sintassi

[kalosjo]

Inoltre oserei dire che se sono già variabili intere non devi fare cint, che fa il cast da stringa a intero

[teorema55]

penso ci sia da sistemare la sintassi

... no, questa va bene, chiedo venia.

[optime]

Originariamente inviato da kalosjo
Inoltre oserei dire che se sono già variabili intere non devi fare cint, che fa il cast da stringa a intero

se vogliamo essere pignoli, in ASP esistono solo variant, quindi il CInt va bene

[kalosjo]

Se dice che sono interi, vuol dire che ha già assegnato un valore, per cui da variant passano al tipo determinato dal valore che viene impostato

Dim variabile

dichiara una variabile variant

variabile="pippo"

la fa diventare stringa

[optime]

la fa diventare variant sottotipo stringa. ti sei mai chiesto perche' in asp non puoi fare

Dim sStringa As String

?

[Aki]

ok grazie