Veeam® is happy to provide a FREE NFR server license to certified engineers, trainers, and bloggers. It allows for the non‑production use of Veeam Agent for Microsoft Windows. This license is valid for five workstations and two servers.
Set objAccess = CreateObject("Access.Application") on error resume next dim strCurrentProjectName strCurrentProjectName = objaccess.currentproject.name If err.Number=0 then 	if objaccess.currentproject.name <> "WBR.mdb" then 		objAccess.OpenCurrentDatabase strNameOfFolderVBScriptIsIn & "WBR.mdb" 	end if Else 	objAccess.OpenCurrentDatabase strNameOfFolderVBScriptIsIn & "WBR.mdb" End if
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
Join the community of 500,000 technology professionals and ask your questions.