Is there a good replacement for the use of local forms in an Access database? We have a large A97 replicated database application that we are trying to update. We use local forms for data output. Since these are no longer available we are looking for a workaround.
many thanks
Database: Access 2007
I have designed a touchscreen input system using Visual Basic.net and this writes to an Access Database. Each Touchscreen has its database locally so it can still work even if there are Network problems.
Now what I would like to do is have all these local databases write to a central database say every minute but only write new records to the central database. The Central Database can either be Access or SQL.
What is the best way to do this?
I would like to have a Button "Files to FTP", So, the Macro should move the files from the Local Files from the Directory to the FTP Location.
View 6 Replies View RelatedHello,
If somebody mistakenly replaced a database, is there a way to get it back? The database was created with Access 2000 and the OS is XP.
Thanks,
Maritza
Can anyone suggest a work around for the DateAdd() function. I have Access 97 and this function is not available.
View 3 Replies View RelatedI have a Form with embedded Subform, everything works well as far as moving through records. Scrolling through records on main table via Form brings up correct records of child table on Subform, so the link between the 2 tables is done properly.
I use this logic to lock/unlock a field in the subform.
Code:
Private Sub Form_Current()
If IsNull(Me.Parent!Spec2) Then
Me!Value2.BorderStyle = Transparent
Me!Value2.SpecialEffect = Flat
Me!Value2.BackStyle = Transparent
[Code] ...
I confirmed with debug that the logic does set the properties properly. They are updated once and that's that. Any further passes through the logic do not update on the form. They do pass through correctly, changes are just ignored.
It doesn't matter if I use the logic from the Form and refer down, or in the Subform and refer up, the Subform never gets updated. I tried Repaint, Refresh, Requery, nothing works. I cannot count the permutations I've tried.
I encountered a problem in MS Access 2000. When I needed to replace '#' with letter 'c' there was a problem in first the 'find' and then the 'replace'. Is there any other way to do this?
View 4 Replies View RelatedIs there a way to DCount Multiples?
=DCount("*","[Personnel Information]","[prp-requires replacement] = -1"&"[PRP Position Status]='Certified' or 'postured to PRP position'")
is what I got and obviously having issues with. I basically want to count who has prp requires replacement check that are currently certified or postured.
I have a form that has combo boxes and text fields (as well as sub forms). There is also a button linked to some code that says'
Private Sub cmdQuote_Click()
'Creates quote date and prints quote
Me.QuoteDate = Now()
Me.cbAgentID.Requery
DoCmd.OpenReport "Quote", acViewPreview, , "BookingID = " & Me.BookingID
End Sub
When the button is pressed the QuoteDate field (it is bound) should be be populated, but unfortunately it is not. I have played with refresh and requery but cannot derive a solution.
I am in the midst of migrating an Access 2003 database to Access 2007 and one of its most important module uses the filesearch object to transfer table data from word files into a table in the databse.
Code:
Option Compare Database
Option Explicit
Public Function ImportPathTableData()
Dim objWord As Object
Dim objDoc As Word.Document
Dim db As Database
Dim data As Recordset
Dim bWord As Boolean
Dim strFolderName, strNPID, strTemp As String
Dim tablenb, table, row, column, i As Integer
[code]....
a couple of months ago i found a celndar control replacement that Microsoft kindly provided. i have made a few mods that allow me to change the day/week etc. i would now like to tell it to open on a certain date. the reason is that on each of my client records i have 'Future Appointments'. i would like to be able to select a future appointment and click a button that then opens a form that includes the calendar and go to the date of the future appointment. the calendar controls the diary. whatever date the calendar is on the diary matches. so to change to the date of the appointment i need to change the calendar date.
i tried the obvious first.
[Forms]![frmDiaryMultiView]![frmCalendar].Value=#01/01/2012#
that didnt work as the calendar does not seem to recognise it.
i am totally lost with this as i dont even understand most of the code that is behind the calendar, so i dont know what i am looking for to use to open it on a given date.
I am using access 2000. I have created a database that is working well but have created a form in which I want to place photos. I have created a bound object frame which is linked to field in table. Problem When I go to insert picture in object frame it is placed there as a "Package". It will not place the actual picture as is. How do I get rid of this Package?
View 1 Replies View RelatedHi , I am working on a project and am a beginner in this field. My difficulty is that i need to print the details on a form (which has a subform ) into the invoice.xls in Excel2000 . I have managed to get all the required data including the first record in my subform in excel , but i donot know how to print/get the next record . I have tried using recordset,cmd.Gotorecord, query and Macros to do so.
Pls Help.
I'm having trouble with a new project I'm working on. The application is mainly going to be used to display data, which comes from a linked table. It has to be a linked table (in my opinion) because it's replaced once per week from a fresh data dump. For each of those records, though, there will be notes made in a local table named "Custom-Data". My trouble is displaying a mix of information from the linked table, "Roster", and "Custom-Data" because linked tables can't be assigned a primary key.
Essentially, when a record is pulled up, a bunch of data from "Roster" will be shown in addition to the comments from "Custom-Data".
...not too much in the archives on this one, so any help appreciated...
We have an Access97 MDE with a split backend that is shared over a network.
Most of our users have WinNT installed and the Access application works fine. We have a user who has Win2K and Office2k and every time this person tried to launch the Access97 app, he receives the following error:
The database that you are trying to open or convert is currently in use, or you do not have permission to open it exclusively.
I have checked the Security Permissions for that user and he actually has full rights (Admin) for the Network folder.
Anyone else experienced this ?
Hi! We have a problem with analyse reports generated automatically since we are using Access2000. Attached to this mail you may find a screenshot of the desired report. When we try printing query analyses with the sql syntax exactly that happens (see attachment). Thanx for your help,... Stefan
View 2 Replies View RelatedMy organization recently upgraded from Office97 to Office2000. A database that we had on 97 is giving us errors when we try to run it under 2000. I have been able to fix some of the errors. This one has me stumped.
I'm getting an error 13; type mismatch and it is calling out this line:
Set Mydb = DBEngine.Workspaces(0).Databases(0)
Any help is greatly appreciated. This is the complete function:
Function RegistrationData(Reqinfo As String) As String
On Error GoTo error_registrationdata:
Dim Mydb As DAO.Database
Dim MyRS As DAO.Recordset
Set Mydb = DBEngine.Workspaces(0).Databases(0)
Set MyRS = Mydb.OpenRecordset("REGISTRATION")
Select Case Reqinfo
Case "CommandName"
RegistrationData = MyRS.COMMAND
Case "CommandCode"
RegistrationData = MyRS.COM_CODE
Case "CommandAddress"
RegistrationData = MyRS.COM_ADDRESS
Case "CommandManager"
RegistrationData = MyRS.COM_MANAGER
Case "CommandPOC"
RegistrationData = MyRS.COM_POC
Case "CommandPhone"
RegistrationData = MyRS.COM_PHONE
Case "CommandFax"
RegistrationData = MyRS.COM_FAX
Case "ClinicName"
RegistrationData = MyRS.CLINIC
Case "ClinicCode"
RegistrationData = MyRS.CLI_CODE
Case "ClinicAddress"
RegistrationData = MyRS.CLI_ADDRESS
Case "ClinicManager"
RegistrationData = MyRS.CLI_MANAGER
Case "ClinicPOC"
RegistrationData = MyRS.CLI_POC
Case "ClinicPhone"
RegistrationData = MyRS.CLI_PHONE
Case "ClinicFax"
RegistrationData = MyRS.CLI_FAX
Case "MailDir"
RegistrationData = MyRS.MAILDIR
Case "HROFile"
If Not IsNull(MyRS.HROFile) Then
RegistrationData = MyRS.HROFile
Else
RegistrationData = "error"
End If
Case "AboutYN"
RegistrationData = MyRS.ABOUTYN
Case "ActivityName"
RegistrationData = MyRS.ActivityName
Case Else
RegistrationData = "error"
End Select
end_registrationdata:
Exit Function
error_registrationdata:
MsgBox "There was an error retrieving data from the Registration Table. Please ensure all data is filled in correctly."
RegistrationData = "x"
Resume end_registrationdata:
End Function
After doing a search, i receive this error(3326) when I insert the found info. J
View 1 Replies View RelatedThe Access2000 database is on a server located on our office network. Our office has a mixture of WindowsXP and Windows2000 as the operating system. We are using Novell Netware for the office network. I am wondering if the Novell Network is "confusing" Access???The check box option to open Access2000 as a multiuser database ischecked. Also "No locks" is checked. When the database is opened weget the "LBD" file with "access.lockfile.9". When I look at this file,I see my name and the word "Admin", which seems normal. However, ifanother user attempts to open the database, they can't and they get amessage that another user is using the program.According to Micorsoft, Access must be in a shared directory. Sinceeveryone can read/write/create/delete to the directory it appears "shared".Nevertheless, is it possible that the Novell Network has a conflictwhich prevents Access from being shared? --------------------------------------------------------------------------------------I took the database home (to my home network) and had limited sharing success. First, the folder that access is in must be fully labeled as shared, read/write privileges by themselves don't seem to allow multiuser access. Second, after closing the database, I would get a "can't find" the database message from windows explorer even though the file was visible.
View 14 Replies View RelatedHi All :)
Can any one help me to get this done. Here is my case ..
There is column1 called as "Status" in a table "Company List".
There is column2 called as "Date" in a same table "Company List".
My requirement is ..
Whenever I update column1 "Status" as "Done" and move to next Row. Column2 "Date" should update automaticaly with system date.
Can any one please help me in this reagrd.
Thank you in advance..!
Narayan
Hi, i am using the following code to open another access database. it works fine in fuilltime but when i install a runtime version I get an 'active x cant creat object' error. Does anyone knwo why this is?
Dim appAccess As Object
Const strPathToBackup = "C:interim.mdb"
Set appAccess = CreateObject("Access.Application")
appAccess.OpenCurrentDatabase strPathToBackup
appAccess.Visible = True 'do not show database
appAccess.Run "Test"
appAccess.CloseCurrentDatabase
Cheers
Tania
I am working on a report in Access2000 which is getting information from several tables via a number of queries.
I am using nested IIf() functions to combine text formatted data in a calculated query field before using it in a report.
One such IIf() function is
Desc_col: IIf([HOVR - UDP].[SERVICE] Is Not Null,[DA] & " " & [SEQ] & " " & [TYPE] & [MO] & " " & [SUB] & " - " & [HOVR - UDP].[SERVICE],
IIf([MinOfCCT] Is Not Null,"I/O DIST CAB " & [UDP - JC CIRCUITS-05-F].[PWR] & " - CCTS " & [MinOfCCT] & " thru " & [MaxOfCCT],IIf([DESCRIPTIO] Is Not Null,[DESCRIPTIO],"Spare")))
When I have tried to do the same thing with date fields it does not work. The function is fine as long as it is not nested.
That is
Rev_col: IIf([Rev_HOVR] Is Not Null,[Rev_HOVR],"")
and
Rev_col: IIf([Rev_Elec_equip] Is Not Null,[Rev_Elec_equip],"")
both work.
But when I combine them into a nested function
Rev_col: IIf([Rev_HOVR] Is Not Null,[Rev_HOVR],IIf([Rev_Elec_equip] Is Not Null,[Rev_Elec_equip],""))
I get an error message "! Data type mismatch in criterial expression"
There is no data mismatch in the original tables from which the information was extracted. The dates are all in DATE/TIME and set to "General"format in the tables.
I am wondering if I will have to use Visual Basic function to combine these fields. However that poses a problem. When I've looked at this I find that runtime VB is no longer available in Access and I do not want to go out and buy it on the offchance that it will work.
Can anyone tell me if there is another solution to my problem?
Hi,
I want a user to click the report, and an input box appears asking for a product number. This product number is used in a recordset (VBA code in the report) to fill the text boxes in the Detail section.
Code:Private Sub Report_Open(Cancel As Integer)Dim rst As DAO.RecordsetDim db As DAO.DatabaseDim itemCode As StringSet db = CurrentDb()itemCode = InputBox("Enter the Item Number", "Complete Catlog Prices")Set rst = CurrentDb.OpenRecordset("SELECT * FROM [Catalog Prices Complete] WHERE Prefixprodno = '" & itemCode & "'", dbOpenDynaset)Do Until rst.EOF Me!txtCat = rst("Volume") 'error 02448 cannot assign to this 'Me!txtPrice = rst("Price") rst.MoveNextLooprst.CloseEnd Sub
I'm sure my text box is called txtCat though. Is it an array I should try to fill? If so, any suggestions :S
Thanks,
Ladies and Gentlemen,
I'm sure you gurus have an answer for me.
I have a MDB (MS Access 97 db) on a shared drive. All my data resides here.
I have a local MDB (MS Access XP db) on my hard disk. Currently, I have queries located on the shared MDB that puts out a table. I then execute queries on my local DB, linking to the table I have on the shared db.
My requirement is this.
1. I want to be able to run queries against the shared db from the local db.
2. When the create table query is run, I would like it to create the table in the local db. I can live with creating the table in the shared db, but local would be better.
I'm sure that this can be done. I've seen it. But, that has always been a client/server system.
Thank you.
i have done a database for a library that enables the user to enter the information about the books and search for it, the administrator have the right to enter the info about the books and edit and search the others have more limited rights depending on which group they belong, i used for the connection (currentProject) because i did all the forms and tables in one DB
a friend from this forum told me and i think he s right, that if i want to put it on the network i have to separate the forms and the tables ie save the tables and the queries on another database that i put on the network
i have a problem
1- im not sure how to connect to another database can i do it like this
Dim conDB as ADODB.connection
set conDB=new ADODB.connection
conDB=openDatabase("the path") or not
2-i have done the result form with a record source (search-query) and then inserted the fields into the form in the design view
can i do that with a query if it was from another database or i need to write it all in code (taking into consideration that i havent found how to insert datacontrols and do the binding, because im using french access, that s why i assigned automatically a record source for the form)
thanks in advance
Hello,
I've searched the web for almost 2 days...and i'm completely lost:
I've got a simple online DB which stores information from a webform (e.g. name, adress, order, etc). Let's say it's called: www.mywebsite.com/onlineDB.mdb
Is it possible to link the online DB to my local DB (e.g. c:localDB.mdb), without downloading it manually?
Or do I have to put the webform information in a MySQL DB and link that one to my online DB?
TIA,
Leon