Avatar billede _petrucci Nybegynder
09. juli 2002 - 12:08 Der er 5 kommentarer og
2 løsninger

Kalender igen-igen :)

Hejsa,

har læst utallige indlæg her vedr. kalendere men mit spørgsmål er egentlig relativt simpel.

Hr. Knappe fra activedeveloper har lavet en meget simpel kalender - http://activedeveloper.dk/aspdigital/studies/kalender.asp


Umiddelbart skal jeg kun have tilføjet muligheden for at søge min database-tabel igennem og hvis der findes indlæg i nogen datoer, skal der oprettes et link i kalenderen på den pågældende dato der bare skal henvise til en asp-side og medføre dato-variablen.

Thats it.

Og som bonuspoint spørgsmålet - er der nogen måde at erstatte alle dato-tallene med image-filer?
Avatar billede ras2000 Nybegynder
09. juli 2002 - 16:09 #1
Hvis du skal sætte img-filer ind i stedet for tal, skal du ændre linien:
  Response.Write Day(dtmCurDate)
til:
  Response.Write "<img src ='" & Day(dtmCurDate)& ".gif'>"
Så er du selvfølgelig nød til at have 31 img-filer der hedder 1.gif, 2.gif, osv.
Den anden (første) del af spørgsmålet er lidt mere bøvlet. Jeg ville lave et udtræk af din database, der svarer til måneden der bliver vist. Så ville jeg ordne dem efter dato, og så i din løkke lave en betingelse lidt ala:
  if dtmCurDate = rsmaaned("dato") then
      response.write "<a href='linket'>"
  end if
  Response.Write "<img src ='" & Day(dtmCurDate)& ".gif'>"
  if dtmCurDate = rsmaaned("dato") then
      response.write "</a>"
      rsmaaned.movenext
  end if
recordsættet rsmaaned skal så være udtrækket der svarer til den pågældende måned, og rsmaaned("dato") skal så være den dato der kontrolleres.
Avatar billede ras2000 Nybegynder
09. juli 2002 - 16:12 #2
Hov, der skal stå
    response.write "<a href='asp-side.asp?dato=" & rsmaaned("dato") & "'>"
is stedet for
    response.write "<a href='linket'>"
Avatar billede eagleeye Praktikant
09. juli 2002 - 16:27 #3
Du skal for hver dag lave en SQL sætninge som så kigger i din database det skal indsættes ved denne linie:
Response.Write Day(dtmCurDate)
Da det nu skal væreet link.

strSQL = "SELECT * FROM kalender WHERE dato = #" & dtmCurDate & "#"
set rs = Connection.execute(strSQL)
if not rs.EOF then
  'Et evetn i kalenderen
  Response.Write "<a href=""visaftale.asp?id="&rs("id")&""">"&Day(dtmCurDate)&"</a>"
else
  Response.Write Day(dtmCurDate)
end if


Så bliver selve dagen linket.
Avatar billede _petrucci Nybegynder
10. juli 2002 - 13:12 #4
Takker for begge svar - eller rettere...kommentarer ;)  Lav et svar og der er point til begge :)
Avatar billede ras2000 Nybegynder
10. juli 2002 - 13:25 #5
svar
Avatar billede eagleeye Praktikant
10. juli 2002 - 17:28 #6
Svar
Avatar billede _petrucci Nybegynder
10. juli 2002 - 23:40 #7
Kunne bedre bruge eagleeyes løsning på det egentlige problem - derfor denne pointdeling :)
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