The Open Source Swiss Army Knife
|
|||||
| | |||||
| sub-categories and articles | ||||||||||
 bk_vbscript |
add | |||||||||
| collection |
add | |||||||||
| excel_saveas |
add | |||||||||
| --->create new sub-category | ||||||||||
 array.htm | ||||||||||
| add
| ||||||||||
| controls.htm | ||||||||||
| add
| ||||||||||
| datefunction.txt | ||||||||||
| add
Function JXIsoDate(dteDate) 'Version 1.0 If IsDate(dteDate) = True Then DIM dteDay, dteMonth, dteYear | ||||||||||
| empty.txt | ||||||||||
| add
1 If IsNull(Me.txtSearchField) Then MsgBox ("please enter a name to search for ...... | ||||||||||
| foreach.txt | ||||||||||
| array walking with foreach
'Add contacts to variable for BCC field For Each varItem In lst.ItemsSelected 'Check for email address | ||||||||||
| functions.txt | ||||||||||
add
subroutines"Once you have created a procedure, you can use it in any form, report, or query. To use it ... just call it with args in parens" | ||||||||||
| isnotnull.txt | ||||||||||
| add
1. isnull on a recordset values Private Sub xxx(id_in As Integer) If Not IsNull(id_in) Then Dim rst As ADODB.Recordset | ||||||||||
| links.html | ||||||||||
add
| ||||||||||