set objRsList1 = countconn.execute(SQL)
while not objRsList1.Eof
num = objRsList1("num_ip")


probabilmente è sbagliato