Hi,
I have a database that has a combined user last name, user first name and user middle initial all in one field called name.
Example:
NAME
DOE JOHN I.
SMITH JOHN R.
I would like to get a code that will look at the field and separate them in three different fields, such as :
LNAME
DOE
SMITH
FNAME
JOHN
JOHN
MI
I.
R.
I would really appreciate any help.
Sincerely,
Monti
After working on a clients website, he decided to challenge me... He has an access database that needs editing, but I've never used MS Access before.
Half the fields on his Customer Order form are redundant, and needed removing, which I have done. I am getting no error messages, so I assume that everything has gone according to plan.
HOWEVER... He also wants me to add an area at the bottom of the same form, that will show a list of all his agents within a 20 mile radius of a given postcode (ie, the customers).
Anyone know if this is possible, and if so, how?
:confused:
I have a table, that records various information about cartons by date and lane and carton type and product type for those cartons. In the lane fields, there is 11 of them, it records the number of cartons with specific issues (tears, globs and fallbacks). I am trying to run a query that will count the number of cartons that have those issues on any given day, in each lane. I have used the DCount function, however, it still counts the cartons that have 0's in those fields. For example, one particular date, there were 18 entries, so no matter what I do for the DCount function, it still comes back with 8 instead of 1 issue in lane 1. I have been fighting with this for weeks! Please help!!!
Hi All, Is it possible to have just one instance of this message box fire when one or all or any number of the flags are triggered. At the moment if 2 flags are set then 2 messgage boxes appear,if 3 then 3 messages etc. My code at the moment is below to trigger the message box, hope I make my self clear;can it be tidied up?
private Sub Form_Current()
If Me.Flag1 = "Patient Alert. HIGH RISK. Med Hist" Then
MsgBox "**WARNING PATIENT ALERTS DETECTED**Read all patient alerts before treatment"
End If
If Me.Flag2 = "Patient Alert. ALLERGY. Med Cond" Then
MsgBox "**WARNING PATIENT ALERTS DETECTED**Read all patient alerts before treatment"
End If
If Me.Flag3 = "Patient Alert. Cat Score. LOW. Caution See Notes" Then
MsgBox "**WARNING PATIENT ALERTS DETECTED**Read all patient alerts before treatment"
End If
If Me.Flag4 = "Patient Alert. PATHOLOGY. Int/Ext Exam" Then
MsgBox "**WARNING PATIENT ALERTS DETECTED**Read all patient alerts before treatment"
End If
End Sub
Hi All,:confused: need some code help again, I dont seem to be able to get the hang of message boxes!! The code below takes the path to a mdb file which is stored in a text box on my form, it then deletes an existing table -Expire-and replaces it with a new table also called Expire from the database located at the file path in the text box.
Private Sub Command6_Click()
Dim tmpFilePath As String
tmpFilePath = Me!Text1
DoCmd.DeleteObject acTable, "Expire"
DoCmd.TransferDatabase acImport, "Microsoft Access", tmpFilePath, acTable, "Expire", "Expire", False
DoCmd.Close
End Sub
What I would like to happen is; when the process has finished a message box pops up and informs the user that:
"the update has been successfull, your DentureBase V2 licence key has been updated"
the form then closes. If it is at all possible I would then like the db to close and restart (but this is not essential).
Once again I appeal to your generousity, many thanks:D
Hi All
I have the following code and wish to change the Weights.Collected field to True from false in the new query (expr3: ) in the new query.
Thanks
Private Sub cmdBuildQuery_Click()
On Error GoTo Err_BuildQry
Dim strSQL As String
Dim qdf As DAO.querydef
strSQL = "SELECT TOP "
strSQL = strSQL & Me.txtNumberToGet
strSQL = strSQL & " weights.Weights, Weights.DocketNo, Weights.Collected, Weights.UKBulk, Weights.weighttime FROM CollectionQry "
strSQL = strSQL & "ORDER BY ([id]);"
DoCmd.DeleteObject acQuery, "qryCollectYorks"
CurrentDb.CreateQueryDef "qryCollectYorks", strSQL
DoCmd.OpenQuery "appendUkBulk"
DoCmd.OpenQuery "qryCollectYorks"
Exit_BuildQry:
Exit Sub
Err_BuildQry:
If Err.Number = 7874 Then
Resume Next
Else
MsgBox Err.Number & " - " & Err.Description
Resume Exit_BuildQry
End If
End Sub
Hello all
I am having a problem with my vb code. I am realatively new to vb and what I am trying to do is search through a table according to what is selected on my form and delete the values that equal the value selected int the table. What I have so far is this
Private Sub cmdDel_Click()
Dim rsSource As DAO.Recordset
Dim rsDestination As DAO.Recordset
Dim theBug As String
Dim SelItm As Control
Set SelItm = Me.Users
If Me.Schedule.ItemsSelected.Count = 0 Then
Beep
Exit Sub
End If
Set rsDestination = _
CurrentDb.OpenRecordset("User_Course_Room", _
dbOpenDynaset)
For Each Itm In Me.Schedule.ItemsSelected
rsDestination.FindFirst "User_ID = " & Me.Users & "" And "Course_Room_ID = " & Me.Schedule.ItemData(Itm) & "" ### THIS LINE GIVES ME A ERROR
'rsDestination!Course_Room_ID = Me.Schedule.ItemData(Itm)
'rsDestination.FindFirst "Course_Room_ID = " & Me.Schedule.ItemData(Itm) & ""
rsDestination.Edit
rsDestination.Delete
Next Itm
Me.Sessions.Requery
Me.Schedule.Requery
End Sub
In the line with the bold writing next to it I get an error. What I am trying to do is search for the record with the user id selected and the course room id seleceted and delete that record but I get an error. Any help would be highly appreciated.
I have created a basic database but now need it to perform some difficult tasks (Well difficult to me) an havent a clue how to do this.
I need to be able to search the database for a vehicle type for a specific dat to see whether it is available or not?
and i need to be able to produc a list of vehicle & drivers that are not booked by entering a date?
Has anybody got any ideas on how to do this because its racking my brains
Thanks
I have this form which shows the contents of a table... however, this table is linked to another table. How do I show the results of this linked table in the form?
Table_person
- Table_personID
- PersonFirstName
- PersonLastName
- EmployerID (linked to table below)
Table_Employer
- EmployerID
- FirmName
- ....
Now - the form should look like this:
First name: John
Last name: Doe
Firm: John Industries (selected in a dropdown box)
Table_Employer would contain
1 John Industries ...
2 Hank Industries ...
You catch my drift right?
How do I link these two tables in a form? How do I get the correct Firm to be selected in a dropdown box?
Any help is appreciated!!
Jazz
Hi,
How do I query the last 2 years vs. current date?
Basically, I want to see the record from today date back to 2 years.
Please assist...
Thanks,
Isabel
Works great, but when I hit the number "3", (3 times in row) it will let me into the form. I want it to not let me in IF I don't know the password.
Where did I go wrong?
Private Sub Form_Load()
Dim pw As Variant
If InputBox("What is the password?", "Password") = "1" Then
Else
MsgBox "Invalid Password", vbCritical, "Sorry Charlie"
DoCmd.Close
If InputBox("What is the password?", "Password") = "2" Then
Else
MsgBox "Invalid Password", vbCritical, "Sorry Charlie"
DoCmd.Close
End If
End If
End Sub
I protect my code from people being able to read it by setting a password on the code from Tools > Properties, selecting the Protection tab and entering a password, and clicking "Lock Project"
Is there a way to write code that will remove that Lock Project check and check it back on?
I've looked through the Application.SetOption command and it doesn't seem to be one of the choices. It would be very helpful if someone knew how to do this.
Thanks
SHADOW
I need some help on a database that is set up for work use.
It's rather large and I have no technicial knowledge of access whatsoever so an answer in plain english would be appreciated.
I have attached a picture of the screen that i am having the problem with. The blank fields contain peoples names and addresses. On this page i have to click on "update service user" on the first user, the database opens a seperate page and i enter a few details, then i click to go back to this screen.
When I return back to the screen, the scroll bar is at the top of the list. This is OK when I am doing the first few letters of the alphabet (the users are listed alphabetically) but when i have too use the scroll bar and choose the letters later down the list, then click to update then return to the screen and the scroll barr is not where i left it...ie: it's at the top.
So what I am asking is, is there a way of freezing this scroll bar so it will stay there even when i have navigated away from the screen to update each user?
If someone could answer me this query then I would be most grateful as it's quite time consuming for me to use the scroll bar and find the next person that i need to update.
Hi, looking for help big time!! I am a novice at using MS Access and struggling like hell. I have been set a project at University that requires me to import data from Excel, sort the data (i.e the data imported will be for a whole year and I am only interested in looking at single months), use calculations on the data imported and display this graphically. Is this possible with Access?? Any help will be gladly received as Im desperate.:(
View 1 Replies View RelatedI have a multiple user access database on share drive with user-security level created. I created myself as administrator, and remove default Admin from Admin group. Removed permission from user group and joined workgroup file which I created as "MBS work group.mdw". I created shortcut on user's computer. I believe the syntax is correct
"C:Program FilesOffice 2003OFFICE11MSACCESS.EXE" /wrkgrp "\ServerNameMBS DatabaseMBS Work Group.mdw" "\ServerNameMBS DatabaseMBS.mdb"
Everything works fine. When I directly double click the database (MBS.mdb), it pops up a login box. However, when other user double clicks the database directly (not from shortcut) from their station, login window doesn't pop up. It allows them to access the database. I saw the work group file used default System.mdw
My question is how can I restrict them by double clicking the database without go through shortcut? Why my database security not protect user access without give user name and password. I tried by joined user’s work group file to MBS work group.mdw. It works, but I don’t want let user manually to do that one by one.
Is there anybody can help me go through this problem?
Sorry, i dont know where should i post this( under which category)
so i just post it here,
I want to create a login page using access,
and then i wanted to record down the name of the user and the time and date(login and log out) when he/she is using the database.
And then record it down in a table.
Any ideas fellow forumers :)
Hi,
I am fairly new to DB's and have been trying to get my head round a database I want to build. I have had a few pointers from other people on here which has helped etc.
I was wondering if anyone out there would mind helping me with this project. I will go into detail if anyone is interested. I am hoping that someone would let me add them to messenger so when I get stuck etc, I could drop them a quick note. I am not going to harrass you every minute of the day (I promise not to try to anyway :D ). I would like to work with someone so I dont have to keep explaining it to someone different each time.
If this is something that someone wouldnt mind doing, please, please, please let me know.
Many thanks
Jamie
So far I haven’t got help on my DB.
I am attaching my DB.
The DB has two tables: DiaryTable & RBCaseTable
I want to resolve two issues on this DB
First issue: The DyNo field will start from No.1 on new year (DMax function). Since there will be duplicate records with the same DyNo for every year, I want to filter the records year-wise. For the current year, I should be able to do data entry, edit, search, print etc. For the previous year’s records, no data entry should be allowed and only search and print to be allowed.
Second issue: Two fields in both the tables are same i.e. DyNo and Remarks. I want this to be linked. What I want to do is that after I open ‘frmRBCaseAdd’ when I type the DyNo, the form should show the ‘Remarks’ field of DiaryTable so that I could update/edit.
I know nothing about VBA coding etc. Whatever codes I put in this DB was obtained from this forum and I simply made changes to suit my requirements. However, I failed to get help on these two issues. I shall be grateful if you could kindly help me. Thanks in advance.
I need help please.
1. I have a [CmdBtn] to do some calculation on the first day of every month.(The Btn and calculation code are ready and working).
2. On clicking, the [CmdBtn] will look for [FieldTotal] entry. If no entry, it will execute.(This code is also fine and working).
3. While executing the command, it will populate the [FieldTotal] automatically so that second clicking of [CmdBtn] will take no action and the populated field will tell the user that calculation is already done.(Code for auto-populating is also fine and working)
4. On the last day of the month, the [FieldTotal] entry will be deleted.(Here also the code works fine.).
I have two tables Table1 & Table2. I have the form for Table1. The [FieldTotal] is in Table2. I inserted a TextBox in form and tried to link it to Table2.FieldTotal throu Data-ControlSource, but it is not working. When I open the form ‘#Name?’ appears in the [FieldTotal]. I tried changing the field property to Text and then Number. In both options, I get the same ‘#Name?’.
Interestingly, when I leave the text box as it is without linking it to Table2, the [FieldTotal] in my form appears blank. Here I am able to populate the [FieldTotal]. But when I exit and reopen the form, the text box is again blank.
Please guide me (1) in linking the Table2.[FieldTotal] to my text box in form (which is based on Table1) or (2) how to keep the text box entry permanent till the end of the month.
Hello, i need simple database for my artworks. i made a few tables, but now i have to connect them and add some features. Also i will need a few reports... i think i will not be able to do it mysef. so i am looking for help... does anybody interested in this project? i will pay with Paypal. please, let me know
thank you,
Elena.
i'm eric. joining a couple boards and looking
forward to participating. hehe unless i get
too distracted!
eric
I am a novice and need help, i have built a simple database and i need to find out how to automatically update files across a network as soon as possible it updates on a couple of machines strait away but on others i have to close the database and then reopen it to get the updates. In addition to this i want to be able to search for a reference at the click of a button.
Any help on this would be greatly appricated as i am a novice
Thanks
Ok i have a database works fine just run into a little porblem..
In My VBA Coding i have made a SQL quiery the code is..
Private Sub Form_AfterInsert()
DBEngine(0)(0).Execute "INSERT INTO availability (ID) " & _
" VALUES (" & Me.ID & ")", dbFailOnError
'---------------------- Below Is The Code That -----------------------
'-------------------------- Doesn't Work -----------------------------
DBEngine(0)(0).Execute "INSERT INTO availability (Name) " & _
" VALUES (" & Me.Name & ")", dbFailOnError
'----------------------------------------------------------------------
End Sub
ok so the insert of ID works but the insert of Name does not..
Am i doing something wrong?? can somebody help please i need it urgent..
P.S.
i have been using MySQL for about a Year working on PHP and it seems much different from this SQL here on access.. and my suggestion would look something like this
"INSERT INTO availability ('ID','Name'), VALUES ('Me.ID','Me.Name')
Something along Those Lines..
- Alan
:confused: Hi, am new here & i need some help with some access database. Its for a little project am using to learn access.
Ok am designing a website for an airline company using access as d database end & asp for coding & stuff. My problem is a table i called flight. I have to write out a flight schedule in d database but am not sure how to do it, i wrote a schedule down in words using days. let me explain that, what i did was i have about 10 countries my airline company flies to, so what i did was grp 5 countries to fly mondays,weds,fridays & sundays & d other 5 fly tuesdays,thursdays & saturday. I don't know how to put that in the table since in d frontend customers are supposed to be able to search by date. On the frontend is a drop down menu where they pick a date like 29th november 2004 & then it shows d flight details but my problem is i wrote it in days. what should i do?? :confused:
I need some help on a database that is set up for work use.
It's rather large and I have no technicial knowledge of access whatsoever so an answer in plain english would be appreciated.
I have attached a picture of the screen that i am having the problem with. The blank fields contain peoples names and addresses. On this page i have to click on "update service user" on the first user, the database opens a seperate page and i enter a few details, then i click to go back to this screen.
When I return back to the screen, the scroll bar is at the top of the list. This is OK when I am doing the first few letters of the alphabet (the users are listed alphabetically) but when i have too use the scroll bar and choose the letters later down the list, then click to update then return to the screen and the scroll barr is not where i left it...ie: it's at the top.
So what I am asking is, is there a way of freezing this scroll bar so it will stay there even when i have navigated away from the screen to update each user?
If someone could answer me this query then I would be most grateful as it's quite time consuming for me to use the scroll bar and find the next person that i need to update.
Hi all
I am really new to creating Databases and need some help with a problem i have. Basically all i want to do is have a table with say Customer Id, and Customer Address.
Then in another table or form (not sure which is best) when i put in the customer Id ,it will automatically fetch through the customer address, so i dont have to keep typing in the address all the time.
Is this easy to do? if so how can i do this?
Again thanks all
Chris