Sortera kalender efter vald månad
12 svar · 327 visningar · startad av magnusfeldth
Nja, inte riktigt vad jag menade?
Hur skriver jag om jag vill ha en bestämd månad, vars månadsnummer (alltså 1=januari, 2=februari) som jag skickar med i en querystring för att visa alla poster som finns i denna månad?
sql = "Select * From tbl Where Month(fldDate) = " & Request.Querystring("month")
Har så här:
strSQL = "SELECT * FROM Kalender WHERE Datum = " & Trim(Request.QueryString("month")) & " "
Set RecSet=Connect.Execute(strSQL)
men vet att detta inte är rätt.
Hur ska jag skriva runt Datum för att den bara ska känna år och månad?
Vad innehåller request.querystring("month")? Helst skulle jag vilja att den innehåller ett helt datum, yyyy-mm-01. i så fall:
dteMyDate = Cdate(request.querystring("month"))
strSQL = "SELECT * FROM Kalender WHERE Year(Datum) = " & Year(dteMyDate) & " AND Month(Datum) = " & Month(dteMyDate)
Set RecSet=Connect.Execute(strSQL)
Mvh
Tack @nders, nu stämmer det perfekt där.
Nu återstår bara fråga två, hur loopar jag ut tolv månader framåt? Alltså, vad jag vill är att skriva:
"Välj månad:
februari -04, mars -04, april -04 osv..." och dessa ska alltså vara länkade med querystrings till index.asp?page=kalendermonth&month=XYZ
I din <select> kan du göra något sånt härnt:
For i = 0 to 11
currentMonth = dateAdd("m", i, date)
Response.write "<option value=""" & currentMonth & """>" & MonthName(currentMonth) & " " & year(currentMonth) & "</option>"
next
Koden är givetvis otestad, så den kan fungera kanonuselt. ;)
Vill du ha länkar av det får du fixa det själv. ;)
Mvh
<%For i = 0 to 11
currentMonth = dateAdd("m", i, date)
Response.write "<option value=""" & currentMonth & """>" & MonthName(currentMonth) & " " & year(currentMonth) & "</option>"
next%>
felmess:
Körningsfel i Microsoft VBScript (0x800A0005)
Ogiltigt proceduranrop eller argument.: 'Monthname'
/hhgspunktse/hhgs/index.asp, line 1132
Jag har skivit:
Response.write "<a href=""index.asp?page=kalendermonth&month=" & year(currentMonth) & "-" & month(currentmonth) &""">""<option value="" & currentMonth & "">" & MonthName(month(currentMonth)) & " -" & Right(Year(currentMonth),2) & "</option> ""</a>"
men då får jag två extra citattecken med i den utskrivna texten... Vilka fnuttar ska bort?
Du ska ta bort <option>-grejerna också, de är element som tillhör <select>, och har ingenting i en länk att göra. De två citationstecknen som ska bort är de som är precis före </a>.
superb! :e funkar perfekt! tack



