I have built a simple database for a client and create a runtime which all worked fine. I have a question that if I want to update forms and report or queries and then create a new runtime his data will be lost.
Can I create a runtime which uses the original database but updates the forms and reports etc.
Access 2007 RUNTIME.I have 2 different printers, 1 for invoices A5 & one for general use A4.
I use
[URL]
and can change printers & some stuff but can't change margins.
Is there a way to change these margins via VBA that can be set in RUNTIME.
Like now, I have just had thousands of invoices pre-printed layout but the company managed to move the margin 5mm over so I have to program my MDB reports to reflect that.
I have a report I am trying to limit down. I keep getting this error.
Code:
Run-time error '3075':
Syntax error (missing operator) in query expression ' and (Exercise = Barbell Squat)'.
Here is some of my code. What am I missing?
Dim whereCond As String
Forms!frmReports!cmdExercise.SetFocus
Exercise = Forms!frmReports!cmdExercise.Text
Forms!frmReports!cmdCategory.SetFocus
Category = Forms!frmReports!cmdCategory.Text
[Code] ....
I can open up my tables using the code below in a distributable runtime version, but I cannot filter and sort in the table. Right clicking does nothing.
Dim strTableName
strTableName = Nz(Me.cboTableNames, "")
DoCmd.OpenTable TableName:=strTableName, View:=acViewNormal, datamode:=acEdit
I know with a form we can select to allow filters in the form properties, but when the OpenTable command is used, how can we allow for filtering?
Is it possible to open the tables in a generic form that allows for filtering?
I am creating an app that allows the user to locate a 'job' and all the files associated to to it.
Once the user identifies the job, a form is populated with hyperlinks (labels) that point to each file in a single directory which contains all the assocaited files (pdf's and word docs).
The label are being created successfully, but I can't seem to get the label to accept the hyperlink feature.
Here is my code to date. Why are the labels not accepting the hyperlink data?
-----------------------------------------------------------
Const strForm = "Documents"
Dim frm As Form
Dim ctl As Control
DoCmd.OpenForm FormName:=strForm, View:=acDesign
[Code].....
I'm getting a runtime error 13 on this line of code. Its a piece of code to make a directory, but I cant see anything wrong!
Code:
strBackUpDogNameFolder = "c:GPandDetectionDogTrainingLogBackUpsandReports" & Forms![frm_Profile]![Discipline] " & Forms![frm_Profile]![DogName]"
I have a Main form (MainForm) with two subforms (SFormA, SFormB). These SForms are connected to the MainForm by a control (controlA) and connected to each other by a control (controlB) via an unbound control in the main form, in order to change data in SFormB according to selected record in SFormA. SFormB has an on current event procedure determined to show different things depending on the value of a bound control that changes every time I select a different record in SFormA. Everything works fine when Mainform and SForms first load.
But, when I select a record on SFormA I get a runtime error and everything stops, application closes and reopens, creating a safety copy. It seems to me that the on current procedure on SFormB causes this problem, because if I delete it no error appears (SFormB not showing what I want though). Funny thing is I have another database, same design, same structure, same procedures, (different objects and names of course) and it works perfectly alright. I even recreated the whole database still the same error.
While I have developed many databases using other RDBMSs I'm afraid I'm something of an Access 2007 newbie so the vast bulk of my experience counts for nought given Access' many "unique features".
What I have is a form with about 3 text fields, 2 date fields and a number of comboboxes on it. Although, for now I'm not worrying about the combo boxes until I get the other fields working.
I am trying to develop an update screen where the user types the primary key value for a record into the first field and using DLookup retrieve the other values from the table and insert them into the form so the user can adjust them if they wish and click the Save button to write the changes back to the table. That's the theory.
Unfortunately the reality is, although the values added to the other fields using DLookup are "there" they don't appear on the screen until the controls lose focus. My best guess is because they are being added programatically and no Return key is being pressed, focus will not change and they will never appear.
So to get around this I put a line of code in the GotFocus event of each control to move focus on to the next control, effectively "looping" the focus once around the controls. This worked well until the focus was being moved from the second last control to the last control when I got, Runtime error 2110: Can't move focus to this control. The control was visible and enabled, as was a dummy control I tacked on the end to see what happened.
Main code block in Exit event of first field:
Private Sub Text6_Exit(Cancel As Integer)
Dim varItemType, varItemTypeCode, varItemClass, varItemClassCode, varDescription As Variant
Dim varPurchaseDate, varWarrantyEnd As Variant
Dim varItemTypeTxt As AcTextFormat
Dim PurchaseDateSQL As String
[code]....
I was trying from a button on my form that will go to and bring up the desktop. I want it so I can put this database on anyone's computer and the button will work.
I am using this and it works but only on my computer.
Application.FollowHyperlink "C:UsersBryanDesktop"
I also tried this
Application.FollowHyperlink "C:Show Desktop.scf"
And
Application.FollowHyperlink "C:WINDOWSSystemShow Desktop.scf"
Both gives Runtime error 490 cannot open specified file.
I have a small database application which is split in fe and be. Its running fine and i have been making changes to the front end regularly and replacing the file on server successfully with no problems, But today i edited some forms and reports and afterwards i ran it on a client in access runtime produced the on click event error ( which is on log in form which is a startup form ). Its working fine in full version of access even on the server but couldn't log in because the clicking on login button display the error. See attached image.
View 6 Replies View RelatedRun into a bit of an issue with a combo box that has dates. When I click on a date I receive:
Run-time error '3464': 'Data type mismatch in criteria expression'
Am I receiving this because I have declared it a string when I should declare it something else?
My other question for whenever I get the first part fixed. Is there a way that instead of having all the possible dates to select from, that I could simply have three options available: Within a year, More than a year, and no date. (Once I click on one of those three options, I will filter records that have a date within the past year, over a year, or no date at all. How would I be able to achieve this?
I have a main form with several subforms in tabs. From one of the subforms I list linked records to the main form (Clients) within that subform (Bank account details). I list the records and have a button to add new records.
Where the Client has one or more records in the subform the add button works perfectly.
When the subform has no records the add new records button produces the following error "Run-time error '2498' An expression you entered is the wrong data type for one of the arguments"
The add button has
Private Sub Command52_Click()
DoCmd.OpenForm "AddClientBankDetailsFrm", acNormal, , , , acFormAdd, OpenArgs:=Me!ClientId
End Sub
the "AddClientBankDetailsFrm" popup form has
Private Sub Form_Load()
If IsNull(Me.OpenArgs) = False Then
MsgBox "Form was opened with ClientID = " & Me.OpenArgs
Me!ClientId = Me.OpenArgs
Else
MsgBox "No ClientID was passed."
End If
End Sub
ClientId is the primary key of the main form and the secondary key in the new record.
I am getting a runtime error '2110' - access can't move the focus to the control SearchResults.
This ONLY happens when the first character I type in the SearchFor field is the letter "I". All other characters do NOT give the error.
Why it only backfires on character "I"?
The Form has Search field [SearchFor] and a List box [Searchresults].
A requery occurs after every new character in [SearchFor].
I have an application created in A2003, but my client's machines nearly all use A2010 runtime. How I can disable the Date Picker completely on all forms as I have no need for it. Obviously I can't access the 2010 property sheets to disable it that way.
View 2 Replies View RelatedI have a question that i have implemented database with access runtime 2010
I have a navigation form opens up which provides buttons to open different forms & reports .
But I cannot open some of the forms in runtime although title heading apears but other content just goes blank , it has subforms in it . . some forms opens and some reports as well but some form just doesn't.
And on the notification bar it asks for a save as ??? why is that ...
I have a form that has a button that calls the following code:
Sub ClosePO_Click()
Dim db As DAO.Database
Dim mvalue As String, strSql as string
Set db = CurrentDb
mvalue = Me.Combo73 'combo box on OpenPO Form
strSql = "UPDATE Print SET OpenPO = NO where [GPO Invoice Number] = '" & mvalue & "'"
Debug.Print strSql
db.Execute dbFailOnError
db.Close
Set db = Nothing
End Sub
When I run (or step through the code, I get the Run-Time Error 3078 ... database cannot find the input table.However, when I copy the debug.print output in the immmediate window and paste into the query builder, the query runs. Here is an example of the debug.print output:
UPDATE [Print] set OpenPO = NO where [GPO Invoice Number] = '40333'
where OpenPO is a yes/no field and [GPO Invoice Number] is a string
I am trying to sort with Docmd.Runcommand acCmdSortAscending
When it tries to sort a concatenated field i am getting the runtime 2046 Error
Code:
Private Sub cmbSort_AfterUpdate()
Select Case cmbSort
Case 1
Me.CompanyName.SetFocus
DoCmd.RunCommand acCmdSortAscending
Case 2
Me.DateCreated.SetFocus
DoCmd.RunCommand acCmdSortAscending
Case 3
End Select
My database was working fine. Now, if I have to save or edit a record, I get a message Run time error 2107. The value you entered does not meet the validation rule defined for the field or control. I am able to enter and edit new records in the table. I did not change any validation in form. Then it goes to debug mode and highlighted this code (me.recordsource=Listsql - is highlighted)
Private Sub ListSearch_Click()
Dim dBS As Database
Dim Rst As Recordset
Dim Listsql As String
Set dBS = CurrentDb()
Listsql = "Select * from MasterData where employeeid ='" & [Forms]![MASTERFORM]![ListSearch] & "'"
[Code] ....
Having set a table short text field to 'Indexed (No Duplicates)', I have a form which produces a '2105 runtime error' when the user attempts to submit a duplicate value. I would like to replace this default error message with a more user-friendly MsgBox.
My code for the SaveRecord button is:
Code:
Private Sub SaveRecord_Click()
DoCmd.GoToRecord , , acNewRec
MsgBox "Record successfully saved", vbOKOnly + vbInformation, "Record Saved"
End Sub
My code to capture the 2105 runtime error is:
Code:
Private Sub Form_Error(DataErr As Integer, Response As Integer)
If DataErr = 2105 Then
MsgBox ("This villa booking has already been logged.")
Response = 0
End If
End Sub
Unfortunately when the save button is clicked (when attempting to save a duplicate value), the 2105 error still runs. What are I doing wrong?
I created a small database with a user login form, along with a password reset form. Running it in my sandbox as an accdr file, the password value resets just fine, but on my test machine with the Access 2010 runtime installed, the password reset form doesn't reset the password. I will try to describe the state of things as of this point.
1. The LoginF presents with a combo box for the user to choose their name, and a text box to enter their password. The code below is on the After Update of the password text box.
Code:
Private Sub txtPassword_AfterUpdate()
'Check if user has been chosen
If IsNull(Me.cboUser) Then
MsgBox "Please Select User Initials", vbInformation, "Warning"
[Code] ....
2. The password reset form has two text boxes for the new password and to re-enter the same, as well as a command button with this code.
Code:
Private Sub cmdResetPassword_Click()
If Me.Password = Me.PasswordTest And Len(Me.Password) & "" > 0 Then
DoCmd.RunCommand acCmdSaveRecord
DoCmd.Close
DoCmd.OpenForm "LoginF"
[Code] ....
As I say, this works as an accdr file, but not in the actual runtime environment.
I have a form with 7 List boxes linked to 7 Query's which in turn are linked to a table. Each list box if for a particular trade.
I am trying to select a person or persons from each List box and then have them sent to a report. I have Code to do one list box, but do not know how to link all boxes with code to a 'Open report' button.
The code I am using is as follows:-
Private Sub cmdOpenReport_Click()
On Error GoTo Err_cmdOpenReport_Click
Dim strWhere As String
Dim ctl As Control
Dim varItem As Variant
'make sure a selection has been made
[code]....
Is there a way to auto number a report form.
I have attached my database for a better understanding of what I am trying to do.
Hi,
The company have MS Access 2003, Office XP Professional with Front Page, and Office XP Developer. But, we don't have license on Office XP Professional with front page, others have license.
I installed MS Access 2003, and Office Xp Developer on my company machine,
when I use Office XP Developer to create the package/access runtime for my clients, it must refer to Office XP Professional with front page to create Access Runtime. But, I don't have license for Office XP with front page, whereas I have license for Office XP Developer.
So, after I finished creating the package,
Is the Access Runtime legal in rules distribute to my clients using?
Hi All,
Just a quick one.
I have access 2003 installed, which I use to make systems ( doh )
Anyway, I have just installed Access Runtime on the same machine so that I can test my databases on the runtime version to make sure that all works ok.
However, I have installed several times now, but I can not find runtime anywhere to run it...
Can you not use runtime if you have full blown access installed ?
Or am i just having a blonde moment ???
Thanks in advance.
Max
Hi there,
I'm using the FILECOPY command to copy a specific file on the C drive to a CD.
I have been testing this for ages and it's been working fine. All of a sudden, I am getting a runtime 75 error. WHY???
Thanks in advance,
Paul.
How and Where can I get the Access Runtime ? (as I want to distribute my application to other users who do not have Access installed). :confused:
I'm using Access 2003.
Thanks.