Slave a tutti, avrei un problema che non riesco a risolvere:
Mi connetto ad un db access ,tramite odbc, e vorrei verificare se in un campo memo ci sono determinati caratteri, per fare questo utilizzo la funzione instr di vbs pero ogni volta mi dice che il tipo non corrisponde e cioè

Errore di run-time di Microsoft VBScript (0x800A000D)
Tipo non corrispondente: '[string: "COMUNICATO Il giorn"]'

allora prima di eseguire la funzione INSTR converto il contenuto del mio campo in una stringa (nell'eventualità che non lo fosse poco ci credo.....) tramite funzione CSTR("nomecampo") ma anche dopo conversione ottengo sempre lo stesso risultato


Avete suggerimenti?
Grazie mille
Marcello

Scusa se ho fatto passare molto tempo ma sono un
pò impegnato questo è il codice che mi da quell'errore
Grazie
Marcello

<%@ language = vbscript %>
<% Response.Expires = -100 %>
<% response.Buffer = true %>
<!--#include file="..\adovbs.inc" -->
<%
dim path
dim objconn


set objconn = server.createobject("ADODB.connection")
objconn.ConnectionString="driver={Microsoft Access Driver (*.mdb)};" &_
"DBQ= " & Server.MapPath("..\..\mdb-database\sito.mdb")
objconn.open

dim objrs, stringa

Set objRS = Server.createobject("adodb.recordset")
objRS.open "cont", objconn, adOpenKeyset,, adcmdtable

do while not objRS.eof

response.write(vartype(objRS("contenuto")))

'response.write(objRS("contenuto"))
stringa = Cstr(objRS("contenuto"))


ist = instr(stringa, "c", 1)

objRS.movenext
loop

objRS.close
Set objRS= Nothing
ObjConn.Close
set ObjConn=nothing

Response.write("Modifica avventua con successo")


%>