Avatar billede freud Nybegynder
08. september 2004 - 16:08 Der er 13 kommentarer og
2 løsninger

udtræk af dato men visning af dag

har følgende udtræk af min db

- rs("KalenderStartdato") som måske indeholder: 08-09-2004

R det mulige at lave noget kode som "konvatere" denne dato til

Onsdag d. 8 September 2004

?
Avatar billede Jman Praktikant
08. september 2004 - 16:23 #1
TmpDato = rs("KalenderStartdato")
FormatDateTime(TmpDato, vbLongDate)
Avatar billede freud Nybegynder
08. september 2004 - 16:27 #2
- superior

får følgende fejl medd.

Der kan ikke bruges parenteser ved kald af en Sub

line 72, column 35
FormatDateTime(TmpDato, vbLongDate)
Avatar billede Jman Praktikant
08. september 2004 - 16:30 #3
Den virker fint hos mig :)

Hvad hvis du udskriver din dato:

TmpDato = rs("KalenderStartdato")
response.write TmpDato
'FormatDateTime(TmpDato, vbLongDate)
Avatar billede Jman Praktikant
08. september 2004 - 16:30 #4
Har du smidt den ind i noget kode rundt om .. ?
Avatar billede freud Nybegynder
08. september 2004 - 16:42 #5
- superior

med denne kode:

TmpDato = rs("KalenderStartdato")
response.write TmpDato
'FormatDateTime(TmpDato, vbLongDate)

udskriver den jo bare det resultat som jeg hele tiden har haft, f.eks.08-09-2004 og ikke Onsdag d. 8 September 2004 som ønsket
Avatar billede Jman Praktikant
08. september 2004 - 16:45 #6
ja, ja - men jeg ville bare vide om der i det hele taget var noget i rs("KalendeStartDato")
Og det var der - så skal formatDateTime også virke.. med mindre det ligger inde i noget andet kode..
Prøv evt. at poste noget mere kode herinde
Avatar billede freud Nybegynder
08. september 2004 - 16:47 #7
lidt mere kode :-)

    <b><%= rs("KalenderTitel") %></b><br><br>
    <%
    Temptekst = rs("KalenderTekst")
    Tekst = replace(Temptekst, vbCrLf, "<BR>")
    %>
    <%= Tekst %>
    <%= rs("KalenderTekst") %><br><br>
    <font size="-2">
    Oprettet af: <%= rs("KalenderBN") %><br><br>
    Startdato: <%= rs("KalenderStartdato") %><br><br>
    Slutdato: <%= rs("KalenderStartdato") %><br><br>
    Tidspunkt: <%= rs("KalenderTidspunkt") %><br><br>
    Sted:
    <%
    Tempsted = rs("KalenderSted")
    Sted = replace(Tempsted, vbCrLf, "<BR>")
    %>
    <%= Sted %>
    </font><br><br>
    <%
TmpDato = rs("KalenderStartdato")
response.write TmpDato
FormatDateTime(TmpDato, vbLongDate)    %>
Avatar billede freud Nybegynder
08. september 2004 - 16:49 #8
fejl kode:

Fejltype:
Der opstod en Microsoft VBScript-kompileringsfejl (0x800A0414)
Der kan ikke bruges parenteser ved kald af en Sub
......kalender_oversigt.asp, line 72, column 35
FormatDateTime(TmpDato, vbLongDate)
----------------------------------^
Avatar billede Jman Praktikant
08. september 2004 - 16:58 #9
Der må være noget alt andetsteds (mere kode, tak)  ;)
se evt. www.provenceweb.dk/testid.asp  -  der har jeg afprøvet det og det virker
Avatar billede freud Nybegynder
08. september 2004 - 17:08 #10
- superior

Du har ret , nu virker det pludselig også her , underligt !!! -

Der er bare en lille ting mere, den viser ikke dagens navn, er det muligt ?

viser nu: 8. september 2004

Skal helst vise: Onsdag 8. September 2004
Avatar billede Jman Praktikant
08. september 2004 - 17:41 #11
Det kan skyldes at der lå noget i cachen - husk altid at opdatere dine rettelser med ctrl+f5 (så tømmer du samtidig cachen)
M.h.t. dagen, så skal du lave et opslag på selve dagen - kigger lige efter et eksempel
Avatar billede Jman Praktikant
08. september 2004 - 17:59 #12
hmm..ved ikke helt hvorfor, men andre sprog viser den korrekt dagen - bare ikke dansk
Så vbLongDate er den rigtige, men den kan åbenbart bare ikke vise dansk ugedag
Avatar billede Jman Praktikant
08. september 2004 - 18:04 #13
Denne kan gøre det (lidt kringlet)

TmpDato = rs("KalenderStartdato")

ugedag =  weekday(TmpDato)
if ugedag = "1" then ugedag = "Søndag"
if ugedag = "2" then ugedag = "Mandag"
if ugedag = "3" then ugedag = "Tirsdag"
if ugedag = "4" then ugedag = "Onsdag"
if ugedag = "5" then ugedag = "Torsdag"
if ugedag = "6" then ugedag = "Fredag"
if ugedag = "7" then ugedag = "Lørdag"

response.write ugedag & " d. " & FormatDateTime(TmpDato, vbLongDate)
%>
Avatar billede freud Nybegynder
08. september 2004 - 18:27 #14
- superior

Tusinde tak for hjælp :-)
Avatar billede Jman Praktikant
08. september 2004 - 18:29 #15
no prob
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
Kurser inden for grundlæggende programmering

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.

Du kan også logge ind via nedenstående tjenester