ok comincia per una questione di ordine a scriverla così

dim sql as string
sql="SELECT * FROM tb_fresco WHERE nome = '" & Request.QueryString("nome")& "'"

dim objCmd as new OleDbDataAdapter(sql, objConn)

perchè erano quadrate le parentesi al request.querystring ?