What's in the eBook?
- Full list of reasons for poor performance
- Ultimate measures to speed things up
- Primary web monitoring types
- KPIs you should be monitoring in order to increase your ROI
Option Compare Database Public Function InitApplication() Dim strTokens() As String Dim strToken() As String strCommand = Command() strTokens = Split(strCommand, "&") For i = 0 To UBound(strTokens) strToken = Split(strTokens(i), "=") If strToken(0) = "Report" Then strReport = strToken(1) If strToken(0) = "UserName" Then strUserName = strToken(1) If strToken(0) = "Password" Then strPassword = strToken(1) Next i If strUserName <> "" And strPassword <> "" Then 'bypass login dialog; just validate login If Not IsValidLogin(strUserName, strPassword) Then DoCmd.Quit Else DoCmd.OpenForm "Logon" If strReport <> "" Then DoCmd.OpenReport strReport
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.