Unique Username Routine

Jun 8, 2006

Hello,
I was wondering if you have one or have seen a routine to generate unique
username from first, middle and last names. Here is my requirement -
by default first initial and last name of a user is their username.
But if the expected or default username is already taken then if the
user have middle initial, then the username for this user would be
first initial, middle initial and lastname. If the user does not have
middle name then the username for the user would be first two letters
of first name and lastname and if that's already taken then first
three letters of first name and last name and so on.

Any help or pointer is greatly appriciated.

View Replies


ADVERTISEMENT

Routine Name

Jun 2, 2006

Is there a set variable or property that can tell you which Sub you are in?

I want to use this to log errors. i.e pass the module and sub routine name to the error handler log file.

The only way I can do this at the moment is to physically hard code the sub routine name into each error handler.

View 2 Replies View Related

Need Help With Export Routine

Nov 17, 2006

Ok I am exporting some data to a plain text file and one of the fields I am outputing can vary in the number of characters and I need they to have the same number of characters all the time.

Ex: 123.00 => 000012300
456789.00 => 045678900

I had heard of a command, but I can't remember what it was...I could do a loop till LEN() = 9 but that would cause undue clock cycles (aka performance hit) on the machine when running through the export routine.

This is a huge export of data.....

Thanks,
Richard

View 4 Replies View Related

Scheduling Access To Open And Run A Routine

Mar 6, 2006

Hi,

I was wondering is it possible to schedule in windows somewhere to open up my syncfrontend.mdb and then run a routine that i have written inside of that mdb.

The routine is a huge database syncronisation task that needs running every hour, it's all there ready to be run but just need a way to get to it and run it automatically on the hour every hour.

Any ideas or help would be greatly appreciated!

Thanks in advance

View 2 Replies View Related

Need Help With Rich's Error Trapping Routine

Apr 9, 2007

Hi guys, I was looking for a way to trap err.number 3314 (when required field is null) before Jet generates its warning. I came across an old post from Rich (below), but I couldn't make it work as yet. In the calling form, under the Form_Error event I wrote the following:

Dim f As Form
Set f = Me
Call fnValidateForm(f)

Could anyone please tell me where my error lays here? I have several forms which have several text and/or combo boxes bound to required fields and I would want to have a generic code, like the one here to trap errors before Jet shows it's Error Message.

Thanks in advance
Regards
Jaime Premy - Belém-Brasil

******************Rich's Function********************
Public Function fnValidateForm(frmA As Form) As Boolean
Dim ctl As Control
Dim Msg, Style, Title, Response, MyString
fnValidateForm = True
For Each ctl In frmA.Controls
'value in the control is required
If InStr(1, ctl.Tag, "Required") > 0 Then
' no value entered or value is null
' or zero for numeric fields
If (IsNull(ctl.Value)) Or (Len(ctl.Value) = 0) Then
ctl.SetFocus
MsgBox "You have not entered all the required fields return to the record and correct this! The record will not be saved if you do not! "
fnValidateForm = False

Exit For
End If

If InStr(1, ctl.Tag, "NumberRequired") > 0 Then
If ctl.Value = 0 Then
ctl.SetFocus
MsgBox "You have not entered all the required fields return to the record and correct this! The record will not be saved if you do not! "
fnValidateForm = False

Exit For
End If
End If
End If

Next
End Function

View 5 Replies View Related

Forms :: Controls Not Repainting After VBA Routine

Jul 23, 2014

Access 2007

I have a subroutine which cycles through all controls on a form, and for controls with applicable tags, either enables or disables the control.

The routine accepts a form as the parameter (frm), and is called from a button on the form itself.

Despite trying frm.repaint in the generic routine, and, me.repaint from the calling form, the controls do not seem to repaint until the mouse moves over them. A command button, for example, will be grey-ed out, despite being enabled, but will un-grey when the mouse goes over it.

View 8 Replies View Related

Modules & VBA :: Passing Variables To A Sub Routine

Jan 13, 2014

I have a public sub routine which requires parameters to be passed to it when I call it from an access form. When I try to enter the code to call the sub I get a compile error. I've also tried calling it from another sub in the same module but get the same compile error - see below.

Code:
Sub EmailData(Datafile As String, To_mail As String, CC_mail As String, Subject_mail As String)
'code to use variables passed in
End Sub

[Code]....

View 4 Replies View Related

Modules & VBA :: Calling Function From Sub Routine

Aug 10, 2013

I have 28 combo boxes on a form, which I want to insert data into the table as they are changed. Each one will pass the same sets of data just with different parameters which come from the form.

Rather than putting the same code to insert on each of the 28 combo boxes I thought it would be easier to create a function to do it and pass the parameters to it through a sub on the AfterUPdate event of the combo box.

I need to pass 4 parameters, if I only put 1 in there it works fine, but when I start putting more in it doesnt work and I get compile errors or syntax errors.

