This code is the complete source code to a Keno game I modeled after a video keno machine in Las Vegas. I submitted this game to zdnets website about 6 months ago as freeware. The code is a bit sloppy it was one of my first attempts at something that worked. I thought some of the algorythms and… Read More »
At some point, you may find it useful to manipulate the location of the mouse cursor. Perhaps you aredesigning an interactive tutorial, a walkthrough, or maybe you plan on controlling another applicationthrough mouse events. Regardless, you will quickly find a number of hurdles to overcome and it is thegoal of this example to help you over, under, or… Read More »
Send’s E-mail without WINSOCK.OCX! This is a complete E-Mail programm with the possibility to send Attachements (Base64). The Base64-Encoding routine is very fast and I tested it with different E-Mail Servers! I also include a comfortabel routine to select the Attachement! Original Author: Sebastian Inputs If you are able to use a normal E-Mail Application, I think you should… Read More »
Check if that directory exists before running the risk of an error and/or data loss. One of the few that really works. No API, no function calls. Existence check and logic included. Incredibly simple. Original Author: unknown Side Effects None known Code ‘By Jim Sivage”ISO Global’http://www.isoglobal.com”’Make f$ equal to folder you’re testing.’f$ = “C:WINDOWS”dirFolder = Dir(f$, vbDirectory)If dirFolder <>… Read More »
This is a very simple encrypt/unenceypt and when i say simple i mean simple. works for any string containg the normal chr’s ie. (1-9,a-z). Works good tho for simple encrypt. Original Author: DoWnLoHo Code Function Eyncrypt(sData As String) As StringDim sTemp as String, sTemp1 as StringFor iI% = 1 To Len(sData$) sTemp$ = Mid$(sData$, iI%, 1) lT = Asc(sTemp$) * 2 sTemp1$… Read More »
This is AWSOME code…. this will let you ping multiple addresses and single addresess as many times as you want… it will also record the people you are pinging. It still needs some more work for extra functionality!!!! Original Author: Keir Gordon Attachments File Uploaded Size CODE_UPLOAD1132.zip 9/3/2020 3:45:00 PM 119216
The code demonstrates 3 common combobox tasks:1.) Filling a cbo with a recordset2.) Setting the cbo Text to a recordset field using a numeric rst field3.) Setting the cbo Text to a recordset field using a non-numeric rst field Original Author: Mark Freni Inputs The name of a combobox control, and the recordset field names Assumptions The user needs… Read More »
A Few function’s For You To Play With.. Trap Mouse In A Form, Random Object/Form Color’s, A Wacked Screen Closing Special Effect, And Download File’s Via The Internet.. Original Author: Lance Lang Assumptions These Are Just Basic Function’s For All That Don’t Know The Basic’s.. Nothing Special… API Declarations ‘ Mouse Trap Declaration’s, Toss These Into A ModuleOption ExplicitType… Read More »
This program rotates a 3d cube to the 4 directions, using a translation code,and also has a zoom in/out option (control it with: W, A, D, X, 1 & 2) Original Author: Omer Kornitz Assumptions You have to create a Timer and left it named Timer1. Code Dim ww As IntegerDim Ixy_angle, Iz_angle, dYYshift, dXXshift, csx, csy As IntegerDim… Read More »
A function that converts rich text to standard HTML with the use of calling one simple function. Example form included.NOTE: The Microsoft RichTextBox Control is required. Original Author: Joseph Huntley Attachments File Uploaded Size CODE_UPLOAD1128.zip 9/3/2020 3:45:00 PM 4171