Just came across this error: “The system cannot log you on now because the domain domainname is not available.” and found this in the Microsoft site –> Knowledge Base. I also use this to address the “Please wait while the Domain list is updated” message I kept getting when I try to switch the domain in the ‘Log in to’ field in the Sign in screen. I also encounter a “The system could not log you in..the Netlogon service is not running”. They have a Hot fix for this problem, but did not feel it nesesary to install before I tried the following.

  • I installed all the latest Windows Updates.
  • I logged in locally and enabled the Netlogon service and set it to Automatic.

After the above I re-started and it worked fine.

Machine is:  GX280, XP Pro SP2

Advertisements

I created this small batch file to save my Outlook pst files (I tend to Archive a lot of mail) to a remote file share. When you run it, it grabs the PSTs in your Outlook default folder copies them on to your C: drive then to the share specified. I set it up to create a folder name after the day. For instance, today is 4/17/2009,  so it will create a folder name: 17 This way you will have a back up of your PST for at least 30 days. Enjoy!

::Saves Outlook PST in [YourNetworkDrive] for 30 days
::Change the drive letters to yours (H:)

@echo Saving your Outlook Archive PST file… please wait.
@echo off

:: variables
set drive=H:
set local=C:OutlookPST
set folder=%date:~7,2%
set backupcmd=xcopy /c /d /i /r /y
IF not exist %drive% goto NOHOME
IF not exist “%USERPROFILE%Local SettingsApplication DataMicrosoftOutlook*.pst” goto NOFILE
%backupcmd% “%USERPROFILE%Local SettingsApplication DataMicrosoftOutlook*.pst” %local%
%backupcmd% %local%*.pst %drive%OutlookArchive%folder%

echo msgbox”PST copied successfully” >C:copiedmsg.vbs
call C:copiedmsg.vbs
goto END

:NOHOME
echo msgbox”You are not mapped to (H:) therefore your PST backup cannot continue.” >C:NoHome.vbs
Call C:NoHome.vbs
goto END

:NOFILE
echo msgbox”There are no PST files to be saved. It was either never created, deleted or moved. NOTE: For this utility program to work your PST file needs to be in your default Outlook data folder.” >C:PSTError.vbs
Call C:PSTError.vbs

:END
set drive=
set folder=
set backupcmd=

exit

I use this to validate data I had entered in a number field in a small tracking DB I recently worked on. It came in very handy.  Make sure you replace the table and DB name with the names you are using for your DB and copy the rest as it is in the module:

Private Sub AccNumberBox_BeforeUpdate(Cancel As Integer)
On Error GoTo ACC_Tbl_Err
Dim CurDB As Database, ACC_Tbl As Recordset, SQLStmt As String

Set CurDB = CurrentDb
SQLStmt = “Select AccNumber FROM ACC_Tbl WHERE AccNumber = “”” & Me!AccNumber & “”””

Set ACC_Tbl = CurDB.OpenRecordset(SQLStmt)

If Not ACC_Tbl.EOF Then
MsgBox “This Batch Number has been entered. Please enter unique value.”, vbCritical, “Duplicate Entry”
Cancel = True
End If
ACC_Tbl.Close
Set ACC_Tbl = Nothing
Exit Sub

ACC_Tbl_Err:
MsgBox “Error is ” & Err.Description & ” Entering new Batch Number”, vbCritical, “”
Exit Sub
End Sub