Destination DB As Variable?

Apr 10, 2006

We have a blank database that other units are copying to use at their bases. Most of the other users aren't Access savvy and I've been trying to develop ways to overcome this learning curve by automating as many "customizing" functions as possible. For instance, each unit that uses the database has different organizations, aircraft tail numbers, personnel listings, etc. I've got pretty much everything covered except one item.

The database is set up in a way in which it copies itself when it closes providing the UserID level is not 'Read Only.' This database doesn't use front/back end to control its users. It uses a log-on level based on a security example from this board.

It also has an archive function in which several tables are appended to an 'archive' database. This is a basic copy (minus of few functions) of the main database. The intent is to reduce the number of records in the working db w/o losing historical value.

I think the copy function shouldn't be too much of a problem for new users. I've developed a help file that should walk people through the steps to change the location of the copied file. This is done w/ a *.bat file and the change should be as simple as changing text. However, the archive function works off of severl append queries.

Is there a way to change the destination db other than in the query design view? Maybe a code or a box that treats the file location as a variable? The destination db is U:QA2k6 DatabaseArchiveQA Archive.mdb That works fine for us, but a new unit will have a different file location.

I'll try to make a smaller/scaled-down copy of the db later to post if anyone wants to check it out.

View Replies


ADVERTISEMENT

Multiple Destination Form

Jul 18, 2006

Currently I have three separate forms that correspond to three separate tables. The three tables cannot be combined. Is there a way to have a form write information to multiple tables depending on the field? Any help is appreciated. Thanks.

View 2 Replies View Related

Queries :: What Is The Destination Field

Mar 31, 2013

In Access 2010 what is the destination field? I keep getting 'query must have at least 1 destination field' when I try to fun it.

View 3 Replies View Related

F30 Does Not Exist In Destination Table

Jan 28, 2015

I am trying to import data from excel into one of Access table but it showing error F30 does not exist in destination table. I have checked headings which are matched. Same sheet tried to import in access successfully, but unable to import specific table...

View 1 Replies View Related

Edit Destination Table In Visual Basic

Aug 22, 2006

I want an append query to add records to one of several tables, depending upon the value of a variable entered into a form. This variable is also used to select the appropriate records. The query is invoked from the visual basic code behind the form.

Can anyone tell me how to edit the destination table from within the visual basic?

In hope...
Nell

View 2 Replies View Related

Field 'F1' Doesn't Exist In Destination Table 'tablename.'...

Nov 20, 2006

"Field 'F1' doesn't exist in destination table 'tablename.'"

I hate this error message.

I am using the following command to load data from an excel spreadsheet into a backend SQL Server database via an .adp:

DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel7, sTempTable, strFileName, False, "A2:B4000"

I have purposely used "False" to ensure that the first line in my spreadsheet is ignored. This is because the first line in my spreadsheet contains headings that do not match the column names in my table.

I do not wish to change my headings as end users will be making use of my application and they will not like headings such as "int_FactoryID". Likewise I do not want to change the column names in my table to words such as "Factory ID" as this would be a bad naming convention.

Is there a way to use TransferSpreadsheet without necessarily matching the headings in the spreadsheet to the column headings?

Is there a way for TransferSpreadsheet to ignore the headings and assume that the first column in the spreadsheet needs to go to the first column in my SQL Server table?

Any help would be appreciated.

Thanks
Kabir

View 1 Replies View Related

While Using Append Q Formatting Information In Destination Table Lost

Jan 27, 2015

While using append Q I lose formatting information in destination table.

How do I transfer the formatted information with out losing it when using append Q?

I am new to access so VBA code is not an option for me.

See image below.

View 3 Replies View Related

Modules & VBA :: Inserting From Excel Number Of Query Values And Destination Fields Not Same

Jan 3, 2014

I am just beginning to manipulate Access from Excel.

I am trying to insert a row into a table. I am adding values for every field (8) except an Autonumber.

I have 2 Insert strings which are identical except for the fact that the one that doesn't work, doesn't specify which fields I am entering data into, which I presume shouldn't be necessary in this case.

When I try to use the second version I receive the error message...

Number of Query Values and Destination Fields are not the same.

The string that works perfectly is:-

Code:

strSQL = "INSERT INTO Clubs (ClubNumber,ClubName,ClubGrade,ClubRegion,ClubPosition,ClubHasHistory,clubinleague,cluboriginalposition) VALUES (" & clubCount + 1 & ",'" & lstrNewClubName & "'," & lintNewClubGrade & "," & lintRegion & "," & 0 & "," & vbFalse & ",'" & lstrNo & "'," & 10 & " )"

The one that generates the error message, which is identical except that I have removed the list of fields is:-

Code:

