codice:
<% 
if clng(request.querystring("id"))>=1 then 
Dim strSQL 
strSQL = "SELECT localita FROM database WHERE id= "&Request.querystring("id") 
Set objRS = Server.CreateObject("ADODB.Recordset") 
objRS.Open strSQL, objConn , 1,3 
end if 

 
response.write("<input name=""localita"" value="""&objRS("localita")&""" type=""text"" size=""80"">") 
%>
dovrebbe essere giusta