Formulario para enviar un tweet con Visual Basic 6 (código fuente)

Lo prometido es deuda, el código de la versión 0.1.0 para enviar un tweet con visual basic 6 puedes descargarse desde el link: http://bit.ly/6keA2V

Archivos: basExcelTweet.bas, frmAbout.frm, frmExcelTweet.frm

Function encodeBase64(textData) adaptada de la página: http://sarahs-muse.livejournal.com/805654.html
Formulario: frmExcelTweet.frm adaptado de la página: http://www.codeforexcelandoutlook.com/blog/2009/02/excel-to-twitter/

Dudas y comentarios con @davidaustria

1. <%
2. Dim i
3. i = 99
5. Response.write «<B>Lyrics of the song 99 Bottles of Beer</B><BR><BR>»
7. While i <> 1
8. Response.write i & » bottles of beer on the wall, « & i & » bottles of beer.<BR>»
9. Response.write «Take one down and pass it around, « & i-1 & » bottles of beer on the wall.»
10. Response.write «<BR><BR>»
11. i = i-1
12. wend
15. Response.write «1 bottle of beer on the wall, 1 bottle of beer.<BR>»
16. Response.write «Take one down and pass it around, no more bottles of beer on the wall.<BR><BR>»
18. Response.write «No more bottles of beer on the wall, no more bottles of beer.<BR>»
19. Response.write «Go to the store and buy some more, 99 bottles of beer on the wall.»
21. %>