strSQL = "INSERT INTO Clubs VALUES (" & clubCount + 1 & ",'" & lstrNewClubName & "'," & lintNewClubGrade & "," & lintRegion & "," & 0 & "," & vbFalse & ",'" & lstrNo & "'," & 10 & " )"

The execute command is:-

Code:

gcnConnection.Execute strSQL, , adCmdText + adExecuteNoRecords

View 1 Replies View Related

Number Of Query Values And Destination Fields Are Not Same - Runtime Error 3346

Dec 30, 2013

I am receiving the error above when I try to execute the code below. I have checked the fields in the code as well as the table and I can't see what I am missing. The tblMeasure table which is the subform have the following fields:

MUserLoginID - NumberMainMeasureID - AutoNumber - Primary KeyMeasureName - TextMPositonName - TextMeasureScore - NumberMeasureWeight - NumberMeasureTotal - NumberMeasureDesc - MemoMStaffApraisedID - Number

The UserDeatils table which is the main form have the following fields:

StaffID - NumberStaffName - TextDepartmentName - TextStaffPosition - TextStaffGrade - TextStaffBDate - DateStaffEDate - DateStaffApraisedID - AutoNumber - Primary Key

The link between the two forms are StaffApraisedID to MStaffApraisedID then StaffID to MUserLoginID then StaffPosition to MPositonName. When I select a member and click the Duplicate button I received the error above. The area highlighted in red is where it errors out.

Code:
Private Sub cmdDuplicateData_Click()
On Error GoTo Err_cmdDuplicateData_Click
Dim OldStaffID As Integer, NewStaffID As Integer
OldStaffID = Me.StaffApraisedID
'Add new record to end of Recodset Object

[Code] .....

View 1 Replies View Related

Error - Field Date Update Doesn't Exist In Destination Table

Aug 7, 2013

Was trying to append an Excel 97-2003 spreadsheet to an existing Access 2010 database.

The last field in the spreadsheet is Date Update.

When I click 'Finish' I get the error "Field Date Update doesn't exist in destination table <name of table>.

This database was created in Access 2003, and was not updated since and I don't have Access 2003 on my destop.

I saved the Excel Spread as a Excel Workbook *.xlsx and tried to append it. Same Error was the result.

View 14 Replies View Related

Reports :: Subform Field Linker Error - Obj Variable Or With Block Variable Not Set

Apr 16, 2013

I am creating a 2 level report to confirm an order. Main report already created, runs successfully called as subform/subreport under "OrderDetails" form. Linked to master using Order.ID. There are two versions of the confirmation report that have different layouts for different program types.

The hangup comes when I try to add a "Class Dates" subreport. It lists dates of individual classes and Skip dates. I have created the subreport as "srClassDates". When I add it to the main report, it lists the records. However, when I try to link it to the Main report, an error message box appears with the "object variable or With block variable not set".

I have tried rebuilding both the main and subreports, rebuilt the query, have not found anything that changes the result.

Linker has been working successfully on other subforms. Report with groupings works fine, but I need data from 2 tables both linked to order.id.

View 2 Replies View Related

Modules & VBA :: Error 91 - Object Variable Or With Block Variable Not Set

Jul 8, 2013

Error 91 - Object variable or With block variable not set

I am getting this error telling me that an object variable is not set.

I know which variable it is but when I step through the debugger it sets the variable and all is fine? Issue is that public variable of a class is not getting set when the VBA Editor is not open?

View 14 Replies View Related

Modules & VBA :: Sorting / Object Variable Or With Block Variable Not Set

Oct 3, 2014

This code runs fine the FIRST time, however trows up a message the SECOND time it is run.

The error is on the line ".Range"

I am trying to sort records which have been exported to Excel.

Dim LR As Integer
LR = 5
Set xlApp = CreateObject("Excel.Application")
xlApp.Visible = True
Set wbRef = xlApp.Workbooks.Add
With wbRef

wbRef.Activate
.Worksheets("Sheet1").Activate
With ActiveSheet
.Range("A2", .Cells(LR, "O").End(xlUp)).Sort Key1:=.Range("C2"), Order1:=xlAscending, Header:=xlYes
End With
end With

View 3 Replies View Related

Modules & VBA :: Error 2391 Field F1 Doesn't Exist In Destination Table - Access 2013

May 3, 2014

I'm getting error 2391 field 'f1' doesn't exist in destination table

Code:
Dim FileBrowse As Office.FileDialog
Dim varFile As Variant
Dim sFile As String
Set FileBrowse = Application.FileDialog(msoFileDialogFilePicker)

[Code] ....

View 1 Replies View Related

Cascading Combo Boxes - Interact And Record Selections Made In New Records Within Destination Table

Sep 12, 2012

I am trying to get a series of combo boxes to interact and record the selections made in new records within a destination table. Here is situation with respect to the tables involved:

