about 1 year ago - No comments
just found nice code in internet, and i use it in one of my project. works great! it will return the last user that open the file Function LastUser(strPath As String) As String ‘// Code by Helen from http://www.xtremevbtalk.com/index.php?s= ‘// This routine gets the Username of the File In Use ‘// Credit goes to Helen
about 2 years ago - No comments
Enable the edit toolbar, hignlight lines to comment, and click the “comment block” icon on the edit toolbar (middle of toolbar). This will add the ‘ to whatever you highlight.
about 2 years ago - No comments
Key Code BACKSPACE {BACKSPACE}, {BS}, or {BKSP} BREAK {BREAK} CAPS LOCK {CAPSLOCK} DEL or DELETE {DELETE} or {DEL} DOWN ARROW {DOWN} END {END} ENTER {ENTER}or ~ ESC {ESC} HELP {HELP} HOME {HOME} INS or INSERT {INSERT} or {INS} LEFT ARROW {LEFT} NUM LOCK {NUMLOCK} PAGE DOWN {PGDN} PAGE UP {PGUP} PRINT SCREEN {PRTSC} (reserved for
about 2 years ago - No comments
Problem: Check if table is exist Solution: Option Compare Database Public Function TableExists(strTable As String) As Boolean Dim strName As String On Error Resume Next ‘If table exists already then strName will be > “” strName = CurrentDb.TableDefs(strTable).name TableExists = Not (strName = “”) End Function