Simpel Kalender

Skal det være med database eller hvad??

ja, helst

Jeg har en side som udskriver på næsten samme måde. Det er i en access database og en siden som kan tilføje event ved at man skriver en dato og en tekst.

>> eagleeye

kan jeg se den ?

ja
http://www.eagleeye.dk/eks/kalender/kalender.asp

>> eagleeye

det ser godt ud... jeg kan godt bruge den
var der evt. mulighed for at tilføje kategori ?

Ja det kan godt lade sig gøre hvordan skal det så vises?

den skal ikke vise Kategori nogen steder, vil bare bruge kalender på flere sider så jeg kan tilføje forskelige aktivitere.

jeg har tilføjet en kategori du kan prøve at downloade det herfra:
http://www.eagleeye.dk/eks/kalender/spm455575.zip

ok, jeg tester den lige... :)

>> eagleeye

det er lige hvad jeg skal bruge...

vil du ikke lige svare så jeg kan give dig point's :)

Ok ;))
Jo jeg ligger da gerne et svar :)

>> eagleeye

har lige et spm. til, er der mulighed for at rette og slette ?

>> eagleeye

den vil ikke gemme !?

det virker heller ikke hos dig
http://www.eagleeye.dk/eks/kalender/kalender.asp

Man skal skrive 1  i kategorien eller blvier den ikke vist..
Lige nu skal man ind i databasen for at rette eller slette. Det kan komme på, så man skal logge ind som admin for at tilføje/rette/slette events, men det bliver ført i aften.

Jeg har uploaded en ny version. Så skal man være logget ind for at Tiføje, Rette og Slette. Brugernavn = admin og password = abcd

Der en også lavet en ny db.asp fil så du kun skal rette connection strengen et sted.

>> eagleeye

det lyder rigtigt godt :) mnage tak!

>> eagleeye

den vil stadig ikke gemme :(

det virker stadig heller ikke hos dig
http://www.eagleeye.dk/eks/kalender/kalender.asp

Jo du skal skrive et 1'tal som kategori:  1

i kalender.asp er det lave sådan den kun viser datoer for en bestemt kategori og det er 1

kategori="1"
sql = "select * from kalender where dato >= date() and kategori='" & kategori & "' order by dato"


HVis den skal vise alle kategorierne så ret det til:

sql = "select * from kalender where dato >= date() order by dato"

problemet er at den slet ikke indsætter data ind i databasen...

Jeg er godt klar over det der med Kategori :)

hvordan skriver du dato'en så?

ok, fejlen er min :(

jeg skrev såden her: eks. 12072004

takker for hjælpen :)

har lige et spm. :)

hvad gøre den her funktion:

if isDate(dato) and tekst <> "" then
      datoStr = Year(dato) & "-" & Month(dato) & "-" & Day(dato)

Arh ok ;) ja det skal være en dato med skille tegn.

isDate(dato) tjekke på om datoen er en gyldig dato.
tekst <> "" tjekke på om man har skrevet noget i overskift feltet.

Dette:
  datoStr = Year(dato) & "-" & Month(dato) & "-" & Day(dato)

Formatere datoen til foramtet yyyy-mm-dd da Access SQL bruger det dato format.

Hvordan laver jeg det om at den starter med et stort bogstav at skrive dagen og md. med

For at få dagen med stort skal du i kalender.asp rette denne linje:

response.Write "<tr><td width=""30%"">" & WeekDayName(Weekday(rs("dato")),true) & " " & Day(rs("dato")) & "</td>"

Til disse 3 linjer:

dagnavn = WeekDayName(Weekday(rs("dato")),true)
dagnavn = UCase(left(dagnavn,2)) & mid(dagnavn,2)
response.Write "<tr><td width=""30%"">" & dagnavn & " " & Day(rs("dato")) & "</td>"

fint :)
men hvad med Måned

I kalender.asp skal denne linje rettes:

    Response.Write "<tr ><td width=""30%"">&nbsp;</td><td width=""70%""><div style=""text-transform: capitalize"">"& MonthName(tmp) & "</div></td></tr>"

Til disse 3 linjer:

    mnavn = MonthName(tmp)
    mnavn = UCase(left(mnavn,1)) & mid(mnavn,2)
    Response.Write "<tr ><td width=""30%"">&nbsp;</td><td width=""70%"">"& mnavn & "</td></tr>"

Mange tak!