Hej. Hej! Nice. Konstigt vad man kan åstakomma om man bara tänker lite. Det beror lite på hur du vill skriva. I vissa fall så vill jag bygga min tabell dynamiskt inne i från en procedur eller en funkition Då brukar jag använda min avFormulär, körjournal
Jag tänkte göra en milraportering i ASP har börjat lite med vet inte hur jag skall lösa följande.
Jag har ett datumfält med 3 knappar jämte der den första skall sätta in dagens datum och de andra två skall addera eller subtrahera på datumet detta då inmatningen skall ske via en PDA där jag inte vill behöva skriva så mkt. se www.ingolfsson.se/mil.
Hantering av företag och mil skall föreslås via en combo se www.ingolfsson.se/mil/mil.asp.
Tacksam för tips och ider.
//TorfiSv: Formulär, körjournal
Den lösningen du beskriver innebär att du för varje klick på minus eller plus måste ladda om sidan varje gång och ta med ett värde till en Funktion som beräknar vilket datum du är på och skall till.
Nedan har jag en funktion som istället fyller en combo med datum. OCh på så sätt kan du bara välja vilket datum du vill använda
<code>
<%
Dim TodayDate
Dim NrOfDaysToAd
Response.Write(TodayDate)
%>
<select name="select">
<%
' Lopp som fyller Combon med datum och så många dagar som skall genereras
do until NrOfDaysToAd = 30
' Lägger på ett så att vi kommer upp till 30
NrOfDaysToAd = NrOfDaysToAd +1
' Skapar datumen
TodayDate = Date + NrOfDaysToAd
%>
<option><%= TodayDate %> </option>
<%
loop
%>
</select>
</code>
I do until NrOfDaysToAd = 30 sätter jag hur många dagar som skall visas. Vill du att combo skall visas dagar innan dagensdatum då skriver du
<code>
Dim TodayDate
Dim NrOfDaysToAd
' Lägger till denna variabel
NrOfDaysToAd = - 15
</code>
Eftersom räknaren börjar från minus 15 och går till 30 så visas 45 dagar. då kan du visas ett intervall med dagar. Sedan väljer du datumet och fyller i de övriga fälten och sedan sparar ner värderna till databasen
Jag hade nog gjort på detta sättet i stället.
/TyronneSv:Formulär, körjournal
Skulle man kunna minska DateToday och böra räkna från en vecka till baka?
Om man skulle vilja använda ett annat datum då är det problem?
/TSv: Formulär, körjournal
<code>
<%
Dim TodayDate
Dim NrOfDaysToAd
Response.Write(TodayDate)
%><select name="select">
<!--Detta för att få idag överst-->
<option><% Response.Write(Date) %></option>
<%
'--------------------------------------------------------------------
'Lopp som fyller Combon med datum och så många dagar som skall genereras
'--------------------------------------------------------------------
do until NrOfDaysToAd = 14
'--------------------------------------------------------------------
' Skapar datumen minus 1 vecka och 2 veckor framåt
'--------------------------------------------------------------------
TodayDate = Date - 7 + NrOfDaysToAd
'--------------------------------------------------------------------
'Lägger på ett så att vi kommer upp till 30
'--------------------------------------------------------------------
NrOfDaysToAd = NrOfDaysToAd +1
%>
<option><%= TodayDate %></option>
<%
loop
%>
</select>
</code>
Skall man göra så här:
<code>
<!--Detta för att få idag överst-->
<option><% Response.Write(Date) %></option>
</code>
eller
<code>
<%
'--------------------------------------------------------------------
'Detta för att få idag överst
'--------------------------------------------------------------------
Response.Write("<option>" & Date & "</option>")
%>
</code>
Båda fungerar antar jag men vilket e snyggast/bäst/rättast?
Resultatet www.ingolfsson.se/mil/mil.asp
//TSv:Formulär, körjournal
Response.Write("<option>" & Date & "</option>")
men är tabellen fast kodad på sidana så använder jag oftas den andra metoden dvs
%>
<option><%= TodayDate %></option>
<%
en smaksak tycker jag
/Tyronne