This tip shows how to simulate the look of an Oultlook address book records selection. Open a New VB Project and add a New Form with 1 Text Box and

The purpose of the JDBC API is to make it easy to use other drivers.For example, the driver can be passed into an application using a command line system property.

This function returns the next alpha range. When you pass

To compact MDB databases using ADO, just include a reference to the ‘Microsoft Jet and Replication Objects 2.6 Library’ (distributed with the MDAC 2.6 package) in your VB project. The

Subclass PlainDocument, then set the document of the JTextfield to the subclass as shown below: JTextField myJTextfield;myJTextfield.setDocument(new DigitsDocument());class DigitsDocument extends PlainDocument { public void insertString(int offs, String str, AttributeSet a)throws

Opening recordsets as ForwardOnly or ReadOnly makes them move faster between records. In addition, storing fields to variables before begining the loop speeds up field access. Example: * Create a

With Modal forms there is a need to restrict the movement of the mouse to the form until user closes the form. This can be achieved by using the ClipCursor

Most beginners accidentally declare duplicate variables of different data types or of the same data types. The following illustrates this: class Duplicate{ String data; private void fun() { String data=

Uniqueidentifier(GUID) can’t be used in aggregate operations like count(), etc. This problem may be solved by casting uniqueidentifier as varchar. Presuming that guid_column is a uniqueidentifier column: select count(cast(guid_column as

One drawback to presenting data to a browser is that once you have it you can’t manipulate it. With more and more business functions being carried out through the web

‘ Returns a collection with the names of all the image’ files in a directory or a directory tree’ this includes all the image types that can be loaded into

‘ The attributes of a file in a readable format.’ It works also with open files, raises an error if the file doesn’t exist.Function GetAttrDescr(filename As String) As String Dim

Private Const MAX_PATH = 260Private Type SHFILEINFO hIcon As Long iIcon As Long dwAttributes As Long szDisplayName As String * MAX_PATH szTypeName As String * 80End TypePrivate Declare Function SHGetFileInfo

Private Const MAX_PATH = 260Private Type SHFILEINFO hIcon As Long iIcon As Long dwAttributes As Long szDisplayName As String * MAX_PATH szTypeName As String * 80End TypePrivate Declare Function SHGetFileInfo

‘ Returns a collection with the names of all the executable’ files in a directory or a directory tree’ this includes all “exe”, “bat”, “com”, “pif” files” NOTE: Uses the

Option ExplicitPrivate Declare Function FindFirstFile Lib “kernel32” Alias “FindFirstFileA” _ (ByVal lpFileName As String, lpFindFileData As WIN32_FIND_DATA) As LongPrivate Declare Function FindNextFile Lib “kernel32” Alias “FindNextFileA” _ (ByVal hFindFile As

At times you may need to create a GUID from ASP, for example when assigning unique IDs to users that are visiting your site for the first time. While you

Private Enum CommandOpConstants cocStart = 1 cocStop cocPause cocContinueEnd Enum’ Start, Stop, Pause or Continue a service using Active Directory’ Returns True if successful” NOTE: requires a reference to the

Const MAX_MODULE_NAmeInfo = 255Const MAX_PATH = 260Const TH32CS_SNAPMODULE = &H8Private Type MODULEENTRY32 dwSize As Long th32ModuleID As Long th32ProcessID As Long GlblcntUsage As Long ProccntUsage As Long modBaseAddr As Long

Const MAX_PATH As Long = 260Private Type PROCESSENTRY32 dwSize As Long cntUsage As Long th32ProcessID As Long th32DefaultHeapID As Long th32ModuleID As Long cntThreads As Long th32ParentProcessID As Long pcPriClassBase

‘ Get the names of all the installed Windows GetServiceNames using Active ‘ Directory” if you pass True, the display names are returned’ otherwise the internal names are returned’ (internal

‘ Copy a file’s contents into a BLOB field.Sub FileToBlob(fld As ADODB.Field, filename As String, _ Optional ChunkSize As Long = 8192) Dim fnum As Integer, bytesLeft As Long, bytes

‘ return the list of US States and their abbreviations” returns a bi-dimensional array organized in this way’ res(n, 0) holds the state’s name’ res(n, 1) holds the state’s abbreviation’

The standard way to create a UDL file is to right-click in the directory where you want to create it and select the New-Microsoft Data Link menu command. Unfortunately, on

‘ Copy the field structure of a Recordset to a new Recordset.” The original code has been improved to account for Numeric and Decimal’ fields, that also require the setting