Avatar billede freudika Nybegynder
09. november 2001 - 11:40 Der er 6 kommentarer og
1 løsning

minutter

argghh ... nu fik jeg lige sluppet af med sekunderne i min tid ... MEN ... den tog \"0\'let\" foran minutter mindre end 10 med ... eks:
hvis et arrangement starter kl: 10:05 skriver den 10:5 eller hvis det er 13:00 blir det til 13:0 ...

Jeg har prøvet at lave en if-sætning som den ik kan li:

if (minute(rs(\"tid\") < 10) then
minute(rs(\"tid\") = \"0\" + minute(rs(\"tid\"   
end if
       
Response.Write \"<TR><td>\" & rs(\"dato\") & \"</td><td>\" & hour(rs(\"tid\")) & \":\" & minute(rs(\"tid\")) & \"</td></TR>

er der noen der kan hjælpe ... jeg kan ik finde det nogle steder :-(

Camilla
Avatar billede cliche Nybegynder
09. november 2001 - 11:43 #1
if len(rs(\"tid\")) < 2 then \"0\" & rs(\"tid\")

skulle funke tror jeg :9
Avatar billede nute Nybegynder
09. november 2001 - 11:53 #2
fordi det du prøver på med den kode, er å skrive din tid til databsen ( + at du mangler noen paranteser)...prøv denne:

<%
Dim strMin
strMin = minute(rs(\"tid\"))
if (strMin < 10) then
  strMin = \"0\" + strMinend if
       
Response.Write \"<TR><td>\" & rs(\"dato\") & \"</td><td>\" & hour(rs(\"tid\")) & \":\" & strMin & \"</td></TR>\"

%>

/nute
Avatar billede freudika Nybegynder
09. november 2001 - 11:56 #3
nope :-(
funker ik
Avatar billede nute Nybegynder
09. november 2001 - 12:07 #4
tja....det er nok fordi RS(\"tid\") ikke er av typen dato. hva så med denne:

<%
Dim strMin
strMin = minute(CDate(rs(\"tid\")))
if (strMin < 10) then
  strMin = \"0\" + strMin
end if
       
Response.Write \"<TR><td>\" & rs(\"dato\") & \"</td><td>\" & hour(rs(\"tid\")) & \":\" & strMin & \"</td></TR>\"

%>

Og når du skriver \'funker ik\', hva mener du så ?? det er jo umulig å hjelpe hvis du ikke forklarer *hva* som ikke fungerer. Får du en feilmelding ?  eller utfører ikke scriptet de oppgavene du ønsker at det skal utføre ?

/nute
Avatar billede freudika Nybegynder
09. november 2001 - 13:46 #5
jeg kan ikke forstå det ...
Jeg sys at den kode burde virke ... men den gør det ikke ... den sætter ikke \"0\" ind foran ... den skriver stadig  13:0 i tid ... og ikke 13:00 som den burde ... og jeg sys ellers at det ser meget rigtigt ud :-)
Camilla


Avatar billede freudika Nybegynder
09. november 2001 - 14:05 #6
jeg har fundet ud af det nu ... det var din if-ting der funkede - dvs VBScript er så \"flinkt\" at det godt kan regne med strenge ... så det der skete var at der blev lagt 0 til ... og det jo ingen fordel ... men jeg lagde 0 i en variabel og converterede den ... sådan her:
Dim strMin,nul
        nul = \"0\"
        nul =cStr(nul)
        strMin = minute(rs(\"tid\"))
        if (strMin < 10) then
        strMin = cStr(strMin)
          strMin = nul + strMin
        end if

men nute du får points\'ne :-)
Avatar billede nute Nybegynder
09. november 2001 - 14:08 #7
nåja....selvfølgelig :-)

takker..
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