Hai provato a scrivere la stringa sql tutta su una riga, anzichè spezzarla?
codice:strSQL = "INSERT INTO tb_giocatori (str_nomegioc, str_cognomegioc, str_nato,str_citta, str_nazione, str_peso, str_altezza, str_ruolo, str_webgioc, str_txtgioc)VALUES('"&StrNomeGioc&"','"&StrCognomegioc&"','"&StrNato&"',"&StrCitta&","&StrNazione&","&StrPeso&","&StrAltezza&","&StrRuolo&",'"&StrWeb&"','"&StrTxt&"');"
codice:ObjRs.open "Select * FROM tb_giocatori WHERE str_nato='"&StrNato&"' AND str_nomegioc='"&StrNomegioc&"' AND str_cognomegioc='"&StrCognomegioc&"'",ObjConn,1,3 if ObjRs.BOF AND ObjRs.EOF then