Sub routine:

Code:
Private Sub cboMonday1_AfterUpdate()
If Me.cboMonday1 = 1 Then
Me.cboMonday1.BackColor = vbGreen
Me.cboMonday1.ForeColor = vbBlack

[Code] .....

View 9 Replies View Related

Change Output File Name During Send Object Routine

Apr 3, 2007

I have a query that runs based on a parameter a user selects on a form.

I want to dynamically create the sendobject file name based on the parameter the user selects.

Example:

My form has a parameter named medicine. When the user checks the checkbox next to medicine it runs a query for records labeled as medicine but sends the e-mail output as the query name. I want something like medicine.txt etcc...

thanks

:confused:

View 1 Replies View Related

Modules & VBA :: Routine To Output Access Report To PDF Using Fields

Jul 3, 2013

I have a routine that outputs an MS Access report as a pdf file which works OK. It does not open the file which is what I want.

DoCmd.OutputTo acReport, "rptTransactionInvoiceExcVAT", acFormatPDF, "C:UsersJEFF1Documents
ptTransactionInvoiceExc VAT.pdf", False

What I would like to do is output the pdf file with a Customer name and number from the field Me.txtAmazonBuyer. I have tried:

DoCmd.OutputTo acReport, "rptTransactionInvoiceExcVAT", acFormatPDF, "C:UsersJEFF1Documents" + ([Me.txtAmazonBuyer]) + ".pdf", False

But no joy.

View 7 Replies View Related

Tables :: Calling Subroutine From VBA Routine To Append Record

Jun 21, 2013

I am trying to call a subroutine from a VBA routine to append a record to an existing table. Below is the code for opening my recordsets for reading followed by the code creating my table to append to:

Public Sub UpdateLotsizes()
Dim curDatabase As DAO.Database
Dim ProdPlanDB As DAO.Database
Dim rstQryLot As DAO.Recordset
Dim rstInvLoc As DAO.Recordset
Set curDatabase = CurrentDb

[Code] ....

To call my subroutine, I simply put in the code:

ExceptionReportAddRecord

And this is the code of the subroutine:

Public Sub ExceptionReportAddRecord()
Dim rstExcRpt As Recordset
Set rstExcRpt = curDatabase.OpenRecordset("tblExceptionReport")
With rstExcRpt
.AddNew
.Fields("item_no").Value = txtItemNumber

[Code] .....

I am receiving "Run-time error 434: Object required" at the line I marked with ...

View 4 Replies View Related

Modules & VBA :: Delete And Insert Data From A Table In One Routine

Oct 10, 2013

Access 2010. Can vba code be written to delete and insert data from a table in one routine.

Something like Delete * Insert into select from where order by....

I tried it with a query but have to write two.

View 1 Replies View Related

Queries :: Return Date Of Next Monday - Routine Not Working

May 13, 2014

Today is 13 May and this code is supposed to return the date of next Monday (19 May)

IIf(Weekday(Date())=1,Date()+1,Date()-(Weekday(Date())+9))

but it returns 1/5/2014 (Thursday May 1), when "Date" = 13/5/2014 (Tuesday May 13)

My begin week is Sunday (1) ,

View 8 Replies View Related

Forms :: Reference Table Being Updated When Launch Edit Routine

May 18, 2015

Currently running Access 2010.

I have a small database where we enter audit log data. In my add add screen from the switchboard, one of the fields is the user the audit is assigned to. So that our group wouldn't be typing their names a bunch of different ways I created a reference table called "Ref Data 005 - Contact Name". So i pre-populate the Contact Names such that they will be more consistent.

The add works perfectly. I built all my screens using the forms wizards.

Now for the modify routine. If the user wants to go in an modify one of the other data elements, I force them in the wizard to do this modify by choosing thier name. Therefore, when i built this screen using the wizard I reference the "ref table" mentioned above. I then throw open another form displaying all of the fields based on the records that it finds for that user when they choose the name from the Ref data 005 table. Hope that makes sense. Ie.. they choose the records they want to possibly modify by first choosing their name from the ref table.

It correctly pulls the records for whatever user you choose. However, when you make the update and save, it is changing the Ref table name as well.

So for example if three users were in my ref as :
bill
joe
john

And you launch the form, lets say joe shows up in the list, when i change it to bill to retrieve bill's records , it will do that but when i make the change, then Joe is changed to bill in the reference table.

View 4 Replies View Related

Modules & VBA :: Running Multiple Queries In A Routine - Error Handling

Oct 9, 2013

I am using access 2010. I use basic error handling in my routines:

Code:
On Error GoTo errHandler ... exitHere: ... errHandler: MsgBox "Error " & Err.Number & ": " & Err.Description

