Søg
Avatar billede tblaster Nybegynder
02. august 2002 - 12:13 Der er 9 kommentarer og
1 løsning

Dato

Hejsa ...

Jeg har en side med følgende kode:

<%
arrMonth = Array("januar", "febuar", "marts", "april", "maj", "juni", "juli", "august", "september", "oktober", "november", "december")
arrDay = Array("Søndag", "Mandag", "Tirsdag", "Onsdag", "Torsdag", "Fredag", "Lørdag")

datoDag = request.querystring("Dag")
Mdr = request.querystring("Mdr")
datoStr = datoDag & "-" & Mdr & "-" & request.querystring("År")

datoStreng = arrDay(WeekDay(datoStr)-1) & " den " & datoDag & ". " & arrMonth(Mdr-1) & " " & Year(datoStr)

Response.write datoStreng
%>

Hvis jeg åbner siden uden følgende dato.asp?Dag=1&Mdr=07&ÅR=2002

Så skrive den:

Type mismatch: '[string: "--"]'

Hvordan får jeg lavet det så når siden åbnes uden ?Dag=1&Mdr=07&ÅR=2002 så skrive den bare datoen for den pågældende dag?
Avatar billede coltau Juniormester
02. august 2002 - 12:21 #1
Hvad med ...

if datoDag <> "" then
  ' der er angivet en dato
else
  ' Der er ikke angivet dato
end if
Avatar billede tblaster Nybegynder
02. august 2002 - 12:30 #2
Det giver følgende:

Syntax error
Avatar billede tblaster Nybegynder
02. august 2002 - 12:31 #3
Min fejl ... satte det ind det forkerte sted!
Avatar billede tblaster Nybegynder
02. august 2002 - 12:38 #4
Hvis jeg bruger det du skrev så får jeg problemer senere hen i min kode hvor jeg bruge følgende:

<%
response.write "<a href=""bestil.asp?Dag=" & request.querystring("Dag") & "&Mdr=" & request.querystring("Mdr") & "&ÅR=" & request.querystring("År") & "&Tid=7"" style=""text-decoration: none"">7:00</a>"
%>

Kan jeg definer querystring("Dag") og de andre hvis når man åbner siden at: querystring("Dag") = ""  ???
Avatar billede coltau Juniormester
02. august 2002 - 12:49 #5
Nej du skal gemme QueryStringene i lokale variable og så anvende dem i stedet for.

sQDag = request.querystring("Dag")
sQMdr = request.querystring("Mdr")
sQAar = request.querystring("År")
Avatar billede coltau Juniormester
02. august 2002 - 12:52 #6
Hvis der ikke er angivet dag og mdr skal du gøre således:

if datoDag <> "" then
  ' der er angivet en dato
else
  sQDag = Day(Date)
  sQMdr = Month(Date)
  sQAar = Year(Date)
end if
Avatar billede tblaster Nybegynder
02. august 2002 - 13:07 #7
Hvordan vil du så sørge for at hvis request.querystring("Dag") og de andre ikke er defineret at sQDag og de andre bliver defineret med dagens dato?
Avatar billede tblaster Nybegynder
02. august 2002 - 13:10 #8
nu har jeg gjort følgende:

<%

if request.querystring("Dag") <> "" then

sQDag = request.querystring("Dag")
sQMdr = request.querystring("Mdr")
sQAar = request.querystring("År")

else

sQDag = Day(Date)
  sQMdr = Month(Date)
  sQAar = Year(Date)

arrMonth = Array("januar", "febuar", "marts", "april", "maj", "juni", "juli", "august", "september", "oktober", "november", "december")
arrDay = Array("Søndag", "Mandag", "Tirsdag", "Onsdag", "Torsdag", "Fredag", "Lørdag")

datoDag = sQDag
Mdr = sQMdr
datoStr = datoDag & "-" & Mdr & "-" & sQAar

datoStreng = arrDay(WeekDay(datoStr)-1) & " den " & datoDag & ". " & arrMonth(Mdr-1) & " " & Year(datoStr)


Response.write datoStreng

else %>

<% end if %>

Men får denne besked:

Expected 'End'
Avatar billede tblaster Nybegynder
02. august 2002 - 13:19 #9
Nu fik jeg det til at køre ...
Avatar billede coltau Juniormester
02. august 2002 - 13:23 #10
For mig ser det stadigvæk forkert ud - jeg tror at det skal være sådan:

<%
if request.querystring("Dag") <> "" then
  sQDag = request.querystring("Dag")
  sQMdr = request.querystring("Mdr")
  sQAar = request.querystring("År")
else
  sQDag = Day(Date)
  sQMdr = Month(Date)
  sQAar = Year(Date)
end if

arrMonth = Array("januar", "febuar", "marts", "april", "maj", "juni", "juli", "august", "september", "oktober", "november", "december")
arrDay = Array("Søndag", "Mandag", "Tirsdag", "Onsdag", "Torsdag", "Fredag", "Lørdag")

datoDag = sQDag
Mdr = sQMdr
datoStr = datoDag & "-" & Mdr & "-" & sQAar

datoStreng = arrDay(WeekDay(datoStr)-1) & " den " & datoDag & ". " & arrMonth(Mdr-1) & " " & Year(datoStr)

Response.write datoStreng
%>
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
Programmeringssprog kurser
Kurser inden for grundlæggende programmering
Se alle Programmeringssprog kurser

Flere spørgsmål fra ASP kategorien

Titel Indlæg Oprettet Seneste aktivitet
Persits.Upload Af bsn i ASP 9 17/09/202611:37 21/09/202615:15
Jeg bakser med noget Database og If Then med ASP - hvad gør jeg galt? Af Peer i ASP 10 25/06/202622:20 04/09/202602:30
Tjek alle checkbox i form Af bsn i ASP 4 18/05/202601:57 19/05/202613:33
Lost focus Af bsn i ASP 1 07/11/202415:34 01/01/202514:58
ASP classic Af bsn i ASP 8 28/10/202423:11 30/10/202422:51
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 går 16:25 En "Gammel" & "Retro" PC Service ? Husker ikke navnet .... Af Ikke-ekspert i Diverse
I går 16:17 Jeg har lige købt en Samsung mobil telefon Af Strawberry i Mobiltelefoner
I går 13:20 Lotus Approach Af Carsten i Andet software
15/1015:34 Epson scanner forbinder ikke til computer Af bbkdk i Printere
11/1013:35 Bruger på Win11 Af lurup i Browsere
White papers
Flere white papers »