I have soem code that is looking at the Comm port on my laptop....I had this code working great about 9 months ago. I dont know what has changed besides me moving to another laptop.
I dont know if I am missing a reference to a llibrary or what. I think I am....
Right now I am bombing out on the First Line....
DOES ANYONE HAVE ANY IDEAS HERE....
ERROR:
Run time error 424
Object Required
CODE:
MSComm7.InBufferCount = 0 'Flush the Buffer
If (Not MSComm7.PortOpen) Then
Dim Instring As String ' Buffer to hold input string
MSComm7.CommPort = 1 ' Use COM1.
MSComm7.Settings = "9600,N,8,1" ' 9600 baud, no parity, 8 data, and 1 stop bit.
MSComm7.InputLen = 0 ' Tell the control to read entire buffer when Input is used.
MSComm7.PortOpen = True ' Open the port.
MSComm7.Output = "AT" & vbCr ' Send the attention command to the modem. Ensure that the modem responds with "OK".
Buffer$ = Buffer$ & MSComm7.Input ' Wait for data to come back to the serial port.
'MsgBox "SMS Port Open", vbOKOnly, "Port State"
Else
'MsgBox "SMS Port Already Open, It is now closing, and will re-open", vbOKOnly, "Port State"
MSComm7.PortOpen = False
'MSComm7.PortOpen = True
Call Command8_Click
End If
I need to send commands to an external device using a serial port.My understanding is that that I need to select the reference to the Microsoft Communications Control (MScomm32.ocx).But is not available in the list of references!
I have a lotus datbase at work and there are far to many conflicts with XP. I am trying to make an access database but keep getting as far as the calculations and then give up.
I have a ships data base. I am trying to calculate totals for each vessels cargo. Some vessels have more than one cargo. eg A Shell Oils vessel may have Diesel, Unleaded or Leaded Fuel on the one trip.
I have been able to get these totals to work b4 but I forget how I did it. If I calculate Cargo1+Cargo2 + Cargo 3 I get 100200300
The other problem that I have is that the totals do not appear in the corresponding table and so I am not able to use totals in query or report.
eg Form Cargo Cargo Tonnage 100 Cargo 1 Cargo Tonnage 1 200 Cargo 2 Cargo Tonnage 2 300 Cargo Total 100200300 :mad: Am I going about this form in the correct way or am I totally going against the grain of access?
I have a few questions which I hope you all can help point me in the right direction.
A little background is in order. What I am trying to accomplish is Read the NMEA string passed to the Com Port 1 of a laptop from a Trimble GPS Unit. Once I have the string I need to parse it ang place the Lat Long in a couple fields in my Access Database. First off I have to capture the string from the Com Port.
Does anyone have any suggestions of where I can start to learn the code needed to read the Com Port 1 to retrieve the NMEA String pushed from the GPS Unit?
How can I do this from within an Access Database?
If I can get the string returned to a variable that would be great. From what I heard other people were writing this to a file?
My database is in database where we do the editing and using Access for query reports.
Upon importing from External Data Link to the data source by creating a linked table: the table was created but running a query yields the above error.
I'm having an issue with the database being read only and a type mismatch due to OpenRecordset. I know this database use to work when it when it was just
CurrentSerNum = RecSet(0) +1 was doing the incrementing.
I need the database to increment in a different way now.
Q=manufacture location 1st number is new=0 or used=1 2nd and third number =82 4th is single digit year aka 2015 = 5 6 and 7th are work week aka 25 for this week 8,9,10 are incremental numbers for the units made that workweek, so 001,002,003. Then week 26 starts the increment starts back at 001.
Code: Private Sub MakeThoseProducts_Click() On Error GoTo Err_MakeThoseProducts_Click Dim NumericSerial As Double Dim WorkWeek As String Dim WorkYear As String Dim WorkWeekNumber As Integer Dim WorkYearNumber As Integer Dim Location As String
Is any body know how to retrieve the manufacturer's hard disk serial No.? I want to use it in my access application to avoid piracy. At present I am useing a code which gives me Volume serial No., which got changed when ever my user format his hard drive. Instead of HDD firmware serial, code for retrieval of any other permanent No. like mother board or CPU firmware serial can help me to solve my problem
I've searched through the forum looking for what i want to do with no luck so hopefully one of you kind people could help.
I'm setting up a DB that logs in a batch of parts to which i generate a batch no. As the batch progressess through the works when a problem arises we generate fault records (I've set up another table for this and linked the batch no fields together). I want to put a serial no. on this form consisting of 'year' 'batch No.' and ?'Auto number'? From reading posts is it best to put the 3 items in seperate fields (less hassle)
My 2 questions are
1, how do i extract just the year from a date field?
2, This is the main problem. The auto number. If i use auto number to generate a unique number to log the record the number will be massive in no time at all. This is fine as the unique identifier for the record in a table but not for the serial number of the printed report. Idealy I want to have the batch number then a serial number that resets to 1 on a different batch No. For example
21098/1 21098/2 Batch No./serial No. 21098/3
22309/1 22309/2 22309/3
Just some more info this database is a multi user database split front and rear.
I hope i've explained this well enough, many thanks for your help in advance
I want a field to be a serial number made up of a letter of the alphabet followed by 3 digits. I want the digits to increase by 1 in each of the following record. For Example the serial number in the first record would be A001, then followed by A002, A003, ....., A142, A143, A144 & so on. I am fairly new at Access but I have experimented with AutoNumber, it won't work if the Field is not a pure mumber, can't get autonumbering to happen if I treat the field as text. I don't know where to go from here.
I have the following code for the text field (Before Update)
If IsNull(Me![DyNo]) Then Me![DyNo] = Format(Nz(DMax("[DyNo]", "[tblAllDet]", "[TheYear]='" & Year(Date) & "'"), 0) + 1, "00000") End If Me![DyNo] = Format([DyNo], "00000")
The code starts giving numbers from 00001, 00002, 00003 and so on. The problem was that when I have to search, I have to type the zeros before the number i.e. 00007, 00008 etc. otherwise the search form doesn’t show the relevant record. Ideally, I would like the numbering system to be 1, 2, 3, etc. (without the zeros). I tried changing the code to “0” but with the single “0”, I am unable to insert records beyond No.10. Is there a way to change this code so that I get only 1, 2, 3 etc and not with preceding zeros ? Grateful for help.
Hi, I have been trying to make a datbase so I can input the serial number of an electronic device (cell phone boards) , and also would like to be able to add additional info about the device. Most importantly I have to be able to "search" for the device by typing the serial number in a search box.
So lets say I have serial number 11111, 11112, 11113, 11114 listed in the database as "intermittent power failures", before I use the device I can type the serial number in the database and be able to recall the details. So if I type in 11119 and no hits come back, I know that one is not in the system yet; meaning it ethere does not have a problem, or the problem has not been discovered yet. If I type in 111111 for example, it would come back as a hit, saying it has an "intermittent power failure" problem. I have spent about 4 hours messing with access, I used it a while back in office 03, however I have never did anything like that, and to make things further complicated we now only have office 07. Does anyone have a template which is similar (I can modify the values) or know how to assist me to be able to create a database like this?
I'm in the process of streamlining the process to maintain our various access reports and queries.
My company's accounting software stores all record dates in Gregorian Serial format (don't ask me why). Currently for our reports we have a local hard-coded table that is manually updated periodically with dates in MM/DD/YYYY format and the coresponding Gregorian serial date number. To go from date to serial is a fairly straightforward access function of:
(Datediff('d','1/1/2000',[Date to convert])+730120)
For example if [Date to convert] was 2/7/2006 the output would be 732349. That's all well and good, however I am in need of a query I can build that will on the fly generate a list from say 1/1/1997 through 1 year after day being run just to be safe with two columns, one with date and one with the serial date equivelant so I can link to the accounting tables for date restrictions.
This way I just have to have the equation in one query instead of a hard coded table or do the calculation in every form or query that needs to look up these tables.
Unfortuantely I've been staring at accounting data (and am not an accountant) way too long and my brain is fried, suggestions?
I have a Mitutoyo device that can be connected to a variety of Mitutoyo measuring instruments (in my case, it's a micrometer.) When triggered, the device obtains a measurement value from the instrument. One can view this value via serial communication in a program like HyperTerminal.
Is it possible to input these values directly, or indirectly, into Access?
I have seen some API that gets the serial of the hard drive, but this information is not unique and changes when the volume is formated. Does any one know of a way to return the orignal manufucture's information/serial which is unique(GUID) to the volume. Any Idea will be highly appreciated.
Hi, I have a table that uses SerialNo as primary key. From time to time (its a long story...) I need to go in and update the SerialNo by adding x to it. Here's the problem: lets say the table has SerialNo's 1,2,3,4,5, and I try to add 1. I get 4 KV error's because of course, 2,3,4,5 already exist in the table. (So I would end up with 1,2,3,4,6 instead of 2,3,4,5,6.)
I really thought that Access should be smart enough to figure out that there really won't be any key violations after the updates are done, but I guess not.
I would like to produce a serial which will have 4 members.The first, the second and the fourth members will be always CAPITAL Letters and the thirth one is always NUMBER.Here is an example for the format: AC3H
Each member will change in any line and never match... I would like to produce it by a button or a button for each one.The last important point for this issue is; I would llike to identfy the total number of serials.
Using MS Access 2010 I'm attempting to put together a simple database mainly tracking dates and availability. That said I'm just not smart enough to figure out why I cant get one date in a form to display as a serial date.
Example date picker included in Access 2010 places the date of 3/20/2013 in one field and I want another field to look at that and show the serial date ie.. 20130320190912. I've achieved this in Excel somehow long ago.
Everything is going well, when i make a transc ,transcid generated
i,e 1,2,3,to 47,48,49,50 and so on. In this case there are minimum 50 transaction on daily bases,
Here i have an idea that daily after 11.59pm, I mean after changing date, when I make a transaction, transaction id or sequence no start from 1, and my last day data will also remain safe .
This is what I am trying to accomplish I need to be able to create a serial number which automatically resets every day so I may use it to easily know how many records were created per day, without running a report.
I have a table that has a field for SerialNumberStart and QtyRequired, from those two I have a calculated field for the SerialNumberEnd.
I want to print a report from this table that if for example I have StartSerialNumber 34 and SerialNumberEnd 40 prints one report for each serial number.
I am working in ms access database form. I have a form with detail section. In detail section i would like to make sr.no field auto increase each time new quotation is created. Using AutoNumber didn't work because because it doesn't start the serial number from 1 for each new quotation.
I have a simple database that I put my execptions in for the day for scanning. Is there a way that my serial field on my forum can check to see if someone already scanned that serial for that day using the "On Lost Focus" event.
I am using an access program with a form with detail section. I would like to create auto sr.No when i am creating a new quotation. Using Autonumber didn't work because it start numbering from last quotation.
