VBC Multi-Downloader

by Troy Williams (2 Submissions)
Category: Internet/HTML
Compatability: Visual Basic 3.0
Difficulty: Intermediate
Date Added: Wed 3^rd February 2021
Rating: (4 Votes)

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><b> Side Effects</b><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.<br/> <div id="dv31544"> <b><span id="ra31544" class="cgr">Rate VBC Multi-Downloader</span></b> <ul class="srating"> <li><a href="javascript:void(0)" onmouseover="document.getElementById('ra31544').innerHTML='Terrible - 1 star'" 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 stars'" 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 stars'" 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 stars'" 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 stars'" 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> </div> <h1>Download VBC Multi-Downloader</h1> <p><img src="data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAm0lEQVQ4T+2S0RXCIAxFLxNZR3AEJ9AROooj1AkcwRHEiexJD+kJNKb4L1+B5F3CC4nvKwOHkpb46JWmAPBpcm7tHwDWgwF4BabalExEJlMBZD8Blx3IHbhqjTeFCFKJvQ4U7EE24gjQPscVK8B+We1Azk7ArRyMwBMQo+3K4kH7ZS3kXDYPR7ykIkDXRH8FaP2qk8DzoOt24D0DKy0erYKwOKEAAAAASUVORK5CYII=" alt="" /> <a href="/download/31544-50873496.zip">Download VBC Multi-Downloader</a> (32 KB)<br/><script type="text/javascript" src="https://uprimp.com/bnr.php?section=General&pub=741334&format=468x60&ga=g"></script> <noscript><a href="https://yllix.com/publishers/741334" target="_blank"><img src="//ylx-aff.advertica-cdn.com/pub/468x60.png" style="border:none;margin:0;padding:0;vertical-align:baseline;" alt="ylliX - Online Advertising Network" /></a></noscript></p> </div><div class="dg-container dg-card dg-white dg-round dg-margin"> <a name="comments"></a> <h1>VBC Multi-Downloader Comments</h1> <p>No comments have been posted about VBC Multi-Downloader. Why not be the first to post a comment about VBC Multi-Downloader. <script type="text/javascript" src="/js/ajax.js"></script> <div id="commentsd"></div> <script>ajaxpagefetcher.load("commentsd", "/comment/31544.html", true)</script> <h1>Post your comment</h1> <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"> <p>Subject: <input type="text" name="title" value="" maxlength="50" required="required" style="width:100%"><br/> Message: <textarea maxlength="1000" onkeyup="CountIt(this.value)" name="text" cols="27" rows="5" required="required" style="width:100%"></textarea><br/> <span id="numchars">0/1000</span> characters<br/><br/><button name="submit" id="submit" type="submit" class="dg-button dg-theme"><i class="fa fa-pencil"></i> Post Comment</button> <button name="reset" id="reset" type="reset" class="dg-button dg-theme"><i class="fa fa-times"></i> Clear</button></p> <script> function CountIt(str) { var lng = str.length; document.getElementById("numchars").innerHTML = lng + '/1000'; } </script> </div> </div> <div class="dg-col m2"> <br /> <button class="dg-button dg-block dg-theme-l1 dg-left-align"><i class="fa fa-code fa-fw dg-margin-right"></i> Browse VB Code </button><div class="dg-card dg-round dg-white dg-padding-16 dg-center"> <a href="/active-server-pages/">Active Server Pages</a><br/> <a href="/coding-standards/">Coding Standards</a><br/> <a href="/complete-applications/">Complete Applications</a><br/> <a href="/custom-controls-forms-menus/">Custom Controls/Forms/Menus</a><br/> <a href="/data-structures/">Data Structures</a><br/> <a href="/databases-data-access-dao-ado/">Databases/Data Access/DAO/ADO</a><br/> <a href="/dde/">DDE</a><br/> <a href="/debugging-and-error-handling/">Debugging and Error Handling</a><br/> <a href="/directx/">DirectX</a><br/> <a href="/encryption/">Encryption</a><br/> <a href="/files-file-controls-input-output/">Files/File Controls/Input/Output</a><br/> <a href="/games/">Games</a><br/> <a href="/graphics/">Graphics</a><br/> <a href="/internet-html/">Internet/HTML</a><br/> <a href="/jokes-humor/">Jokes/Humor</a><br/> <a href="/libraries/">Libraries</a><br/> <a href="/math-dates/">Math/Dates</a><br/> <a href="/microsoft-office-apps-vba/">Microsoft Office Apps/VBA</a><br/> <a href="/miscellaneous/">Miscellaneous</a><br/> <a href="/object-oriented-programming-oop/">Object Oriented Programming (OOP)</a><br/> <a href="/ole-com-dcom-active-x/">OLE/COM/DCOM/Active-X</a><br/> <a href="/registry/">Registry</a><br/> <a href="/sound-mp3/">Sound/MP3</a><br/> <a href="/string-manipulation/">String Manipulation</a><br/> <a href="/vb-function-enhancement/">VB function enhancement</a><br/> <a href="/windows-api-call-explanation/">Windows API Call/Explanation</a><br/> <a href="/windows-ce/">Windows CE</a><br/> <a href="/windows-system-services/">Windows System Services</a><br/></p> <h1>Difficulty</h1><p> <a href="/beginner/">Beginner</a><br/> <a href="/intermediate/">Intermediate</a><br/> <a href="/advanced/">Advanced</a><br/> <a href="/unknown/">Unknown Difficulty</a><br/> </div> <br/> <button class="dg-button dg-block dg-theme-l1 dg-left-align"><i class="fa fa-link fa-fw dg-margin-right"></i> Sponsor </button> <div class="dg-card dg-round dg-white dg-padding-16 dg-center"> <p><script async src="https://pagead2.googlesyndication.com/pagead/js/adsbygoogle.js?client=ca-pub-9601603498871760" crossorigin="anonymous"></script>  <ins class="adsbygoogle" style="display:block" data-ad-client="ca-pub-9601603498871760" data-ad-slot="8216738694" data-ad-format="auto" data-full-width-responsive="true"></ins> <script> (adsbygoogle = window.adsbygoogle || []).push({}); </script></p> </div> <br/>  </div></div> </div><br/> <footer class="dg-container dg-theme-d3 dg-padding-16"><div align="center"><p><a href="#top" title="Return to top of page">^ Top</a> | <a href="/cookies/" title="vbcoders.com Cookie Policy">Cookies</a> | <a href="/disclaimer/" title="vbcoders.com Disclaimer">Disclaimer</a> | <a href="/privacy/" title="vbcoders.com Privacy Policy">Privacy Policy</a> | <a href="/contact/" title="Contact dosgamer.com">Contact</a></p></div></footer> <footer class="dg-container dg-theme-d5"><div align="center"><p><a href="//dosgamer.com" alt="Play Retro Games" title="Play Retro Games">Play Retro Games</a> | <a href="//bigfontsite.com" alt="Download Free Fonts" title="Download Free Fonts">Free Fonts</a><br/><br/>Proudly powered by 1s and 0s</p><p>© 2024 MMXXIV vbcoders.com. Made in Ukraine! Rendered in: 0.05 Seconds. </p></div></footer> <script src="/js/funcs.js"></script><script src="/js/jqfuncs.js"></script>  <script src="//x.vbcoders.com/count.js"></script> <script>logstats(7,0,"//x.vbcoders.com/");</script> <noscript><img src="//x.vbcoders.com/?id=7&referrer=&LocationURL=https://vbcoders.com/code/vbc-multi-downloader-31544.html&js=0" height="0" width="0"></noscript>  <script async src="//static.getclicky.com/101300399.js"></script> <noscript><p><img alt="Clicky" width="1" height="1" src="//in.getclicky.com/101300399ns.gif" /></p></noscript> </body> </html><script data-cfasync="false" src="/cdn-cgi/scripts/5c5dd728/cloudflare-static/email-decode.min.js"></script>