Dynamisk Select variabel i Dropdown boks i Form ???

28 dage, februar - hrmf !!

Prøv lige sådan her:

if (lp == curyr) then

//>Rune

Ahem - Det jeg skal er at få den dato der står i databasen IND i select boksen som værende valgt fra start :

Noget a la : if request.Form ("dato")<>"" then
      Response.Write ("dato") & " SELECTED"
    end if

Men om det wærker ?

Hmm så prøv

If DateDiff("d", lp, curyr) = 0 Then

//>Rune

som jeg ser det skal du bare ændre dette:

GenDateDropDown "document.forms[0]", "begdate", date(), 1990, 2030, 1

til
set oRs = oConn.Execute("select dato from din tabel")
GenDateDropDown "document.forms[0]", "begdate", oRs("dato"), 1990, 2030, 1

det kræver dog at daton i din database bliver retuneret på det rigtige format, ellers må du lige formatere det.

Nejnej - Databasefeltet skal bare ind og være valgt fra start - ALT andet skal være som det ellers var

så:
<FORM NAME=FORM1 ACTION="tgdate.asp?mode=next" METHOD=POST>
...
<%
if mode <> "next" then
  dato = oRs("dato")
else
  dato = request.form("begdated") & request.form("begdatem") & request.form("begdatey")
end if
GenDateDropDown "document.forms[0]", "begdate", dato, 1990, 2030, 1

eller hvordan dit dato format nu er....

Jeg har lige haft samme problem med en redigeringsside, og jeg har lavet det. Det du har ser næsten rigtigt ud. Du skal blot huske at trim() begge dine værdier og skrive det helt rigtigt.

fx:

<%
do while not rs.eof
    response.write "<option value='" & rs("idproduktgrupper") & "'"
    if trim(request.querystring("produktgruppe")) = trim(rs("idproduktgrupper")) then
        response.write " selected"
    end if
    response.write ">"
    response.write rs("produktgrupper")
    response.write "</option>"
    rs.movenext
loop
%>

Det virker! Prøv dig frem

Jeg har alle datoer, måneder og år i hvert sit felt :

startdato, slutdato, startmaaned, slutmaaned osv.

Venner, jeg fandt frem til noget der virker - vil dog gerne lige have jeres blik på det - det var datoformatet DD/MM/YYYY den var gal med !

Først laver jeg variabler ud fra dato, måned og år i databasen :

strBegD = adoRs("startdato")
        strEndD = adoRs("slutdato")
        strBegM = adoRs("startmaaned")
        strEndM = adoRs("slutmaaned")
        strBegY = adoRs("startaar")
        strEndY = adoRs("slutaar")

Hov, nå fortsættelse følger : Så laver jeg startdatoen således : <% Dim nystartdato
  nystartdato = (strBegD) & "/" & (strBegM)  & "/" & (strBegY)
GenDateDropDown "document.forms[0]", "begdate", (nystartdato), 1990, 2030, 1

og slutdatoen således :

Dim nyslutdato
  nyslutdato = (strEndD) & "/" & (strEndM)  & "/" & (strEndY)
GenDateDropDown "document.forms[0]", "enddate", (nyslutdato), 1990, 2030, 1

Don't knock it - Den virker !!!

Men det var ikke gået uden jer - fennecs kode er tættest på så han får points - men tak til jer andre også - Nu er mit opdateringsmodul MEGET tæt på at være der - juhu !!

Hilsen kalaharikid