23. august 2006 - 08:54Der er
4 kommentarer og 1 løsning
Ændre tekst til kursiv ud fra værdi i database
Hej
Jeg har en MS access database med opgaver. Nogen der kan hjælpe med hvordan jeg kan ændre teksten til f.eks. kursiv eller bold på de entries der har status "solved" i en kolonne ved navn "status"?
Her er koden: <% Session.LCID=1030 strSQL = "Select * from tasks1 order by module1 asc" set tasks1 = Conn.Execute(strSQL) do while not tasks1.eof%> <tr> <td width="70"><%=tasks1("module1")%> </td> <td width="50"><%=tasks1("tcode1")%> </td> <td width="350"><a href="observation_details.asp?id=<%=tasks1("id")%>"><%=tasks1("text1")%> </td> <td width="100"><%=tasks1("log1")%> </td> <td width="100"><%=tasks1("by1")%> </td> </tr> <% tasks1.MoveNext loop %>
Danmark vil mindske afhængigheden af globale techgiganter, men det kræver mere end politiske formuleringer og strategier, understreger PROSA’s formand Niels Bertelsen.
do while not tasks1.eof%> <tr> <% status = tasks1("status") if status = "solved" then %> <td width="70"><b><%=tasks1("module1")%></b> </td> <% else %> <td width="70"><%=tasks1("module1")%> </td> <% end if %>
strSQL = "Select * from tasks1 ORDER BY module1 ASC" Set tasks1 = Conn.Execute(strSQL)
do while not tasks1.eof
' lCase gør at den gør alle bogstaver den trækker ud til små bogstaver og derfor er du HELT sikker på at status vil være 'solved' og ikke 'SOLVED eller 'Solved' :-) strStatus = lCase(task1("status"))
if strStatus = "solved" then response.write("<td width=""70""><i>" & tasks1("module1") & "</i> </td>") else response.write("<td width=""70"">" & tasks1("module1") & " </td>") end if
Madeindk: Jeg så ikke lige dit svar, men tak til dig også :)
Synes godt om
Ny brugerNybegynder
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.