I have two tables linked to each other in one to many relationship. Instead of auto number, the date and shift (Text) is being used as the primary keys (Composite Primary Key). Here is the tables structures,
The tables Payouts and Bills has one to many relationship. One payout row can have many bills. The problem is that I want to start the Autonumber in bills table everyday from 1. As date and shift are different for every day so even if i start bills from 1 everyday, it wont make same primary key. I can do it manually but I want to make it automatically.
First of all thanks alot for investing your valuable time in reading my query, I wonder if someone can kindly educate me on how to convert an access database.mdb file to an executable .exe file. Also is there a way to create an installation package to install the database to many Computers.
I have a dbase that was created in access XP. We are in the process of upgrading to office 2003. For the most part the database works fine. However, I have 1 form that has a few fields that have conditional formatting on them and when the form opens those fields flash very fast continuously all most like the tab key is being held down. No matter what I do I can't get it to stop. Has anyone seen anything like this and how do I make it stop?
This error is usually associated with compiling a large database into an MDE file.* Due to the method used to compile the database, a considerable number of TableID references are created for each table.* The Microsoft Jet database engine version 4.0 can only create a maximum of 2048 open TableIDs at one time.* Exporting a database as an MDE potentially can exceed this limit if the database has a large number of objects (table, macro, form, report, etc). There is no accurate method to estimate the number of TableIDs the Jet database engine uses during the process of compiling a database as an MDE.* However, each VBA module and each form uses one TableID, as a result, if the database has 500 forms, and each form's HasModule property is set to Yes, as many as 1,000 TableIDs are used. More information about this error message online.
My database is by no means big, is there any other way i can convert from mdb to mde?
Hi. For years several agencies have used a database written and maintained in Access 97. One adminstartor has both 97 and 200 on his computer and no problem. Until now, that is. When I try copying a revised front end, and opening it, I get 'unrecogized database format' message. My hunch i sthat said administartor accidentally opned the basck end with 2000 and converted it.
So, can the back end be unconveted/reverted back to 97? Any other suggestions?
I have a problem converting access 97 mdb files into access 2000. There are multiple access databases that use a mdw workgroup on a network drive. I do have the ability to log on as an admin. Access 2000 is not letting me convert the files to the new format (telling me I don't have permission). The databases do have lots of forms, queries, macros and such.
Would the easiest method be to remove the userlevel security or is it possible to get around that? If I were to remove the user level security is it as simple as loggin in as admin, deleting all user account, granting all permissions to users and admin and removing the password?
I am currently compiling an Access DB to manage my work in progress, Payments due etc.
The DB is starting to work well and have requests from fellow contractors to purchase a copy (there are over 400 subcontractors in the group), with this in mind I have decided that when I complete the DB I will take it to a proffessional programmer and have it converted to a fully standalone programm.
My question: Is there a programm format that is preferable or would C# be the best option or is there a product out there that I could purchase and use.
I'm trying to get a way to creat a database of my phone messages (SMS). I have them on a .txt file and I would like to create on ACCESS (or other program) the fields "Date:" "From:" "Message:", etc. So, everytime I introduce a day, all sms sended on that day appears, or, when I introduce a Name, every message from that person, appear. Is that possible? Of course that I want to convert it, not introduce one bye one because I have around 2000 messages...
Thank you very much
This is a example of the .txt file I have:
================================================== ========= Message type: SMS From: 0: Maria Date: quinta-feira 03 Maio 2007 15:33 ----------------------------------------------------------- Hum que bom então. Tou com a minha amiga na praça da república. Vais ficar aí? ================================================== ========= ================================================== ========= Message type: SMS From: Figueiredo 0: Maria Date: quinta-feira 03 Maio 2007 14:59 ----------------------------------------------------------- Tas em casa?a mariana foi aí? ================================================== ========= ================================================== ========= Message type: SMS From: Figueiredo 0: Maria Date: quinta-feira 03 Maio 2007 14:52 ----------------------------------------------------------- Já tá? ================================================== ========= ================================================== ========= Message type: SMS From: 0: Maria Date: quinta-feira 03 Maio 2007 12:47 ----------------------------------------------------------- Desce tou no carro em frente ao mc donalds.. ================================================== =========
I have time sheets from the past I need to enter but have found that some years the time punch minutes are given as if an hour equals 100 minutes not 60. Other years the minutes are given correctly. How do I format this field so that if I type 3.75 it will convert to 3.45 hours? Will I have to add another field to enter this and then convert to my field where hours and minutes are correctly entered? :confused:
Could someone tell me is it possible to convert a particular column from 0/-1 to show y/n instead? Its just a simple select statement I'm doing and I need a Y or N instead or numeric!
MAX(IIf([Book]='C',[Score]," ")) AS CScore, Max(IIf([Book]='C',[PercentileScore]," ")) AS CPercent, Max(IIf([Book]='C',[PassFail]," ")) AS C, Max(IIf([Book]='D',[Score]," ")) AS DScore, Max(IIf([Book]='D',[PercentileScore]," ")) AS DPercent, Here is what I thought may work, but it seems like there should be an easier way Case when Max ([Book]) = 'C' then [Score] else null as CScore, Case when Max([Book]) = 'C' then [PercentileScore] else Null as CPercent, Case when Max ([Book]) = 'C' then [Passfail] else Null as C, Case when Max([Book]) = 'D' then [Score] else Null as Dscore, Case when Max ([book]) = 'D' then [PercentileScore] eslse Null as DPercent,
I am trying to convert a whole number to a start time w/ no luck. Assuming "0" is 12:00 AM, I have a start minute of "480" which would in essence be 8:00 AM. Can anyone tell me if I can somehow convert this to time in my query? Thanks.
I have a table that has fields that captures dollar amounts. I have these fields set to a default value of "0".
The tables are updated via a query that imports a csv file. Once the import process has finished, my table has blank values in some of the fields that capture dollar amounts.
If a field populated by the csv file is left blank, I would like for the field to show $0.00.
When trying to convert my MDB database to and MDE database I get the following error pop-up...
"Microsoft Office Access was unable to create an MDE database"
I am using 2003 and the database is tiny at about 6 tables, 10 forms, 100 controls.
The error message help is useless but I include it here for what its worth...
Quote: This error is usually associated with compiling a large database into an MDE file.* Due to the method used to compile the database, a considerable number of TableID references are created for each table.* The Microsoft Jet database engine version 4.0 can only create a maximum of 2048 open TableIDs at one time.* Exporting a database as an MDE potentially can exceed this limit if the database has a large number of objects (table, macro, form, report, etc). There is no accurate method to estimate the number of TableIDs the Jet database engine uses during the process of compiling a database as an MDE.* However, each VBA module and each form uses one TableID, as a result, if the database has 500 forms, and each form's HasModule property is set to Yes, as many as 1,000 TableIDs are used. More information about this error message online. End-Quote
In access, I have a database stored in a .mdb file. I tried converting to a .mde file through Tools -> Database Utilities -> Make MDE file, but whenever I do, Access freezes. Another .mdb file is created, but no .mde file is there, and when I try to open this mdb file, I get a "file not found" error. I tried rebooting the computer, but no success. Please tell me what's going on?
I have a program abc.mdb and abc.mde, I made some changes to the codes in abc.mdb and now I have been trying to convert the access file from abc.mdb to abc.mde so that the users are able to use the updated file. However, whenever I make MDE file. It doesnt work but creates another file called db1.mdb instead.
i have searched /researched and looked at hundreds of posts, and no luck.
Im litlle bit out of my depth, i have posted this before but just got confused.
i have two update querys, the first one identifys if a persons age (by date of birth) is under 16 a check box identifys if this person is "ticked" as junior.
the second update query identifys by (date of birth) if the person is over 16 a check box identifys if this person is "ticked" as senior.
The results are returned into my main query in two columns, these columns return -1 or 0 for junior or senior.
I need to produce a report that returns J or S (Junior or Senior) is there a way of converting these results to one column and converting the -1, 0 to J or S.
Please see attached file.
very lost, still searching for the answer. been on this foe three weeks now.
trying to convert to 2003 format and I get conversion errors. They are in 2 tables. 1-customers table says -1605:could not find field "description" 2-orders table says -1522: No unique index found for the refrenced field of the primary table.
Can anyone help? I can get in to create new reports & quiries, but if want to add orders to customers it will not let me.
I have been informed by an off-site program of ours (out of state) that they need to convert an Omniform application to Access.
I did an initial search on the web on Omniform but I really don't know anything about it.
Has anyone every converted an Omniform application to Access? Is this something that can be done in an automated way or would the Access db need to be made from scratch?
I am creating a database which has an invoice printing form. In that I would like to have a column for the total amount in words. I have got a sample module from northwind database. According to that 100,000 is "one hundred thousand" but in my country that is pronounced as " 1 Lakh" and for one million it is 10 lakh, for 10 million it is 1 crore like that. Is that possible to change the code in that module to display the words according to our standards? I am attaching the code with this thread. If anybody can show how to do that...I will be thankful to them..
Thanks
Function ConvertCurrencyToEnglish(ByVal MyNumber) Dim Temp Dim Dollars, Cents Dim DecimalPlace, count
' If we find decimal place... If DecimalPlace > 0 Then ' Convert cents Temp = Left(Mid(MyNumber, DecimalPlace + 1) & "00", 2) Cents = ConvertTens(Temp)
' Strip off cents from remainder to convert. MyNumber = Trim(Left(MyNumber, DecimalPlace - 1)) End If
count = 1 Do While MyNumber <> "" ' Convert last 3 digits of MyNumber to English dollars. Temp = ConvertHundreds(Right(MyNumber, 3)) If Temp <> "" Then Dollars = Temp & Place(count) & Dollars If Len(MyNumber) > 3 Then ' Remove last 3 converted digits from MyNumber. MyNumber = Left(MyNumber, Len(MyNumber) - 3) Else MyNumber = "" End If count = count + 1 Loop
' Clean up dollars. Select Case Dollars Case "" Dollars = "No Dollars" Case "One" Dollars = "One Dollar" Case Else Dollars = Dollars & " Dollars" End Select
' Clean up cents. Select Case Cents Case "" Cents = " And No Cents" Case "One" Cents = " And One Cent" Case Else Cents = " And " & Cents & " Cents" End Select
ConvertCurrencyToEnglish = Dollars & Cents End Function
Private Function ConvertDigit(ByVal MyDigit) Select Case Val(MyDigit) Case 1: ConvertDigit = "One" Case 2: ConvertDigit = "Two" Case 3: ConvertDigit = "Three" Case 4: ConvertDigit = "Four" Case 5: ConvertDigit = "Five" Case 6: ConvertDigit = "Six" Case 7: ConvertDigit = "Seven" Case 8: ConvertDigit = "Eight" Case 9: ConvertDigit = "Nine" Case Else: ConvertDigit = "" End Select
End Function
Private Function ConvertHundreds(ByVal MyNumber) Dim result As String
' Exit if there is nothing to convert. If Val(MyNumber) = 0 Then Exit Function
' Append leading zeros to number. MyNumber = Right("000" & MyNumber, 3)
' Do we have a hundreds place digit to convert? If Left(MyNumber, 1) <> "0" Then result = ConvertDigit(Left(MyNumber, 1)) & " Hundred " End If
' Do we have a tens place digit to convert? If Mid(MyNumber, 2, 1) <> "0" Then result = result & ConvertTens(Mid(MyNumber, 2)) Else ' If not, then convert the ones place digit. result = result & ConvertDigit(Mid(MyNumber, 3)) End If
ConvertHundreds = Trim(result) End Function
Private Function ConvertTens(ByVal MyTens) Dim result As String
' Is value between 10 and 19? If Val(Left(MyTens, 1)) = 1 Then Select Case Val(MyTens) Case 10: result = "Ten" Case 11: result = "Eleven" Case 12: result = "Twelve" Case 13: result = "Thirteen" Case 14: result = "Fourteen" Case 15: result = "Fifteen" Case 16: result = "Sixteen" Case 17: result = "Seventeen" Case 18: result = "Eighteen" Case 19: result = "Nineteen" Case Else End Select Else ' .. otherwise it's between 20 and 99. Select Case Val(Left(MyTens, 1)) Case 2: result = "Twenty " Case 3: result = "Thirty " Case 4: result = "Forty " Case 5: result = "Fifty " Case 6: result = "Sixty " Case 7: result = "Seventy " Case 8: result = "Eighty " Case 9: result = "Ninety " Case Else End Select
' Convert ones place digit. result = result & ConvertDigit(Right(MyTens, 1)) End If