VBcoders Browse New Submit Contact Sign In

No account? Register free

Forgot password?

VBC Multi-Downloader

Troy Williams  (2 Submissions)   Internet/HTML   Visual Basic 3.0   Intermediate   Wed 3rd February 2021

Written by: Troy Williams
Email: [email protected]


First off, the most of the code is original. The rest of the code has been
put to gether from various sources around the internet including VBC. So if you recognize code that you wrote
I will be more then happy to put your name to the code.



This program is designed to download source code from VBC..
- It is capable of downloading up to six files at the same time(well actually, the number is virtually unlimited, but more then 4 or 5 will piss VBC off. I found that 2 gives good results).
- It supports cut and pasting of urls, as well as drag and dropping urls.
I wrote this program because my home computer (win XP pro) could not access the VBC site for some reason.
I was receiving the code of the day newsletter, in which were the links to that days uploads.
So I put two and two together and wrote an app to download the files.
Along the way I discovered a number of interesting things. The urls in the newsletters are redirect links
So I developed a way to follow the redirect links. The program has a number of interesting features as well.
The urls to download are stored in a listbox, which basically acts like a que. This allows multiple winsock controls to download different files
When a valid download url is found (i.e. the normal sourcecode download page) it copies the html to a directory named for the of the webpage. <br/> This allows for a description of the code to be saved along with the zip file. <br/> Also the html and file headers are saved in that directory as well as a *.url file with the download url. <br/> <br/> <br/> The program also logs urls that caused problems to a log window, which allows the log to be written to disk. <br/> The Url list can be saved to a file as well. <br/> <br/> <br/> To use the program.... <br/> Start up the program, either from the ide or from a full compile. <br/> Select options from the menu and locate the directory where you want to download the files to, also enter the number of simultaneous downloads you want to have. <br/> Goto File/New Downloads <br/> An URL List window will popup, simply copy and past (or drag and drop) the urls into the listbox <br/> When you are ready to begin downloading, click on the download button <br/></p> <p><strong>Side Effects</strong><br/>I have test the program out on win XP and win NT and it seems to work fine. There may be a problem when the "threads" try and grab the same download link. I have only encountered this behavior once in my testing.</p> <!-- API Declarations --> <!-- Rating --> <div id="dv31544" style="margin:12px 0"> <strong><span id="ra31544" class="cgr" style="font-size:0.875rem">Rate VBC Multi-Downloader</span></strong> <ul class="srating"> <li><a href="javascript:void(0)" onmouseover="document.getElementById('ra31544').innerHTML='Terrible - 1 ★'" onmouseout="document.getElementById('ra31544').innerHTML='Rate VBC Multi-Downloader'" title="Terrible - 1 star" class="onestar" onclick="sndRating('31544','1');return false">1</a></li> <li><a href="javascript:void(0)" onmouseover="document.getElementById('ra31544').innerHTML='Fair - 2 ★'" onmouseout="document.getElementById('ra31544').innerHTML='Rate VBC Multi-Downloader'" title="Fair - 2 stars" class="twostars" onclick="sndRating('31544','2');return false">2</a></li> <li><a href="javascript:void(0)" onmouseover="document.getElementById('ra31544').innerHTML='OK - 3 ★'" onmouseout="document.getElementById('ra31544').innerHTML='Rate VBC Multi-Downloader'" title="OK - 3 stars" class="threestars" onclick="sndRating('31544','3');return false">3</a></li> <li><a href="javascript:void(0)" onmouseover="document.getElementById('ra31544').innerHTML='Good - 4 ★'" onmouseout="document.getElementById('ra31544').innerHTML='Rate VBC Multi-Downloader'" title="Good - 4 stars" class="fourstars" onclick="sndRating('31544','4');return false">4</a></li> <li><a href="javascript:void(0)" onmouseover="document.getElementById('ra31544').innerHTML='Excellent - 5 ★'" onmouseout="document.getElementById('ra31544').innerHTML='Rate VBC Multi-Downloader'" title="Excellent - 5 stars" class="fivestars" onclick="sndRating('31544','5');return false">5</a></li> </ul> <span style="font-size:0.8rem;color:#8aadcf"><img src="/images/stars/5.0.gif" height="12" width="57"> (4(4 Vote))</span> </div> <!-- ====== CODE SECTION ====== --> <h2 style="margin-top:20px"><i class="fa fa-download" style="color:#4a90e2"></i> Download VBC Multi-Downloader</h2> <div class="vbc-actions"> <a href="/download/31544-567278979.zip"> <i class="fa fa-file-zipper"></i> Download VBC Multi-Downloader(32 KB) </a> </div> <!-- ====== COMMENTS SECTION ====== --> <div style="margin-top:28px;border-top:1px solid #dce6f0;padding-top:20px"> <a name="comments"></a> <h2><i class="fa fa-comments" style="color:#4a90e2;margin-right:6px"></i>VBC Multi-Downloader Comments</h2> <p style="color:#5c7a99;font-size:0.9rem"> No comments yet — be the first to post one! </p> <script type="text/javascript" src="/js/ajax.js"></script> <div id="commentsd"></div> <script>ajaxpagefetcher.load("commentsd", "/comment/31544.html", true)</script> <h3 style="margin-top:20px">Post a Comment</h3> <form method="post" action="/comments/post/"> <input type="hidden" name="reply" value="0"> <input type="hidden" name="action" value="post"> <input type="hidden" name="forum" value="31544"> <div style="margin-bottom:10px"> <label style="display:block;font-size:0.85rem;font-weight:600;margin-bottom:4px;color:#4a6a8a">Subject</label> <input type="text" name="title" value="" maxlength="50" required="required" style="width:100%;max-width:460px"> </div> <div style="margin-bottom:10px"> <label style="display:block;font-size:0.85rem;font-weight:600;margin-bottom:4px;color:#4a6a8a">Message</label> <textarea maxlength="1000" onkeyup="CountIt(this.value)" name="text" rows="5" required="required" style="width:100%;max-width:460px;resize:vertical"></textarea> <div style="font-size:0.78rem;color:#8aadcf;margin-top:2px"><span id="numchars">0</span>/1000 characters</div> </div> <button name="submit" type="submit" class="dg-button dg-theme"> <i class="fa fa-paper-plane fa-fw"></i> Post Comment </button>   <button name="reset" type="reset" class="dg-button" style="background:#e8eef8;color:#4a6a8a;border-radius:5px"> <i class="fa fa-xmark fa-fw"></i> Clear </button> </form> <script> function CountIt(str) { document.getElementById("numchars").innerHTML = str.length; } </script> </div> </div><!-- end middle card --> </div><!-- end middle column --> <!-- ===== RIGHT COLUMN ===== --> <div class="dg-col m2" style="padding-left:12px"> <!-- Browse by Category --> <div class="dg-card dg-round" style="margin-bottom:12px"> <button class="dg-button dg-block dg-theme-l1 dg-left-align" style="cursor:default;border-radius:6px 6px 0 0"> <i class="fa fa-folder fa-fw" style="margin-right:6px"></i>Categories </button> <div style="padding:10px 14px"> <a href="/active-server-pages/">Active Server Pages</a> <a href="/coding-standards/">Coding Standards</a> <a href="/complete-applications/">Complete Applications</a> <a href="/custom-controls-forms-menus/">Custom Controls</a> <a href="/data-structures/">Data Structures</a> <a href="/databases-data-access-dao-ado/">Databases / ADO</a> <a href="/dde/">DDE</a> <a href="/debugging-and-error-handling/">Debugging & Errors</a> <a href="/directx/">DirectX</a> <a href="/encryption/">Encryption</a> <a href="/files-file-controls-input-output/">Files / I/O</a> <a href="/games/">Games</a> <a href="/graphics/">Graphics</a> <a href="/internet-html/">Internet / HTML</a> <a href="/jokes-humor/">Jokes / Humor</a> <a href="/libraries/">Libraries</a> <a href="/math-dates/">Math / Dates</a> <a href="/microsoft-office-apps-vba/">Office / VBA</a> <a href="/miscellaneous/">Miscellaneous</a> <a href="/object-oriented-programming-oop/">OOP</a> <a href="/ole-com-dcom-active-x/">OLE / COM / ActiveX</a> <a href="/registry/">Registry</a> <a href="/sound-mp3/">Sound / MP3</a> <a href="/string-manipulation/">String Manipulation</a> <a href="/vb-function-enhancement/">VB Enhancements</a> <a href="/windows-api-call-explanation/">Windows API</a> <a href="/windows-ce/">Windows CE</a> <a href="/windows-system-services/">System Services</a> </div> </div> <!-- Browse by Difficulty --> <div class="dg-card dg-round" style="margin-bottom:12px"> <button class="dg-button dg-block dg-theme-l1 dg-left-align" style="cursor:default;border-radius:6px 6px 0 0"> <i class="fa fa-signal fa-fw" style="margin-right:6px"></i>Difficulty </button> <div style="padding:10px 14px"> <a href="/beginner/"><i class="fa fa-circle-notch fa-fw" style="color:#4a90e2;font-size:0.7em;margin-right:4px"></i>Beginner</a> <a href="/intermediate/"><i class="fa fa-circle-notch fa-fw" style="color:#e2a84a;font-size:0.7em;margin-right:4px"></i>Intermediate</a> <a href="/advanced/"><i class="fa fa-circle-notch fa-fw" style="color:#e24a4a;font-size:0.7em;margin-right:4px"></i>Advanced</a> <a href="/unknown/"><i class="fa fa-circle-question fa-fw" style="color:#8aadcf;font-size:0.7em;margin-right:4px"></i>Unknown</a> </div> </div> </div><!-- end right column --> </div><!-- end grid row --> </div><!-- end page container --> <br/> <!-- ===== FOOTER ===== --> <footer class="dg-container dg-theme-d3 dg-padding-16"> <div align="center"> <p style="margin:0"> <a href="#top" title="Back to top">^ Top</a>  |  <a href="/cookies/" title="Cookie Policy">Cookies</a>  |  <a href="/disclaimer/" title="Disclaimer">Disclaimer</a>  |  <a href="/privacy/" title="Privacy Policy">Privacy</a>  |  <a href="/contact/" title="Contact">Contact</a> </p> </div> </footer> <footer class="dg-container dg-theme-d5" style="padding:10px 0"> <div align="center"> <p style="margin:0 0 4px"> <a href="//dosgamezone.com" title="Play Retro Games">Play Retro Games</a>   |   <a href="//bigfontsite.com" title="Free Fonts">Free Fonts</a> </p> <p style="margin:0"> © 2026 MMXXVI vbcoders.com — Rendered in 0.07s </p> </div> </footer> <script src="/js/funcs.js"></script> <script src="/js/jqfuncs.js"></script> </body> <script src="/count/count.js"></script> <script>logstats(7,0,"/count/");</script> <noscript><img src="/count/?id=7&referrer=https://vbcoders.com/code/vbc-multi-downloader_31544.html&LocationURL=https://vbcoders.com/code/vbc-multi-downloader-31544.html&js=0" height="0" width="0"></noscript> </html> <script data-cfasync="false" src="/cdn-cgi/scripts/5c5dd728/cloudflare-static/email-decode.min.js" defer></script>