14. juni 2003 - 09:56Der er
17 kommentarer og 1 løsning
Kode Hjælp?
Jeg skal have have plusset en del tal fra en database, men tallene står som 40%,89% osv. Så jeg skal først fjerne % tegnet, men den gider ikke rigtig:
strSQL2 = "select * from elementer where projektid = ' " & id & " '" set rs5 = conn.execute(strSQL2)
pro = "0"
do while not rs5.eof if rs5("status") = "Afsluttet" then sProcent = "100%" iTal = Int(Left(sProcent, Len(sProcent)-1)) else sProcent = rs("status") iTal = Int(Left(sProcent, Len(sProcent)-1)) end if
Nu har jeg rettet i den, men får udfaldet: 0+100+100+100+100+100+100+100+100+100+100+100+100+100+100+100+100+100+100+100+100+100+100+100+100+100+100+100+100+100+100+100+100+100+100+100+100+100+100+100+100+95+100+60+100+100+0+100+0+100+100+100+100+100+100+100+100+100+95+100+100+100+0+100+100+100+100+100+100+0+100+0+50
Jeg skulle gerne have dem plusset så jeg kun får ét udtal
do while not rs5.eof if rs5("status") = "Afsluttet" then sProcent = "100%" iTal = Round(Left(sProcent, Len(sProcent)-1),0) else sProcent = rs5("status") iTal = Round(Left(sProcent, Len(sProcent)-1),0) end if
Men det antal du skal divedere med skal være antallet at tal som er lagt sammen så man må tælle dem:
pro = "0" antal = 0 do while not rs5.eof if rs5("status") = "Afsluttet" then sProcent = "100%" iTal = Round(Left(sProcent, Len(sProcent)-1),0) else sProcent = rs5("status") iTal = Round(Left(sProcent, Len(sProcent)-1),0) end if
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.