From: <cod...@go...> - 2008-12-03 15:36:31
|
Author: M0...@gm... Date: Wed Dec 3 07:35:20 2008 New Revision: 347 Modified: branches/iVL/FrmImportAccts.class Log: Debugging user import Modified: branches/iVL/FrmImportAccts.class ============================================================================== --- branches/iVL/FrmImportAccts.class (original) +++ branches/iVL/FrmImportAccts.class Wed Dec 3 07:35:20 2008 @@ -65,6 +65,7 @@ PUBLIC SUB btImportAccnt_Click() +DIM SaCC AS String = Trim(ME.cbAccntList.Text) IF Len(Trim(ME.cbAccntList.Text)) = 0 THEN Message(("Please select an account name from the dropdown list.")) RETURN @@ -81,10 +82,10 @@ 'IF ME.pbLogin THEN ME.pbLogin.Delete 'pbLogin = NEW PictureBox(ME) 'me.pbLogin.Move( - ME.cbAccntList.Remove(ME.cbAccntList.Find(Trim(ME.cbAccntList.Text))) + ME.cbAccntList.Remove(ME.cbAccntList.Find(SaCC))) ME.cbAccntList.Sorted = TRUE 'RETURN - IF ME.CREATE_IMPORTED_ACCOUNT(Trim(ME.cbAccntList.Text)) > 0 THEN + IF ME.CREATE_IMPORTED_ACCOUNT(SaCC) > 0 THEN Message.Error(("User Unable to restore user account.")) RETURN ELSE |