por que me inserta 2 veces el mismo registro??

[Gaby_Corr]

no se por que me graba 2 veces el registro, alguna ayudadita???

Código:

cliente = cint(request("cliente"))
pantalla = request("pantalla")
peticion = request("encabezado") 
comentarios = request("comentarios")
ncorreos = request("correos")
fechacorreo =request("fechacorreo")
sistema = request("sistema")
sversion = request("version")
basedatos = request("bd")
nDist = cint(Session("GrupoUsuario"))
nUsuario =Session("NombreUsuario")



conectarDB




if cliente<>"" and peticion<>"" and pantalla<>"" then
    str = "Select peticiones_id from DS_Peticiones where peticiones_id = "& cont 
	Set rs = cnn.execute(str)
	if rs.eof then         		
	   sSQL = "Insert into DS_Peticiones(peticiones_numero_distribuidores,peticiones_id,peticiones_usuario_distribuidor,"_
	   & "peticiones_encabezado,peticiones_fecha_registro,peticiones_sistema,peticiones_version," _
	   & "peticiones_numero_cliente,peticiones_pantallas_funciones,peticiones_comentario,peticiones_leido)"_
	   & " VALUES ('"& nDist &"','"& cont &"','"& nUsuario &"','"& peticion &"',getdate(),"_
	   & "'"& NombreSistema &"','"& sversion &"','"& cliente &"','"& pantalla &"','"& comentarios &"','0')"
	   cnn.Execute(sSQL)			   	
   end if	
    
   rs.close
   Set rs = nothing     
end if


desconectarDB
%>
<script type="text/javascript" language="javascript">
self.close();
</script>