Snapshot from webcam

692 byte By westconn1 at 2007-12-5 11:58:35
i started this project in interest of a thread for taking ID photosthe code, using AMCAP, has been put together from many sources including research in msdn, and several other forums and is not original by me, i had trouble to make my webcam work, or select which cam to use if more than 1 was at...

Toolbar/ImageList

529 byte By Neato at 2007-12-5 11:55:38
I asked about this on the forums awhile back, and was given replies that these styles are the only way possible. Since I know alot of beginners and some intermediate visual programmers have questions about these two things, I decided to write a brief but in-depth example with three ways to imple...

VB6 - 31 Bit Encryption - To the Next Level

1783 byte By CVMichael at 2007-12-5 11:50:11
This is an improved version of my VB - 31 Bit Encryption function ( http://www.vbforums.com/showthread.php?t=231798)I had to put the code in a Class because there is some Initializing to do.This version is much better than the old one. The Seed value is calculated better, it is calculated from th...

VB6 - Count pages in a multipage .tif file or .pdf (no dependencies).

766 byte By Comintern at 2007-12-5 11:34:45
Just a quick and dirty routine I wrote for my current project instead of paying for someone else's .dll. This is so easy to do it should be a crime to charge for it, so I thought I would post it here. Technically, there are some changes that should be made (but in practice I haven't...

Expose Spybot Search & Destroy Hidden TeaCup

317 byte By Fazi at 2007-12-5 10:56:42
Hai,i am using SpyBot S&D for last 3 Years. Today i found a hidden window that has a TeaCup image with Back Ground Transprent which i have never seen them using it. If you are running Spybot S&D and you have enabled the TeaTimer Tool, you can see that window using the attached code.:D...

[VB6] - Alarm Clock

891 byte By Jaquio at 2007-12-5 10:53:40
Here is an Alarm Clock I made awhile back. My alarm clock wasn't loud enough to wake me up for work so I decided to code my own and blast it through the speakers in the morning, lol.Everything on it can have its own color the alarm clock looks something like this,----|15:32:00|----(Note it...

[VB6] Sim-Chat - Advance Avatar Instant Messenger

1887 byte By psychotomus at 2007-12-5 10:48:49
What is Sim-Chat?Sim-Chat will be a new messenger that has been in development since 7/24/07 in Visual Basic 6 and will take the internet by suprise. Not only will it have all the basics of a normal instant messenger, but it will also have features such as Avatar Chats, Battle Chats, using Direc...

CPU Usage In Tray

209 byte By Edgemeal at 2007-12-5 10:44:58
Displays single or dual core CPU usage in the Windows system tray area.<br/>Made for WinXP. <br/>Users tell me it works in Vista 32/64 too, but you may have to launch it with "Run as Administrator".

Convert Ordinal Date to Georgian Date Format

1167 byte By ChrisR873 at 2007-12-5 10:31:00
Note: I'm posting this as finished working code. I was looking for how to do this throughout the forum and web but had difficulties finding what I needed and all the code that was posted here was complicated or more difficult then needed. Moderator please move to correct section if improper...

copying vbcode from posts

561 byte By westconn1 at 2007-12-5 10:21:14
if you get annoyed at the line numbering in the vbcode boxes when copying to paste elsewhereSub Main()Dim myarr() As Stringmyarr = Split(Clipboard.GetText, vbNewLine)For i = UBound(myarr) To 0 Step -1 If IsNumeric(myarr(i)) Then myarr(i) = ""NextClipboard.ClearClipboard.SetText Replace(Join(m...

VB - Give Your App An XP Theme (With Embedded Manifest File)

2407 byte By 03myersd at 2007-12-5 10:19:31
I have seen a lot of threads about asking how to give an app an XP theme. There have been almost as many asking how to embed the manifest file so that they don't have to send two files. There is even a similar one here in the code bank. But this one does not require you to install any other...

Basic Animation using ZOrder

6061 byte By metalmidget at 2007-12-5 10:15:46
This is a basic tutorial to show you one method of simple animation using pictureboxes and ZOrder. This tutorial was written for VB6, but don't stop reading if you use something else, as it could probably be adapted to VB.Net or even other languages without too much difficulty. Along with t...

Create Sql server DataBase by vb6

937 byte By gehad at 2007-12-5 10:15:13
this my first thread this Simple code use for create sql server database , you can enter any name to the textbox in this code ....the controls Textbox 1 , Button referencesMicrosoft Activx Data object 2.0' in general section Dim cnn As ADODB.ConnectionDim rst As ADODB.Recordsetin comman...

Move System Tray, Start Button etc.

223 byte By Fazi at 2007-12-5 10:12:09
Move System Tray, Start Button etc along the Taskbar using a Timer.<br/>Tested with Windows XP.<br/>Note- little update (removing an unnecessary if condition and few comments have been added) has been made to the code.

AlphaImage Control - PNG Compatible [VB6]

1302 byte By LaVolpe at 2007-12-5 10:01:31
A usercontrol, imitating VB's image control, that allows you to load PNGs and other image formats just by selecting the image. Several properties allow fine tuning the image, to include gray scaling, rotation, mirroring and more. Compatible with Win95 and up. It is highly recommended for...

How to: Create a setup.exe package that will only download VB runtimes if necces

9859 byte By VaxoP at 2007-12-5 9:59:04
Dont you hate having to distribute a 1.5mb setup exe because of the minority of people that do not have the visual basic 6 runtimes installed? I know for me, personally, it is extremely frustrating to know that my exe is 60kb, but my setup.exe is 1.5mb because it includes the runtimes.Finally,...

VB6 - Fade picture

248 byte By CVMichael at 2007-12-5 9:51:21
This is a sample application on how to fade a picture to a specified color<br/>I tried to make the code as fast as possible, but I'm not very good with speed optimizations...<br/>It works much faster if you run this program compiled.

VB6 very simple WHOIS app

1985 byte By foxter at 2007-12-5 9:10:55
Just posting it in case if anyone needs it. Please do post replies if you have any suggestions:Option Explicit'drop 2 text boxes, a command button, and a winsock control on your formPrivate sWinsockCommand As StringPrivate sDataIn As StringPrivate sDataBuff As StringPrivate Sub Command1_Cli...

Fast Code Generators for VB6

4664 byte By nepalbinod at 2007-12-5 8:50:27
Hi friends,During my programming hours, I found so many things that consumed a lot of time but it did not include any skills. So, for fast and rapid development, I have created some functions that I use as code generators. They include codes which are basically used on all of the forms and I t...

Encryption & Decryption

1904 byte By Vanasha at 2007-12-5 8:36:47
Hello everyone, I have been lurking over the forums for some time now, not posting. I have decided to make my own contribution. I don't know if anyone else has done this before or whatever, and I don't know how strong it is..Public Function EncryptF(ByVal Password As String, ByVal...

VB6 - Proper sending/receiving data with Winsock (tutorial & code)

967 byte By DigiRev at 2007-12-5 8:26:43
I think this is information every Winsock or client/server developer should know. It is something I wish I had figured out soon after I first started. While it has been common knowledge to me for some time now (and for many others), without it, your client/server programs will be very fragile an...

Crystal Reports XI and VB6 Example

225 byte By Mark Gambo at 2007-12-5 8:21:15
In another forum someone asked ( http://vbforums.com/showthread.php?p=2988956#post2988956) if anyone could post an example of displaying a CR by using VB6.<br/>If you have any questions please feel free to post them here.

SendMessage - Set Text to Yahoo Messanger Input Window

148 byte By Fazi at 2007-12-5 8:17:32
Set Text to Yahoo Messanger Input Window (Chat Window) using SendMessage.<br/>Note:- Please Download the updated code from the post #4 Below :)

Division with remainders

1383 byte By Snowfox at 2007-12-5 8:17:03
http://i13.photobucket.com/albums/a262/darkdragon55667/Showing.jpgI made this for my mom to check my sisters math homework :DOption ExplicitDim a As DoubleDim sd As DoubleDim sc As DoublePrivate Function RoundOff(ByVal value As Double, ByVal digits As Integer) As DoubleDim move As Double move...

Capture DOS Application output

1192 byte By AVSL at 2007-12-5 8:12:26
Hello!since i was looking for a function that copy the dos screen into a vb Var and haven't found one, I gatherd some solutions into one file and made a demonstration how to Capture and copy the DOS app screen for future use.the example can locate a window just be it Caption, focus on it an...

Read/Extract & Parse Firefox History

1841 byte By shirazamod at 2007-12-5 8:07:01
I've been looking for a way to get the website history of firefox for a while, but I couldn't find any existing code that did it, so I coded my own.This function will read the Firefox history for all profiles on the computer and returns a string containing all the URLs, separated by vb...

SendMessage - Identify Similar Controls Using its Positions

109 byte By Fazi at 2007-12-5 7:57:48
This project demonstrate, Identifying controls having similar class Names using it's Screen Coordinates.

.:: MSChart Control Help ::.

365 byte By sukhdev.v at 2007-12-5 7:57:00
Hello Everyone, I'm Uploading this Project for the ones who need Help regarding VB's MSCHART CONTROL!!!This Sample Shows :1) How to Show Data from an Access2003 Database on Chart.2) How to Print Data from MSChart Control.3) How to "Save As..." the Chart, as .Bmp file.Hope this will be...

Create SpreadSheet Without Excel

93 byte By birthjay at 2007-12-5 7:55:46
Here is something I found a while back. It creates an xls file without excel. See attached...

MouseLogger

803 byte By TheBigB at 2007-12-5 7:31:05
I made this app some time ago.Never really finished it... Anyway, I have no idea why I actually made it, but I do remember having laughs with repainting things in paint. Try it :DThe app uses GetAsyncKeyState for detection of mouseclick and other api's for mouse-location etc.I tried to add...

VB - 3D Pie Chart

286 byte By Andrew G at 2007-12-5 7:30:40
Code is still buggy as i haven't fully tested it, but if you find any major problems, i'll try get them fixed :)<br/>Screenshot<br/> http://www.vbforums.com/attachment.php?attachmentid=58835&stc=1&d=1186582762<br/>Updates<br/>9/8/07 - Cleaned up code to improve speed

No Foreground Window - Bang Foreground Windws

78 byte By Fazi at 2007-12-5 7:27:45
This program monitors and put down any foreground window other than itself. :D

Shortcut to unistall - Possible

694 byte By VBFnewcomer at 2007-12-5 7:24:18
Hi all,Lately I have seen quiet a few posts asking for how to create a shortcut to uninstall a program in the program group. The replies mostly were NOT POSSIBLE. So I tried tinkering a bit with various settings a PDW gives. I chanced upon (it is not even discover!) a simple way even without get...

[VB6] - Multi-User Chat Example (Winsock)

1046 byte By DigiRev at 2007-12-5 7:22:31
I wrote this last night out of boredom and after reading a lot of posts about people wanting to make a basic multi-user chat room.This is the most stripped-down code I could come up with that does things "correctly". For that reason, some of the code may seem more complex than it needs to be but...

Excel Timer

3777 byte By zaza at 2007-12-5 7:18:47
As has often been worried over on these forums, Excel does not allow you access to the Timer object that we are used to in the normal VB IDE, which can be irksome. To rectify that, here is some sample code for your Excel-based apps which will run a section of code at an interval of your choosing...

VB6 - Save Recordset to CSV format

1087 byte By CVMichael at 2007-12-5 7:09:28
This is a function I made that is quite usefull when you want to save the data in a Recordset directly to a CSV file.Public Function RecordsetToCSV(rsData As ADODB.Recordset, Optional ShowColumnNames As Boolean = True, Optional NULLStr As String = "") As String Dim K As Long, RetStr As String...

Printing to 1/2 size of short bond paper

263 byte By Simply Me at 2007-12-5 7:07:27
I have spent a lot of time looking/searching the net for a code like this that would suit my printing needs but i found nothing.<br/>After a long week of trying and trying i finally came up with my own code. Hope this would help others with similar problem.

RSTimer - Precision Timer 2.1.0.1

1284 byte By CVMichael at 2007-12-5 6:54:36
Latelly I've been working on a project where I needed a precise timer, and I did not have time to write one.So I looked up on the internet, and I found a free one.I am so impressed on the precision on this timer, that I thought to post the link here, and maybe it will benefit you also.This...

[VB6] - Parse HTML - Tutorial

304 byte By DigiRev at 2007-12-5 6:47:36
This is a pretty short tutorial I wrote in my free time about parsing HTML with VB's built-in string manipulating functions.The tutorial is a single .rtf file and should be able to be opened in Wordpad, Microsoft Word, etc.If you have any suggestions/comments, post them here. :)...

[VBA] Regex in Excel

1035 byte By agmorgan at 2007-12-5 6:45:35
This is not supposed to be a tutorial on Regular Expressions, just how to make use of them in Excel using VBA.This is based on the fact that I have a sheet with large strings in column B and I want to extract relevant keys to column C.I have highlighted the salient pieces of code in red.Sub RegE...

VBTools AddIn - Auto indent VB code !

1664 byte By CVMichael at 2007-12-5 6:31:52
This is an Add-In I made that will show as a Toolbar in the VB IDE: http://www.vbforums.com/attachment.php?attachmentid=58306&stc=1&d=1184764611The first button (and most usefull) will auto indent the currently opened code window.For example, you could have code like this: http://www.vbforums.com/...

vb5 - simple & limited encryption/decryption function

8200 byte By drivenbywhat at 2007-12-5 5:59:58
This function will encrypt/decrypt a string up to 30 characters. It will only encrypt uppercase letters A-Z, numbers 0-9 and the following symbols: [ ] * space ' #. The minimum length of the string must be 8 characters. It's very redundant code but it does its intended function and it&...

sending sms

86 byte By Paul M at 2007-12-5 5:50:09
Wrong forum i would suggest private messaging a mod to move this to the correct forum.

[IP Banning] MacroHawks Anti-Abuse System

828 byte By MacroHawk at 2007-12-5 5:49:45
Hello VB Forums Community! This is my first open source vb6 release! It is a Anti-Abuse System or an IP Banner! It uses Winsock and Inet. It connects to a specified web server and reads the text file to find banned IP's. It starts with a form showing your IP. If it is green then it is not b...

[VB6] - Save/Load UDT Arrays Easily

301 byte By DigiRev at 2007-12-5 5:45:50
This is an example of saving a UDT array directly to disk, and then reading it back into the UDT array. It shows how to save/load UDT arrays that aren't fixed in size.This code can be useful to store settings or any other kind of information without having to worry about parsing files....

[VB6] - Compare images the fast way

500 byte By DigiRev at 2007-12-5 5:41:42
This can take 2 (large) pictures and tell you if they're the same or different much quicker than using GetPixel or other methods.This uses the GetDIBits() API function.If anyone has suggestions to make it faster than it naturally is than let me know.To use the code, just add ModImageCompare...

VB6: Sorting algorithms (sort array, sorting arrays)

6924 byte By Ellis Dee at 2007-12-5 4:55:40
Attached to this post is code for a benchmark utility that will let you compare twelve different sorting algorithms ( http://en.wikipedia.org/wiki/Sorting_algorithms) under a variety of conditions. In addition to speed comparisons that clock the core algorithms with no extraneous overhead, there...

VB6 - PictureTabs: A Simple Tab Control

696 byte By culloden at 2007-12-5 4:50:30
PictureTabs is a simple, lightweight, and modern looking alternative to a full tab control. It was created using just the Picture, Label, and Line controls.It consists of 5 control arrays:- picTab(): The tabs- lblTabText(): The captions for each tab.- line1TabTop(): The colored lines showing whi...

[VB6]Simple client/server networking with Winsock

1624 byte By alkatran at 2007-12-5 4:48:32
IntroductionThis project is an activex DLL which takes care of the headache of writing client and server code with winsock. It allows you to simply create a "crgNetworker" object, call "showSetupForm" (which displays a GUI for creating a server or connecting to a server), and continue on your m...

[VB6] Get External IP

694 byte By DigiRev at 2007-12-5 3:50:31
A lot of people seem to ask this question, so I wrote this real quick.One benefit of this over most other external IP grabbers, is it should work on all sites without you having to change the code. Most other IP grabbers are hard-coded to work with specific HTML. If that site goes down or change...