<%
A = Request.Cookies("venere")

If A<>stadioradio
Then
Dim str_code
str_code = Request.cookies("Login")("userCode")

'Creo una nuova SQL string
strSQL = "SELECT code " & _
"FROM tbl_Authors WHERE name='" & str_users_name & "' AND code='" & str_code & "' AND pass='" & str_users_password & "'"

'Credo un nuovo recordsheet
Set rs_check = Server.CreateObject ("ADODB.RecordSet")

'Apro il record sheet e eseguo il codice SQL
rs_check.open strSQL,adoCon

If rs_check.EOF OR rs_check.BOF Then
Response.Redirect "/public/pagine/registrazione_e_gestione_utenti/noentry.asp"
End If
Else
End If
%>