Obtener lista de suscriptos por email no verificados en FeedBurner

Como alguna vez ya lo he comentado, los suscriptos a nuestro blog por email pueden superar a los que nos leen mediante un lector de feeds, y aún no siendo así, de todas maneras pueden representar una buena cantidad que no debemos menospreciar y tratar de aumentar.

Una forma para incrementar dichas suscripciones por email la propuso hace unos días Alejandro Eguia en su post de Kabytes. La misma consiste en utilizar un plugin de WordPress para enviar un email ofreciendo volver a suscribirse a aquellas direcciones de email que aún no han confirmado su suscripción al feed y se encuentran en estado no verificado.

feedburner-email-suscripciones-no-verificadas

Como al parecer el plugin de WordPress está teniendo problemas, me puse a buscar una alternativa sencilla para obtener dichas direcciones de email y no tener que copiarlas una por una. Finalmente encontré un script greasemonkey que genera dos listas en texto plano, una separada por comas y otras por espacios, con todos los emails en estado no verificado para que podamos copiarlos y pegarlos fácilmente.

emails-no-verificados-feedburner

Para utilizar esta pequeña herramienta, deberán instalar primero, si es que aún no lo han hecho, la extensión de Firefox para ejecutar scripts greasemonkey. Luego de instalado el script, verán una nueva sección dentro la página de gestión de suscripciones por el email de FeedBurner, donde deberán hacer click sobre el enlace “Show Unverified Subscriber List” para desplegar ambas listas.

Por supuesto, no caigan en el error de hacer spam y asegúrense de colocar las direcciones de email en el campo CCO del mensaje para no revelarlas a los demás destinatarios.

Tags:

10 Comentarios

  • [...] @ Materia Geek | Vía Spamloco en Kabytes. Compartir a2a_linkname="Un poco de [...]

  • Gracias por encontrar este script, me sirvió de mucho. Y gracias a tí pude explicarlo en mi blog ;)

    Saludos!

  • De nada, muy bueno que te haya sido úil

  • [...] Materia Geek mencionan una ingeniosa forma de obtener la lista de e-mails sin verificar para evitar copiarlos a mano; y en Himsomnio tratan un pequeño detalle que podrá mejorar nuestro [...]

  • Otra forma de hacerlo es con un archivo .vbs …

    Abren un notepad, copian el codigo de abajo ( lo que estan entre ‘ CODIGO y lo guardan con extension vbs, lo ejecutan y se le generara un archivo .txt en el disco c.
    nombrado ArchivoNuevo.No se olviden de bajar de FeedBurner el archivo .csv, que en este caso se llama FeedMails

    ‘ CODIGO

    Dim fso, f1, ts, s, mailNumero
    mailNumero = 0
    mailNumeroActivo = 0
    mailInactivos = “”
    mailActivos = “”
    Const ForReading = 1
    Set fso = CreateObject(”Scripting.FileSystemObject”)
    rutaArchivo = “c:\FeedMails.csv”
    Set ts = fso.OpenTextFile(rutaArchivo, ForReading)
    Set ArchivoNuevo = fso.CreateTextFile(”c:\ArchivoNuevo.txt”, True)

    Do While Not ts.AtEndOfStream
    LineaArchivo = ts.ReadLine
    if mailNumero = 0 then
    ts.ReadLine
    else
    Mail = split(LineaArchivo, “,”)
    if trim(Mail(2)) = “Active” then
    mailActivos = mailActivos & Mail(0) & “,” & vbCrLf
    mailNumeroActivo = mailNumeroActivo + 1
    else
    mailInactivos = mailInactivos & Mail(0) & “,” & vbCrLf
    end if
    end if
    mailNumero = mailNumero + 1
    Loop

    mailActivos = mid(trim(mailActivos),1,(len(trim(mailActivos))-3))
    mailInactivos = mid(trim(mailInactivos),1,(len(trim(mailInactivos))-3))

    ArchivoNuevo.WriteLine “Mails Activos”
    ArchivoNuevo.WriteLine “————-”
    ArchivoNuevo.WriteLine mailActivos
    ArchivoNuevo.WriteLine ” ”
    ArchivoNuevo.WriteLine “Mails Inactivos”
    ArchivoNuevo.WriteLine “—————”
    ArchivoNuevo.WriteLine mailInactivos
    ArchivoNuevo.WriteLine ” ”
    ArchivoNuevo.WriteLine “Estadistica Mails”
    ArchivoNuevo.WriteLine “—————–”
    ArchivoNuevo.WriteLine “Activos ” & mailNumeroActivo
    ArchivoNuevo.WriteLine “Inactivos ” & mailNumero – mailNumeroActivo – 1
    ArchivoNuevo.WriteLine “Total ” & mailNumero

    ts.Close
    ArchivoNuevo.Close

    Set fso = Nothing
    Set ts = Nothing
    Set ArchivoNuevo = Nothing

    ‘ CODIGO

    Saludos, espero que sea de utilidad.

  • Gracias pac-man por el aporte

  • Pac-man, al copiar a partir de Dim fso… hasta Set ArchivoNuevo = Nothing, lo guardo con extension .vbs pero al ejecutarlo en mi disco duro, me sale un error: Invalid Character.

    Que estare haciendo mal?

    Y como hago para bajar el archivo FeedBurner el archivo .csv??

    Gracias

  • Holaaaa muchas gracias esta buenisima la informacion…

    Quisiera hacer una consulta…como puedo acceder a la lista de correos electronicos de las personas suscritas a mi blog de feedburner…ojala me puedas ayudar…muchas gracias..

  • Paola, una vez dentro de FeedBurner, tienes que ir a Publicize->Email Subscriptions->Subscription Management y hacer click en el enlace “View Subscriber Details” al final de la página. Así podrás ver la lista completa de suscriptos por email.

  • Excelente información ;) Justamente estaba buscando algo al respecto y me viene como anillo al dedo :)

    Gracias por compartilo!

    Saludos.

Deja un comentario