Nån som vet svaret?

8 svar · 238 visningar · startad av Jacek 23 nov. 2001

JacekMedlem sedan apr. 2000169 inlägg

Frågan23 nov. 2001 08:43#1

Jag håller på att mixa med en tidrapport där flera personer är registrerade och varje person kan fylla i sina timmar.
Problemet jag har är att jag vill få upp en vecko tabell, dvs är det dagens datum så kommer man till en sida där en tabell listar ut måndag-söndag med datumen under, och för att göra det lite snyggare så kan dagens datum tabellen vara färgad.
Jag är dålig på att beskriva med om det är någon som förstår detta och vet svaret eller vet någon sida som skriver om detta så är jag väldigt tacksam.

------------------
Mikael Tyrsén
</www.tyrsen.nu>
</mikael@tyrsen.nu>

@ndersMedlem sedan juni 200032 967 inlägg

23 nov. 2001 09:19#2

Är inte riktigt säker på hur du menar, men en liten if-sats kan du få av mig.

if CDate(datumet_du_listar) = Date then

Hjälper det dig någonting?

Mvh,

------------------
All your base are belong to me.

JacekMedlem sedan apr. 2000169 inlägg

23 nov. 2001 09:47#3

Naj. Jag menar mer att om adressen är t.ex. tid.asp?Datum=2001-11-23 så kan man lista ut alla dagar i den veckan som datumet du angett ingår i.

Exempel:

Vecka 47
[ Måndag 2001-11-19 ]
[ Tisdag 2001-11-20 ]
[ Onsdag 2001-11-21 ]
[ Torsdag 2001-11-22 ]
[ Fredag 2001-11-23 ]
[ Lördag 2001-11-24 ]
[ Söndag 2001-11-25 ]

- - - - - - - - - - - - - - - -

Hoppas du förstår...

------------------
Mikael Tyrsén
</www.tyrsen.nu>
</mikael@tyrsen.nu>

[Redigerat av Jacek den 23 nov 2001]

lolukokasosMedlem sedan mars 2001196 inlägg

23 nov. 2001 09:56#4

Med datepart("w",date,2) så får du ut vilken veckodag det är i veckan. I detta fall dag 5.
Du kanske kan använda det...

JacekMedlem sedan apr. 2000169 inlägg

23 nov. 2001 10:00#5

Jo, det är en hjälp lina på vägen. Skall försöka bygga upp något utav den koden.
Tack för tipset! ;)

------------------
Mikael Tyrsén
</www.tyrsen.nu>
</mikael@tyrsen.nu>

@ndersMedlem sedan juni 200032 967 inlägg

23 nov. 2001 10:06#6

Eller, eftersom jag har varit himlans bussig och skrivit ihop ett litet kodstycke åt dig, kan du ju använda det istället. ;)

<%
Session.LCID = 1053
dteDatum = Request.QueryString("datum")
if isDate(dteDatum) then
	dteDatum = Cdate (dteDatum)
	intDayOfWeek = WeekDay(dteDatum, vbMonday)
	dteWeekStart = dateAdd("d", -intDayOfWeek, dteDatum)
	for i = 1 to 7
		dteTempDate = dateAdd("d", i, dteWeekStart)
		Response.Write WeekdayName(Weekday(dteTempDate)) & " - " & dteTempDate & "<br>"
	next
else
	Response.Write "Ogiltigt datum"
end if
%>

Mvh,

------------------
All your base are belong to me.

JacekMedlem sedan apr. 2000169 inlägg

23 nov. 2001 10:09#7

Fan va nice!
Rå tackar dig @nders.. :)

------------------
Mikael Tyrsén
</www.tyrsen.nu>
</mikael@tyrsen.nu>

JacekMedlem sedan apr. 2000169 inlägg

23 nov. 2001 10:30#8

@nders > Går det att sätta ett string namn på varje dag.

Exempel

<% Måndag = 2001-11-23 %>
forts..

Eller är det omöjligt?

Vill ha det så bara för att då kan jag plecare ut datumen lite var stans på sidan..

------------------
Mikael Tyrsén
</www.tyrsen.nu>
</mikael@tyrsen.nu>

[Redigerat av Jacek den 23 nov 2001]

@ndersMedlem sedan juni 200032 967 inlägg

23 nov. 2001 11:34#9

Mjo, det kan man ju. Om man nu vill det. :)

Vi kör en liten select case vid variabeltilldelningen.

<%
Session.LCID = 1053
dteDatum = Request.QueryString("datum")
if isDate(dteDatum) then
	dteDatum = Cdate (dteDatum)
	intDayOfWeek = WeekDay(dteDatum, vbMonday)
	dteWeekStart = dateAdd("d", -intDayOfWeek, dteDatum)
	for i = 1 to 7
		dteTempDate = dateAdd("d", i, dteWeekStart)
		select case i
			case 1 : dteMandag = dteTempDate
			case 2 : dteTisdag = dteTempDate
			case 3 : dteOnsdag = dteTempDate
			case 4 : dteTorsdag = dteTempDate
			case 5 : dteFredag = dteTempDate
			case 6 : dteLordag = dteTempDate
			case 7 : dteSondag = dteTempDate
		end select
		Response.Write WeekdayName(Weekday(dteTempDate)) & " - " & dteTempDate "<br>"
	next
else
	Response.Write "Ogiltigt datum"
end if
%>

Jag hade iofs gjort det med en array istället.

Mvh,

------------------
All your base are belong to me.

[Redigerat av @nders den 23 nov 2001]