----------------------------------------------------
impariamo a fare un po' di debug

codice:
...
my_Conn.Open strConnString
' iniziopezzo nuovo
Dim sSql
sSql = "SELECT * FROM cerca WHERE MATCH(PERSONE) AGAINST('" & chi & "') ORDER BY ID DESC"
Response.Write "maGGica SQL...: " & sSql
Response.Flush
' fine pezzo nuovo
set srst = sSql
If srst.EOF Then
...
poi posta quello che viene a video
----------------------------------------------------