1 table lists the names/acronyms of various research facilities and the branch to which they belong (acronym is PK)
1 table lists Financial Points of Contact for each facility (acronym is FK to relate to earlier table)
1 table lists Technical Points of Contact for each facility (acronym is FK to relate to Facility table)
1 table lists program participants and the branch they belong to (Branch in FK to relate to Facility table)

I am trying to create a form that allows me to set the participant and, from this selection, restricts the facility choices in the Facility combo box to those that fall within the branch to which the participant is assigned. I think the next step is pretty obvious too. Once the facility is selected I have combo boxes that would only display those Financial and Technical PoCs assigned to that facility.

I have watched the 4 Data Pig tutorials and I can easily make functional cascading combo boxes as long as they only refer to the look up tables. I generated perfectly functioning cascading combo boxes on a test form. How do I generate combo boxes that will then store the info selected in my destination table? Whenever I try to set a Control Source it disrupts the functioning of the queries.

View 4 Replies View Related

Modules & VBA :: Update Contents Of Variable But Not The Variable Itself?

Aug 20, 2014

I look at a lot of files to see when they were last updated. I wanted to write a generic procedure to manage that so ..

Code:
Public fDate As Variant
Public vField As String
Public vFile As String

'GTSdata
vField = "txt_gts_data"

[Code] ....

What I hoped Me.vField would do is update the date field [txt_gts_data] on my form with the date the file was last saved.

i.e. me. txt_gts_data = fDate

What actually happens is the variable vfield gets updated from "txt_gts_data" to 19/08/2014 then later code falls over because the fieldname is lost .

Me.[vField] corrects itself to me.vField (and does not work)
Me!vfield falls over (cannot find the field vField, not surprising J)

How do I say update the contents of the variable, not the variable itself?

View 7 Replies View Related

Reports :: Object Variable Or With Block Variable Not Set

Apr 15, 2015

Runtime error '91'

Running Access 2010.

I have two reports running off of the same crosstab query. I copied one report to make the second report, then modified the second report to change the background of column fields satisfying certain conditions. These lines of code were added to the Detail_Format section, in color below. The report with the extra code lines does not error--the original report errors.

Code:
Option Compare Database
' Constant for maximum number of columns EmployeeSales query would
' create plus 1 for a Totals column. Here, you have 9 employees.
Const conTotalColumns = 11

[Code] .....

If I say OK (rather than debug) after the error message, I can then click the button for the report again and it runs without complaint. And, as I said, the report with the added code never errors.

View 4 Replies View Related

Object Variable Or With Block Variable Not Set

Apr 23, 2006

I have a networked database. It is accessed with computers that have both Office 2002, and office 2003. I get the following error message on computers with Office 2003:

"Object variable or With block variable not set"

It happens occasionally and the problem generally fixes itself so I dont think there is anything wrong with my coding.

And when it happens on the computers with office 2003 the ones with office 2002 can open the database fine.

What can be causing this?

Thank you in advance

View 1 Replies View Related

Object Variable Or With Block Variable Not Set

Dec 14, 2006

Good afternoon all,

The following block of code was working great until I came into work this morning. This routine is called from the OnClick event of several combo boxes. When it does, I recieve the error listed above (Object variable or With block variable not set) on line:

If Me.cbxAss_Filter <> "All" Then

Any ideas? I'm running on no sleep in the last 24 hours so I'm sure I'm missing something simple

The code itself checks the contents of a form and builds a string of conditions which I apply to the Form's filter property to filter records.


Code:Public Sub CreateFilter() '************************************************* **** 'Name: CreateFilter 'Purpose: Generate a string to filter the form 'Inputs: None 'Outputs: None 'Instigates: Me.Filter ' 'Updated: 11/30/06 'By: Chris Lounsbury '************************************************* **** 'Vars Dim strFilter Dim lngLength As Long strFilter = Null strFilter = "" 'Each filter box has its own check for contents If Me.cbxAss_Filter <> "All" Then strFilter = "assigned = '" & Me.cbxAss_Filter & "' AND " End If If Me.cbxAction_filter <> "All" Then strFilter = strFilter & "action = '" & Me.cbxAction_filter & "' AND " End If If Me.cbxStatus_filter <> "All" Then strFilter = strFilter & "status_rsrch = '" & Me.cbxStatus_filter & "' AND " End If If Me.Combo34 <> "All" Then strFilter = strFilter & "rims_flags = '" & Me.Combo34 & "' AND " End If If Me.cbxAAMB_filter <> "All" Then strFilter = strFilter & "aamb = '" & Me.cbxAAMB_filter & "' AND " End If 'Check if filter string was built If strFilter = "" Then Me.FilterOn = False Else 'Determine length of Filter String 'minus the trailing ' AND' lngLength = Len(strFilter) - 5 'Chop off ending ' AND' and set the form filter If lngLength <= 0 Then Else Me.Filter = Left(strFilter, lngLength) Me.FilterOn = True End If End If 'debug 'MsgBox (strFilter) End Sub

