Julekalender..

Kan ikke hjælpe dig, men lytter med;)

lytter med ;-)

Det kunne være en glimrende idé at lave det med fornavne som dato:

0112.jpg,0212.jpg, eller noget lign.
Og så kan man jo passende få serveren til at styre adgangen/ lave links til filerne, når de matcher med datoen der hentes.
Det kræver jo bare at sørge for det rigtige datoformat..
Et konkret script har jeg ikke...

Søren

Jeps, det ville nemlig være genialt..

Så mangler der bare et script... :-)

Såååå det jul igen.. :o)

Tupsy!!

Function ConvertDate(dtmDate,intFormat)
\' intFormat kan have 2 værdier. 0 eller 1
\' 0 = Returnerer dato og tid
\' 1 = Returnerer kun dato

Months = right(\"00\" & DatePart(\"m\", dtmDate) ,2)
Days = right(\"00\" & DatePart(\"d\", dtmDate) ,2)
Hours = right(\"00\" & DatePart(\"h\", dtmDate) ,2)
Minutes = right(\"00\" & DatePart(\"n\", dtmDate) ,2)
Seconds = right(\"00\" & DatePart(\"s\", dtmDate) ,2)


OutDate = DatePart(\"yyyy\", dtmDate) & Months & Days
OutTime = Hours & Minutes & Seconds

If intFormat = 0 Then
    strOut = OutDate & \"-\" & OutTime
ElseIf intFormat = 1 Then
    strOut = OutDate
End If

ConvertDate = strOut
End Function


Timenow = ConvertDate(NOW,1)

<a href=\"<% Timenow & \".jpg\"%>\">Dagens låge</a>

Det kan jo gøres meget mere avanceret.

Søren

Du kan jo bare slette det du ikke vil bruge. F.eks. behøves år måske ikke...

Syntes ikke liiige jeg kan få det til at virke... :-/

Vender tilbage lidt senere...

Kan du ikke prøve at lave en test side og så smide et link??

Tupsy!!

Du skal jo have filen til at matche outputtet.
Og da jeg bruger NOW, kan du ikke regne med at du kan åbne nogen låge idag, medmindre du har et billede der har det navn.
vh Søren Peter

tror sp mener han/hun gerne vil havde et færdigt script.

Jeg glemte lige et \'=\' Det virker nu -prøv selv..
<a href=\"<% =Timenow & \".jpg\"%>\">Dagens låge</a>

Jeg kan kun se selve texten !

he he... Ja den laver dagens link!

Der skal selvfølgelig være <% og %> omkring scriptet og så skal linket være uden for dem...

Se SÅ virker det hele MEGET bedre... :-)

Sååå, hvis I vil se den i funktion så slå et smut forbi www.ddsound.dk . Skal vi sige liiiige omkring 1 december?? :-)

(Så må vi bare håbe at jeg når at finde 24 SPÆNDENDE ting at putte bag ved lågerne..)

Tupsy!!

Nu spørger jeg lige dumt: Hvis jeg gemmer ovenstående tekt ordret i f.eks. \"julekalender.htm\", får jeg skrevet det ud på skærmen som teksten ovenover.

Forsøger jeg at putte det ind imellem

<html>

<body>DIN KODNING</body>
</html>

får jeg stadig din kodning at se. Hvad gør jeg galt?

Dette er hvad jeg får at se:


Function ConvertDate(dtmDate,intFormat) \' intFormat kan have 2 værdier. 0 eller 1 \' 0 = Returnerer dato og tid \' 1 = Returnerer kun dato Months = right(\"00\" & DatePart(\"m\", dtmDate) ,2) Days = right(\"00\" & DatePart(\"d\", dtmDate) ,2) Hours = right(\"00\" & DatePart(\"h\", dtmDate) ,2) Minutes = right(\"00\" & DatePart(\"n\", dtmDate) ,2) Seconds = right(\"00\" & DatePart(\"s\", dtmDate) ,2) OutDate = DatePart(\"yyyy\", dtmDate) & Months & Days OutTime = Hours & Minutes & Seconds If intFormat = 0 Then strOut = OutDate & \"-\" & OutTime ElseIf intFormat = 1 Then strOut = OutDate End If ConvertDate = strOut End Function Timenow = ConvertDate(NOW,1)

Dagens låge

Du skal bare gemme det som .asp istedet for .htm

For det første er det ASP/Vbscript. Derfor skal den ikke hedde julekalender.htm, men julekalender.asp.

For det andet skal dit webhotel understøtte Active Server Pages.

For det tredje skal scriptet selvfølgelig ikke bare være indsat direkte. Der skal <% i starten og %> i slutningen.

laserzap>> Scriptet skal omgives af <% og %>

Ja, det ved jeg godt, men jeg glemte det bare :o)

Ok, men så får jeg denne meddelelse

Microsoft VBScript compilation error \'800a0400\'

Expected statement

/MinMappe/MinUndermappe/julekalender.asp, line 27

<a href=\"<% =Timenow & \".jpg\"
^

Her er et eksembel til hvordan det kunne se ud:

<html>
<head>
<body>
<%
Function ConvertDate(dtmDate,intFormat)
\' intFormat kan have 2 værdier. 0 eller 1
\' 0 = Returnerer dato og tid
\' 1 = Returnerer kun dato

Months = right(\"00\" & DatePart(\"m\", dtmDate) ,2)
Days = right(\"00\" & DatePart(\"d\", dtmDate) ,2)
Hours = right(\"00\" & DatePart(\"h\", dtmDate) ,2)
Minutes = right(\"00\" & DatePart(\"n\", dtmDate) ,2)
Seconds = right(\"00\" & DatePart(\"s\", dtmDate) ,2)


OutDate = DatePart(\"yyyy\", dtmDate) & Months & Days
OutTime = Hours & Minutes & Seconds

If intFormat = 0 Then
    strOut = OutDate & \"-\" & OutTime
ElseIf intFormat = 1 Then
    strOut = OutDate
End If

ConvertDate = strOut
End Function


Timenow = ConvertDate(NOW,1)
%>
<a href=\"<% =Timenow & \".jpg\"%>\">Dagens låge</a>
</body>
</html>

Også skal du have et billede der passer til datoen

Steen >> Sørg for at tegnene er der også inde id linket!

Bare kopir mit eks. det virker (hos mig)

Jep også her!

Det var da godt ;)

DET VIRKER (nu koster det snart point til Jer én gang til :o)). Men hvad med lågerne fra 1-24? Det bliver jo kun et \"Dagens billede\"? Man kunne jo også lave det som dagens historie og i stedet for \"jpg\" bruge \"htm\"?

he heeee ja... det er jo noget jeg selv er kommet med;-)

\"Dagens historie\" er du selv kommet med?

Du kan bruge
Request.QueryString(\"laage\")

Hvis det skal være en historie skal du bare ændre jpg til asp eller htm.
Jeg har prøvet det og i kan se det på denne adresse:

http://212.242.27.1/1.asp

Steen>>???
Jeg mener scriptet... Det script er det grundlæggende til noget der kan gøres meget mere avanceret

Det virker i hvert fald hos mig!

he he... \"Der var engang\".

he he !
Sådan starter alle eventyr 8)

laserzap>> aaahhhh det er jeg ikke sikker på men de fleste starter sådan...:-)

sp: Jeg er ikke nogen ASP-haj, lige som visse andre her :o)

Hvad får jeg ud af

Request.QueryString(\"laage\")
Forespørg.ForespørgselStreng(\"låge\") - direkte oversat

?

Sorry:

Anmod.ForespørgselsStreng(\"låge\")

Kan jeg ikke nummere links\'ene som datoer? Dvs hvis det er den 1. december, kan man kun få noget ud af at trykke på LINKET 1. december:

1. december
2. december
3. december
.
.
.

If date i pc <> datolink
then \"Det er ikke den aktuelle dato!\"

El.lign?

Dvs. at man kan trykke på linket \"1. december\" og se billedet \"20001201.jpg\" eller dokumentet \"20001201.htm\"

Det kan man bruge til meget forskelligt.
Du kan sende en forespørgsel igennem din URL:
ved f.eks.:
Request.QueryString(\"mode\")
location siden.asp?mode=ja
<%
mode=Request.QueryString(\"mode\")

if mode=ja then

....

End if
%>

<%
sorry
mode=Request.QueryString(\"mode\")

if mode=\"ja\" then

....

End if
%>

Man kan godt lave noget kode der sammen med dette laver 24 links
Men det kræver lige at lave lidt mere...

Er 30 point for det ekstra kodning ok?

Jeg vil gerne gøre det for 60.. Så er de andre links også disabled!

Det er ok. Opretter lige et nyt spørgsmål, der hedder \"Julekalender2\"

Det er oprettet, sp :o)