The problem is lately; while testing I am running multiple queries in a routine. When it fails; its hard to identify which query has the problem. So I hit control break; debug and try to find it. After I fix it; I debug and reset; i get this continuing hourglass thing in the form of a spinning circle until I close and reopen the database. I think I need better error handling but not something really complicated because I need to put it in quite a few routines throughout the database.

View 2 Replies View Related

Queries :: Find A Way For Access To Find Unique Dates And Unique Names?

Aug 1, 2014

I have been working on a simple data base for some time now (beginner level) and am still trying to improve it. I would like to do something but before that I would like to have your opinion to know if it is even possible?I have a query QryMainReport:

Start Date/Time
End Date/Time
Employee

At the moment this is what the format of my report looks like (I removed other unnecessary fields):

StartTime----------EndTime---------------Employee
12/06/2014 01:00--12/06/2014 03:00------John Smith
12/06/2014 04:00--12/06/2014 06:00------Jane Doe
13/06/2014 02:00--13/06/2014 05:00------John Smith
13/06/2014 08:00--13/06/2014 08:00------Jane Doe

I would like to do as a report. (Dates would always be from Sunday to Saturday). I am not sure it is possible to do that. I suppose first it would mean:I would have to do a query to separate the times from the dates?I would have to find a way for Access to find the unique dates and unique names?Does it mean I have to use cross tab queries?

View 2 Replies View Related

How To Get The Username From Workgroup?

May 18, 2006

I have the security set via the Access workgroups for both groups and users. I want to be able to use the username entered on the logon screen to filter my query results.

How can I get the logon id that was entered when my switchboard form opens?

Thanks in advance.

Dennis Cronin

View 3 Replies View Related

Username Problem

Dec 23, 2006

I have entered the following code to an onclick button. I am sure I have written it incorrectly (it's probably the line I highlighted below to do with username=Manager. By the way Manager is one of my usernames I have created.

Thanks for your help.

Rob

Private Sub Label218_Click()
If UserName = Manager Then
DoCmd.OpenReport "Tennis Teams", acNormal
Exit Sub
End If
MsgBox "You do not have permission to open this form!", vbOK, "Tennis Center Business Manager 2007"
End Sub

View 10 Replies View Related

Record OS Username

May 9, 2005

Have developed a support database in Access.


I need the dB to automatically pick up the username of the user logged on to the PC. Thus if I'm logged on to the PC as FLESTER, this username wil populate a database field.

Any ideas?

View 1 Replies View Related

How To Record The OS Username

Jul 26, 2005

How do you get Access to pick up th OS username currently logged in to the database? For example I'm logged on to the PC as FLESTER and I wnat that recorded in the dB.

View 5 Replies View Related

Windows Username

Jul 25, 2006

A couple of questions. I want my database to query the AD and make sure that the user trying to open the database had an account in the AD. I dont want them prompted for a password though. I have had a look at trying to change the example NT logon in the samples area, but just managed to get myself in a bit of a mess. Also is there anyway that you can query the users full name in AD and call that variable,or does this only work with the username?

Also, when a user created a record in a from, I would like the users username, called from the AD saved in a field in the table. I have tried this and the only way that I can call the variable is by having the "=Environ("USERNAME")" in the control source of the text box. Which means that it cant be save in a field in the table. I have also tried an after updated event on that textbox to update another textbox and have that textbox control source a field on the table. But again this doesn't work. Can someone tell me if what I am trying to do is possible. Thanks

View 1 Replies View Related

Username Issues

Oct 16, 2006

Hi all

I am currently trying to create a form that will have the ability to show the last person that edited that form and the time and date that it was last modified. When I try though I just keep getting the field to update to me just by viewing it. Can anyone give me a fairly detailed way of doing this?


Kind Regards


David:)

View 2 Replies View Related

Password/Username Help

Sep 26, 2004

I created a password for my database and now I cannot access it. The dialog box says that either the username or password may be incorrect. I do not know what the requested username is. I do not recall creating a username during the process of creating the password. I do not know what username ACCESS is asking for. I think I know what the password is. I think the problem is the username. However, if I somehow do not know the password, what can I do?

After you finish laughing at me, please help. Thanks for any assistance you can provide.

View 1 Replies View Related

Username And Password

Aug 10, 2006

I want to secure my Access database with a username and password. I want to be able to pull the nt login of the user and have them access only the things i need them to access. How can I do this?

View 4 Replies View Related

Username & Password

Sep 25, 2007

Hi,

i have an access db which i want to protect with various usernames & passwords how do i go about this?

View 3 Replies View Related

Clear Login UserName

Jul 18, 2006

Hi all,

I've had a quick search but couldn't find the answer to this.

Is there a way that when a user launches the application via my workgroup file, the default login name is always null?

Currently it retains the last users' login name.

Thanks
Kempes

View 6 Replies View Related







Copyrights 2005-15 www.BigResource.com, All rights reserved