I have a form and I have created an event procedure on the "before update" property of the form. My procedure is:
Private Sub Form_BeforeUpdate(Cancel As Integer)
Dim pwd As String
pwd = InputBox("Is the information you entered correct?")
If pwd <> "yes" Then
MsgBox "Record Not Saved"
Me.Undo
Else
MsgBox "Record Saved"
End If
End Sub
the record is not saving under any situation. What do I have wrong?
I'm wondering if its possible to have a "would you like to save changes, yes/no" thing pop up after data has been added or changed to a form, or have the option to save when closing a form and if no is chosen then any data changed is not saved.
I am designing a transactions database for some of my clerical staff. I've inserted a data entry subform into the main transactions form (which also has a subform that summarizes all the selected company's past transactions). This data entry subform actually has as it's record source a table that simply stores that one record temporarily.
So when the user is finished entering their current transaction, I have a Save button that actually just opens a popup form which displays the data they entered into the data entry subform, giving them a chance to verify their entry is accurate. This form has a Save button which runs an append query and a delete query, adding the record to the permanent Transacations table and also clearing the temp table.
The problem I have, I think, is that when the popup form opens, the main form data entry subform still has that record locked as exclusive. I believe this is the case because while I am indeed able to make changes to the fields on the popup form, none of these changes appear in the temp table. In other words, the user is not actually able to use the confirmation pop up form to make any necessary edits to their entry. This makes the form sort of useless!
I have tried to make a login screen, I have also searched for information and tried some of the examples but, I just can't get one to work. Is there someone or somewhere where I can get information on how to build one step by step in simple easy instructions....(access 2003).
Also, how do you get access to open all the windows, tables, queries etc in full screen mode. I have expaneded them and shut it down and then reopened it but they still want to open out of full screen mode.
Thanks, everyone has been a great help in creating my first Access program.
is there any way to get rid of deletion confirmation when you run a make-table query. though I unchecked all boxes under Confirm on Edit/Find tab, still popping up.
im having difficulty adding data into a table which i created, i want to use two or more of the same Student_ID's into one field, while adding different data into another field Subject.
I am trying to create a button to delete record, I have used the wizard and it works fine but now I want to have a confiirmation message to confirm that they really want to delete this record.
below is my code. The prompt works but the record never deletes.
Any Idea's
Private Sub cmdDeleteRec_Click() On Error GoTo Err_cmdDeleteRec_Click
DoCmd.SetWarnings False If MsgBox("Are you sure you want to delete this record?", vbYesNo, "Warning.........") = vbYes Then Me!frm_Entry.SetFocus DoCmd.RunCommand acCmdDeleteRecord DoCmd.SetWarnings True Else DoCmd.SetWarnings True End If
When i try to insert data into a backend Oracle table (with ODBC) using a form, (i use docmd.runsql "insert....") Access gives me a message like"You are trying to append 1 row to the table are you sure you want to append?"
i want to suppress this message as i have to insert into 2 tables and delete from 3 tables when the user enters some data in the form, so it asks the user five times (say 2 times for insert and 3 times for delete..) when it inserts or deletes each table. the user doesnt want this to click every time when they do that... how do i suppress these messages, is it Access-specific or oracle specific? I am not able to do this..! is this any kind of exception that i have to put in??
My training table consist of 3 fields and using unbound form
1st field custid (text field)
This can't be NIL or Can't duplicate
What I am looking for learning point of view (duel check at same field with different behaviour).If record is duplicate "Popup message" and curser move back to same field.If field is empty "popup message" Do you want to continue, If yes, move back to field if NO, close form..Therefore, on Before Update event I wrote the following.
Private sub txtcid_beforeupdate (cancel as Integer) If Dcount("[custid]", "[customerdetails]", "[custid]='" & me.txtcid & "'") > 0 Then MsgBox "Customer ID already Exists !!!!" Cancel = True Me.Txtcid.Undo
[code]....
Just a quick update "I tried to used YES or NO option in Exit event too, but no success.
Is there any way to customize append query confirmation message? Unclicking Confirm Tools-->Options-->Edit/Find-->Confirm-Action Queries disables all warning messages.
My query takes some records from one table and append them to another table. When I run the query, first warning message says "Warning you r about to run an append query that will modify data in your table" (this is the message I do not want to see) and then if OK is clicked, the message says "you are about to append XXX rows...(this is the message I would like to customize)
I am building a simple db from scratch using the limited knowledge i have, and a lot of the information gained from searching these forums as a guest. I've now reached a point where I can't seem to find what I'm looking for, so any help would be gratefully received!!
I have a single table, single form and single report (told you it was simple;)). The table has nearly 2000 records and 2000 pictures (linked). On the form I can print every record with a single click of a command button. This is great, but I would like a message box to popup and confirm the print action, as this is gonna be expensive if its clicked on every record!!
If anybody can help, I would be chuffed!! I searched the forums and can't seem to find anything on this!!
I have a form that has a bar down the left side of my form that is right next to the navaigation bar. It has a arrow pointing toward the form. If I click on it nothing happens. Don't know what it is and would like to get rid of it if possible.
I am looking for a method to shift a small pop-up window around on the screen. I want to avoid the overlap with the help function, which is an external program. I already tried this code in the form:
Me.Left = Screen.Width / 2.5
But a form does not seem to have the property .Left or .Top. Does anyone have the solution? Hans van Vliet
I have a database that logs complaints. I've added a field to calculate the age of a complaint based on the date received and the date resloved. To update this field I have an update query that runs after someone closes an update form. My problem is that I recieve two dialog boxes one that confirms that I'm will be updating the table and another that tells me how many rows were updated. I would not like those boxes to appear so the update would look transparent.
Hi, i have my form open in design view and it includes quite a few fields on a tab. But when i go to open it in form view, the form is just grey and nothing appears on it. Never seen this before, can anybody help?
I have a form that is too big to view on one screen without scrolling down, is it possible to shrink it so that I can view it all, similar to the facility in Exel? I have tried the Scale & Resize MDE solution that is suggested in the threads but this only resizes your original to fit other screen resolutions - neat idea but it is not what I want as it still shows the original form nut pro-rata to the screen size.
I am not distributing the app so anything I do local to my machine to get it to work is fine.
Could somebody please tell me how to set the size that my form will appear when loaded, because it's really annoying me trying to get them to appear at the size I want.
I have a macro which runs from a form. The macro just opens up a subform. The problem is that the subform gets opened up in a new window. I have changed the property to modal, but this then still opens up the subform in a dialogue box.
Basically I want to be able to view both the form (top half of the screen) and the subform (bottom half of the screen) on the same screen.
Table1 CustID - (Autonumber/PK) FirstName MiddleName LastName Address City ContactNumber
Table2 CustID VehID - (Autonumber/PK) PlateNumber FrameNumber ProdNumber.... etc.
Property of all fields in Table2 are set to Indexed(No Duplicates).
I need a warning message form to appear on the screen if User adds a new record of PlateNumber which already exist. Then, automatically shows User who currently owns that PlateNumber.
I have a modal, pop-up Form, that I'm using as a dialog box. But, when it opens, I want it positioned on screen in a certain place, but I'm struggling to work out how to do this. What properties do I need to alter/set, to achieve this?
I had the Main Menu open when clicked on access file. I put a autoexc.bat file somewhere. Where? Also how do I get a form to open in full screen again?
Need some help on a command which would close any on screen active form. I want to have this Esc key enabled as an autokey to close any screen active form. I know how this autokey thing works but unable to figure out proper code.
Hello this is my first post in the definetely best Access & VBA forum on the net and i hope i am in the correct forum to ask this. I would like to know if there is any way in access to change the size of the for my users view according to their screen's resolution. E.g. i am creting the form using 1280 x 1024 resolution and my users have 1024 x 768 resolution how go i make the form adapt to their res. Thanks for any replies :D