Solved

convert a General Date into an ID

Posted on 2004-03-26
9
276 Views
Last Modified: 2008-03-06
I need to convert a General Date (3/25/2004 3:16:34 PM) into a string or Intiger to be used as
an ID ei: 325200431634

I have tried a couple different things but nothing works....any ideas?
the Date is stored in the field "Date_and_Time_Of_Occurance"
0
Comment
Question by:Sebastian_c
9 Comments
 
LVL 65

Expert Comment

by:rockiroads
ID: 10687813
use the format command

sID = Format(myDate,"MMDDYYYYNNMMSS")
0
 
LVL 65

Expert Comment

by:rockiroads
ID: 10687822
sorry, that should be HHNNSS not NNMMSS

0
 
LVL 54

Expert Comment

by:nico5038
ID: 10687935
When just an ID is needed, simply change the date into a number field. :-)

It will have decimals for the hours/minutes/sec part, but an update query with * 100000 can "remove" that when needed.

Nic;o)
0
Use Case: Protecting a Hybrid Cloud Infrastructure

Microsoft Azure is rapidly becoming the norm in dynamic IT environments. This document describes the challenges that organizations face when protecting data in a hybrid cloud IT environment and presents a use case to demonstrate how Acronis Backup protects all data.

 
LVL 4

Expert Comment

by:goliak
ID: 10687964
You can simply manually change the data type of your field to double or single type. The result slightly reminds a date but you'll get an ID field. Also that field easely converts back to Full Date.
0
 

Author Comment

by:Sebastian_c
ID: 10687983
Thats works great! BUT when I use Date, it gives a number 03262004000000
What happened to the HHMMSS?
BTY You get the points rockiroads!
0
 

Author Comment

by:Sebastian_c
ID: 10688303
How do I declair General Date in the eqation:

sID = Format(myDate,"MMDDYYYYNNMMSS")
0
 
LVL 65

Accepted Solution

by:
rockiroads earned 30 total points
ID: 10688527
did your date have a time in it? dump your date you wish to convert

if you look in help on the Format command, there are plenty of types you can change it to

when you mean declare Generate Date in the equation, what do you mean? do you want to return a General Date?

you can use Format(myDate,"General Date")

but basically, format takes any date or date/time and formats it to any style you want (again, see help for otpions)


some examples
Dim MyTime, MyDate, MyStr
MyTime = #17:04:23#
MyDate = #January 27, 1993#

' Returns current system time in the system-defined long time format.
MyStr = Format(Time, "Long Time")

' Returns current system date in the system-defined long date format.
MyStr = Format(Date, "Long Date")

MyStr = Format(MyTime, "h:m:s")    ' Returns "17:4:23".
MyStr = Format(MyTime, "hh:mm:ss AMPM")    ' Returns "05:04:23 PM".
MyStr = Format(MyDate, "dddd, mmm d yyyy")    ' Returns "Wednesday,
    ' Jan 27 1993".
' If format is not supplied, a string is returned.
MyStr = Format(23)    ' Returns "23".

' User-defined formats.
MyStr = Format(5459.4, "##,##0.00")    ' Returns "5,459.40".
MyStr = Format(334.9, "###0.00")    ' Returns "334.90".
MyStr = Format(5, "0.00%")    ' Returns "500.00%".
MyStr = Format("HELLO", "<")    ' Returns "hello".
MyStr = Format("This is it", ">")    ' Returns "THIS IS IT".

0
 

Author Comment

by:Sebastian_c
ID: 10689066
Thank you rocki!
I ended up using: sID = Format(Time, "MMDDYYYYHHMMSS")
which gives me a unique number each time...

Sebastian
0
 
LVL 65

Expert Comment

by:rockiroads
ID: 10689149
ok, just to note, did you lose the leading zero?
if you did and you dont want to lose it, how about putting YYYY first, just a thought

0

Featured Post

Three Reasons Why Backup is Strategic

Backup is strategic to your business because your data is strategic to your business. Without backup, your business will fail. This white paper explains why it is vital for you to design and immediately execute a backup strategy to protect 100 percent of your data.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Suggested Solutions

It’s been over a month into 2017, and there is already a sophisticated Gmail phishing email making it rounds. New techniques and tactics, have given hackers a way to authentically impersonate your contacts.How it Works The attack works by targeti…
Preparing an email is something we should all take special care with – especially when the email is for somebody you may not know very well. The pressures of everyday working life stacked with a hectic office environment can make this a real challen…
Familiarize people with the process of utilizing SQL Server stored procedures from within Microsoft Access. Microsoft Access is a very powerful client/server development tool. One of the SQL Server objects that you can interact with from within Micr…
In Microsoft Access, learn the trick to repeating sub-report headings at the top of each page. The problem with sub-reports and headings: Add a dummy group to the sub report using the expression =1: Set the “Repeat Section” property of the dummy…

810 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question