cancellazione record

[Roby_72]

E per quale motivo è un campo di tipo testo? Trasformalo.

Roby

[forte78]

ma scusami se rimane testo nn dovrebbe dar problemi nn penso che faccia differenza per me c'è qualche problematica all'interno di questo:


oCon.Execute "DELETE FROM colloqui WHERE codiceimmobile IN ('"& sCodiceid &"')"



anche perchè la cancellazione di un solo record ha sempre funzionato infatti nn mi ha mai dato problemi lo sta dando con IN

[Roby_72]

Non devi mettere gli apici, solo virgolette...
La sintassi infatti è .... IN (1, 3, 5, 12, ...)

Roby

[forte78]

allora ho visionato questo da questo errore quando c'è un caso specifico


seleziono n.4

tabella "IMMOBILI " CODICE N.4 esiste e lo cancella
tabella "ACCORDI" CODICE N.4 non esiste e da questo errore



Microsoft OLE DB Provider for ODBC Drivers error '80040e07'

[Microsoft][ODBC Microsoft Access Driver] Data type mismatch in criteria expression.

/public/arccanc.asp, line 18


ti ripropongo tutta la query


<%
Dim sCodiceid
Dim oCon

Set oCon=Server.CreateObject("ADODB.Connection")
oCon.Open "driver={Microsoft Access Driver (*.mdb)};dbq="& server.MapPath("/public/databaseimm.mdb")

sCodiceid = Request.Querystring("codiceid")


If sCodiceid<>"" Then

'Eliminazione dell'immobile

oCon.Execute "DELETE FROM immobili WHERE codiceimmobile IN ("& sCodiceid &")"
'Eliminazione dei riferimenti in altre tabelle
oCon.Execute "DELETE FROM accordi WHERE codiceimmobile IN ( "& sCodiceid &" ) "
oCon.Execute "DELETE FROM colloqui WHERE codiceimmobile IN ( "& sCodiceid &" ) "
oCon.Execute "DELETE FROM StoricoVariazioni WHERE codiceimmobile IN ( "& sCodiceid &" ) "
oCon.Execute "DELETE FROM databaseric_colloqui WHERE codiceimmobile IN ( "& sCodiceid &" ) "

End IF

oCon.Close

Response.Redirect "risarccod.asp"
%>



attendo notizie

[Roby_72]

La "notizia" è nell'errore:

[Microsoft][ODBC Microsoft Access Driver] Data type mismatch in criteria expression.

Non c'è altro. Stai eseguendo una operazione tra tipi di dati non confrontabili: numerico e testo.

Roby

[forte78]

e come mai da cosi riesco a farlo.?????? naturalmente è in un'altra situazione

<%
Dim sCodiceImm
Dim oCon

Set oCon=Server.CreateObject("ADODB.Connection")
oCon.Open "driver={Microsoft Access Driver (*.mdb)};dbq="& server.MapPath("/public/databaseimm.mdb")

sCodiceImm = Request.Querystring("cod")

If sCodiceImm<>"" Then

'Eliminazione dell'immobile
oCon.Execute "DELETE FROM immobili WHERE codiceimmobile=" & sCodiceImm

'Eliminazione dei riferimenti in altre tabelle
oCon.Execute "DELETE FROM accordi WHERE codiceimmobile='" & sCodiceImm & "'"
oCon.Execute "DELETE FROM colloqui WHERE codiceimmobile='" & sCodiceImm & "'"
oCon.Execute "DELETE FROM StoricoVariazioni WHERE codiceimmobile=" & sCodiceImm
oCon.Execute "DELETE FROM databaseric_colloqui WHERE codiceimmobile='" & sCodiceImm & "'"

End IF

oCon.Close

Response.Redirect "riservato.asp"
%>

[Roby_72]

te l'ho già detto, la sintassi IN è un po' diversa.

Roby

[forte78]

nn mi proponi soluzioni ????

[Roby_72]

Fatto anche quello.

Roby