23. juni 2002 - 00:09Der er
34 kommentarer og 2 løsninger
vælge skriftype + formatering
Jeg har denne kode
<% strSQL = "SELECT * FROM Download ORDER BY Navn" Set rs = myConn.Execute(strSQL) If Not (rs.BOF Or rs.EOF) Then Do While Not rs.EOF Response.Write "<p><a href=clickcount.asp?id=" & rs("ID") & ">" & rs("Navn") & "</a><br>" Response.Write "<font size=-1>Læst af: " & rs("Hits") & "</p>"
rs.Movenext Loop End If myConn.Close Set myConn = Nothing %>
I dette særtema ser vi på, hvordan cloud og AI bliver fundamentet for virksomhedernes digitale forretning, og hvordan de nye muligheder for automatisering og forretningsværdi kan udnyttes uden at miste overblik, sikkerhed og menneskelig kontrol.
ja det kan du godt, men så vil jeg anbefale at du bruger et CSS til det. CSS står for Cascading Style Sheet, og det kan du bruge til at formattere tekst, links, billeder osv. Læs mere om det på www.activeserverpages.dk
font-family : Tahoma; font-size : 12PX; text-decoration : none; color : #008830; } <!--.link er navnet på en class, og den kalder man med CLASS="link"-->
<UL> <LI>Firewall i IE (Læst af 7)</LI> <LI>Zippakke 2 (Læst af 3)</LI> <LI>Zippakke 3 (Læst af 1)</LI> </UL>
Det vil nummerrer fra 1-x med 1 øverst <OL TYPE=I> <LI>Firewall i IE (Læst af 7)</LI> <LI>Zippakke 2 (Læst af 3)</LI> <LI>Zippakke 3 (Læst af 1)</LI> </OL>
hmmmm er ikke sikker men tror det er noget med den div prøv at slette den og så sætte den class på ol (hvis du bruger den) ellers på den <A HREF="url" CLASS="link">
Jeg er ikke sikker på man kan putte en class på en a.....
gigaload: Jeg er nu ikke så sikker på det er koden for tab..... skal du lave et tab, så skal du nok finde ascii koden for tab og sætte den ind i chr$(>>ASCII KODEN<<)....
Det er en frontpage formatering den der med 3xnbsp;......
rs.Movenext Loop End If myConn.Close Set myConn = Nothing %>
</UL>
</body>
og DEtte
<% Response.Buffer = True
Set myConn = Server.CreateObject("ADODB.Connection") myConn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("download.mdb") If Request.QueryString("id") <> "" Then Set rs = Server.CreateObject("ADODB.RecordSet") strSQL = "SELECT * FROM Download WHERE (ID = " & Request.QueryString("id") & ")" rs.Open strSQL, myConn, 1, 3 If Not (rs.BOF Or rs.EOF) Then rs("Hits") = rs("Hits") + 1 strURL = rs("URL") rs.Update rs.Close myConn.Close Set rs = Nothing Set myConn = Nothing Response.Clear Response.Redirect(strURL) End If End If %>
<DIV ALIGN="LEFT"> <UL> <% strSQL = "SELECT * FROM Download ORDER BY Navn" Set rs = myConn.Execute(strSQL) If Not (rs.BOF Or rs.EOF) Then Do While Not rs.EOF
TAKKER MANGE GANGE for hjælpen martins hvis du vil have point, så brok dig og jeg opretter et spm med point til dig! :D
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.