CIO Tech Eksperten IT-JOB IT-Kurser Events Podcast Søg
Cookie ikon
Avatar billede hein Nybegynder
22. maj 2001 - 10:52 Der er 5 kommentarer og
1 løsning

Formatter til dato

Hvordan formater man en streng/int som denne 20010110 til noget som Access/VisualBasic forstår som en dato.
Tallet 20010110 er trukket ud af en streng med en VB funktion:
Mid(c.CRYPTCERTIFICATE,InStr(1,c.CRYPTCERTIFICATE,\'+4:\')+3,8) AS CertDate
På forhånd tak
Avatar billede proaccess Nybegynder
22. maj 2001 - 10:59 #1
Public Function BeregnDatoFraHeltal(X As Long) As Date
  If X > 0 Then
    Dim Y As String
    Y = Trim(Str(X))
    BeregnDatoFraHeltal = DateSerial(Left(Y, 4), Mid(Y, 5, 2), Right(Y, 2))
  Else
    BeregnDatoFraHeltal = DateSerial(1990, 1, 1)
  End If
End Function
Avatar billede terry Ekspert
22. maj 2001 - 11:02 #2
myDate = Mid(CertDate, 1, 4) & \"/\" & Mid(CertDate, 5, 2) & \"/\" & Mid(CertDate, 7, 2)
Avatar billede terry Ekspert
22. maj 2001 - 11:03 #3
Dim myDate as Date
Avatar billede proaccess Nybegynder
22. maj 2001 - 11:07 #4
And you could use...

Public Function BeregnDatoFraHeltal(lngDato As Long) As Date
  BeregnDatoFraHeltal = DateSerial([lngDato] \\ 10000, ([lngDato] Mod 10000) \\ 100, [lngDato] Mod 100)
End Function

Which still returns the same...
Avatar billede terry Ekspert
22. maj 2001 - 11:13 #5
and....
Avatar billede johs_j Novice
22. maj 2001 - 17:10 #6
format(tal, \"yyyy mm dd\")
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Access kurser
Dyk ned i databasernes verden på et af vores praksisnære Access-kurser
Se alle Access kurser

Flere spørgsmål fra Access kategorien

Titel Indlæg Oprettet Seneste aktivitet
Kan en kombinationsbox formateres om til en text box og omvendt Af per2edb i Access 3 21/11/202418:03 I går 11:38
Tilpasset decimalvisning Af visto i Access 7 12/11/202417:21 13/11/202412:22
Udregning af antal måneder og år Af pouls i Access 9 11/11/202414:55 12/11/202411:42
Gantt Chart Wizard Af per2edb i Access 2 05/11/202417:57 06/11/202410:09
Me.Form.Painting = True/False ore Me.Painting = True/false Af per2edb i Access 3 03/11/202416:41 03/11/202418:05
Se alle spørgsmål i kategorien Opret spørgsmål

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Opret Log ind

Du kan også logge ind via nedenstående tjenester



Alle kategorier på Eksperten
Seneste spørgsmål Seneste aktivitet
I dag 15:56 Navigation i Peugeot 3-2008 fra 2017 Af arnepedersen i Andet software
I dag 14:10 Outlook henter ikke mails Af TTA i Office & Kontorpakker
I dag 13:58 vise billeder i kartotek med store ikoner inklusive optagelsesdato Af Malm i Billedbehandling
I dag 13:35 Adobe Elements 2019, Organizer Crasher Af mort1 i Billedbehandling
I går 20:49 pop up black friday Af Malm i Virus
White papers
Flere white papers »


Premium
Teaser billede
Vil købe tele-løsninger til det offentlige for 370 millioner kroner
Læs mere »
Efterspørgslen på AI-regnekraft er enorm - og det smitter af på priserne: "Vi kan sælge næsten alt, hvad vi får ind"
Nyt værtøj fra Microsoft: Snart kan du reparere nedbrudte Windows-enheder på distancen
Politiet skriver kontrakt på 75 millioner kroner med dansk it-firma: Medarbejdere skal flytte ind hos politiet
Se alle »
Computerworld
Teaser billede
Microsofts nye pc er ekstrem billig – men kan blive ekstrem sikker og fleksibel
Læs mere »
Test: Prøv kun disse B&O-hovedtelefoner, hvis du har råd
Kæmpe datalæk på hospital: 750.000 patienters fortrolige data lækket
Telegigant klar med AI-baseret mormor: Holder telefon-svindlere fast i røret med sniksnak og dumme spørgsmål
Se alle »
CIO
Teaser billede
Konsulenthus vil rulle Microsoft 365 Copilot ud til 200.000 ansatte
Læs mere »
Kæmpe-opgave for Danske Bank har banet vej for fuldautomatiseret migrering til cloud: Nu udbredes metoden i hele AWS
Microsofts store årlige event: De tre vigtigste nøglebudskaber fra Satya Nadella om Microsofts fremtid
Tre vigtige erkendelser, som Computerworld tog med hjem fra Gartners store topmøde i Barcelona
Se alle »
Job & Karriere
Teaser billede
Microsoft klar med ny direktion for den danske forretning: Her er de nye direktører
Læs mere »
Efter skelsættende møde med sportscoach: Stor dansk it-arbejdsplads indfører fredags-fri og isbade i arbejdstiden
Linus Torvalds giver russiske Linux-udviklere sparket: Vil ikke have noget med dem at gøre
Topchef Sara Green mener, at der er brug for et radikalt nyt syn på it-ledelse - særligt én ny trend hader hun som pesten
Se alle »
White paper
Teaser billede
Styrk compliance, sikkerhed og overblik med ét hug
Læs mere »
Vær proaktiv og prioritér IT-sikkerheden – før det er for sent
Sæt turbo på din cloudperformance og minimér risikoen for DDoS-angreb
Sikkerhed uden grænser: Cisco Hypershield
Se alle »

Events
Flere events »
White papers
Flere white papers »
IT-Kurser
Se alle vores it-kurser »