View 1 Replies View Related

Update Query Using 3 Tables: Source, Joining, Destination Tables

Apr 19, 2007

I have some experience doing 'Update Query' using two different tables but I'm having a hard time doing an 'Update Query' using 3 tables.

I have my source table TP05XY with the fields 'Mark' 'Date' 'UTM_Edig' and 'UTM_Ndig'. Mark and Date are my primary keys (they together uniquely ID each record). I have my Observations table with the fields 'Mark' 'Date' and 'Obs_ID'. The last table is Locations with 'Obs_ID' 'UTM_E' and 'UTM_N'.

I want to update my fields UTM_E and UTM_N from UTM_Edig and UTM_Ndig. However, to do so, I have to go from my TP05XY table, through Observations table to update Locations table. Table TP05XY is joined to Observations through 'Mark' and 'Date' and Observations table is linked to Locations through 'Obs_ID' field.

I have tried a few options without success ... anyone knows how to do it?

Thanks,

Josée

View 1 Replies View Related

Queries :: Append A Field In Destination Table That Is Not In Source Table

Oct 9, 2014

I have a fairly simple append query that appends two columns of data to another table - all good. Except, the destination table has a field 'ServiceDate' that I would also like to be completed at the same time with today's date. I presume that this is =Date(), but where do I put it to make this happen?

View 2 Replies View Related

Please Help: "object Variable Or With Block Variable Not Set"

Mar 1, 2006

I get this error message, " object variable or with block variable not set", when I'm in the design view of a form wanting to use the command button wizard. Using a brand new database/blank I imported a table from my database in question. I then tried to make a new form and put a button on it. It worked for awhile but then when I close the database and reopen it to add another button to the same form, I get the error message again. It isn't a problem that is specific to my homeschool database. It affects all the database I use/maintain as well as any new "test" databases I've made trying to figure out this problem. I looked at references before and after the error occurs and there is not difference. I've also looked at code but don't see anything code that requires variables to be defined. In the case of the test database with one table and one form there is no code to look at until I make a button before exiting and even then, I don't see anything weird.

I would appreciate any help you can offer.

I've attached the original database I was working on when the problems began.

Is it possible for a database program to adjust security levels on certain reference libraries when installed on ones computer, thus making all other database act up that are using those libraries?

Thanks,
Kris

View 3 Replies View Related

Variable Help

Apr 25, 2008

Hi All,

Getting myself in a pickle with variables & forms so any help on the following would be appreciated.

I'm building a client management database and currently have the following setup:

1) tblclientdetails (primary key cdid)
2) frmclientdetails (record source tblclientdetails)
3) cmdopenques (opens frmhealthcheck)
4) frmhealthcheck (record source tblclientdetails)

Once client details have been entered into frmclientdetails and the user has clicked cmdopenques, I would like frmhealthcheck to default to the client details entered. I've tried setting variables in VBA & using a queries/pop ups but can't seem to get this to work

Any help/instructions would be great

Thanks!

Jules

View 1 Replies View Related

Variable

Mar 9, 2006

I have created a Sales Report with Groupings of KeyID then CustID. I am not displaying Detail, CustID Header or Footer. In the KeyID Footer I need to display all CustID's that are included in the KeyID totals.

I have tried adding this code but get a error 2427. GroupFooter3 is the CustID footer.

Private Sub GroupFooter3_Format(Cancel As Integer, FormatCount As Integer)
Let KeyGroup = KeyGroup & "," & Me.CustId
End Sub

Private Sub Report_Open(Cancel As Integer)
Dim KeyGroup As String
Let KeyGroup = "Includes"
End Sub

Also I have added a text box with the control =[KeyGroup] which doesn't seen to work.

Any help would be much appreciated.

Thank you,
Valerie

View 2 Replies View Related

Public Variable

Sep 16, 2005

Why can't I set a controls default value to a public variable?

View 2 Replies View Related

Assign Variable From SQL

Dec 28, 2005

I have a table set up like this:

tbl_original
account, invoice
11111, 1
22222, 1
33333, 5
44444, 3

I want to create a function module or something similar which will assign a variable to the max invoice # used on that table, using sql if possible. I tried something like this, but it's not working.

Public Function max()

Dim maxinvoice As String

maxinvoice = "SELECT Max(tbl_original.invoice) AS MaxOfinvoice" & _
"FROM tbl_original;"

MsgBox maxinvoice

End Function

I would like the msgbox to popup saying "5", since that is the max invoice # used based on the above table.

I don't have too much experience using modules on their own without forms and variables on the form to assign to, can someone make a suggestion?

Thanks in advance!

Vassago

View 14 Replies View Related







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