‘————————————————————————‘ This enum is used by both InstrWordEx and ReplaceWordEx” It uses a binary value to determine what separator characters are allowed’ bit 0 = allow spaces’ bit 1 =
Private Type OSVERSIONINFO dwOSVersionInfoSize As Long dwMajorVersion As Long dwMinorVersion As Long dwBuildNumber As Long dwPlatformId As Long szCSDVersion As String * 128End TypePrivate Declare Function GetVersionEx Lib “kernel32” Alias
Option Explicit’————————————————————————‘ This enum is used by both InstrWordEx and ReplaceWordEx” It uses a binary value to determine what separator characters are allowed’ bit 0 = allow spaces’ bit 1
Private Declare Function OemKeyScan Lib “user32” (ByVal wOemChar As Integer) As _ LongPrivate Declare Function CharToOem Lib “user32” Alias “CharToOemA” (ByVal _ lpszSrc As String, ByVal lpszDst As String) As
‘ —————————————-‘ The Rotator class module” A class for printing rotated text to a ‘ Form, PictureBox or the Printer” Author: Timm Dickel ([email protected])” —————————————-‘ Usage:’ Dim rotTest As New
Private Type POINTAPI x As Long Y As LongEnd TypePrivate Declare Function SetPixel& Lib “gdi32” (ByVal hDC As Long, _ ByVal x As Long, ByVal Y As Long, ByVal crColor
‘ return a file path not longer than the number of character’ specified in the 2nd argument” If necessary, it replaces directory names with ellipsises” Author: Fred Block’ CuzWare Systems’
You should prefer to use the MapPath() method of the Server object instead of hard coding the complete literal paths in ASP applications. The MapPath() method allows you to physically