Avatar billede jpj3 Nybegynder
31. oktober 2003 - 23:14 Der er 3 kommentarer og
1 løsning

Det er kun admin der skal se linket.

Jeg har denne kode og vil gerne have dette <% if admin = 1 then %> og denne <% end if %> sat ind. Så den kun bliver vist når admin er logget på.


strHTML = strHTML & "<td bgcolor=#BBBB88 valign=top><font face=Verdana size=2>" & "<a href=""viewmsgedit.asp?id=" & rs("ID") & "&ForumID=" & intForumID & """>" & rs("godkendt") & "</a> </font></td></tr>"
Avatar billede tzr Nybegynder
31. oktober 2003 - 23:19 #1
det her du vil have ?


<%
If admin = 1 Then
  Response.Write strHTML
End If
%>
Avatar billede jpj3 Nybegynder
31. oktober 2003 - 23:25 #2
ikke helt
Det skal helst ind i linien.
Der er fire linier, således.


strSQL = "SELECT Count(*) AS ItemCount FROM Entries WHERE (ReplyID = " & rs("Id") & ") AND (OrgThread <> TRUE)"
    Set recordCount = myConn.Execute(strSQL)
    strHTML = strHTML & "<tr><td bgcolor=#BBBB88><font face=Verdana size=2><a href=""viewmsg.asp?id=" & rs("ID") & "&ForumID=" & intForumID & """>" & Server.HTMLEncode(rs("Subject")) & "</font></a></td>"
    strHTML = strHTML & "<td bgcolor=#BBBB88 valign=top><font face=Verdana size=2>" & recordCount("ItemCount") & "</font></td>"
    strHTML = strHTML & "<td bgcolor=#BBBB88 valign=top><font face=Verdana size=2>" & rs("FormDate") & "</font></td>"
    strHTML = strHTML & "<td bgcolor=#BBBB88 valign=top><font face=Verdana size=2>" & "<a href=""viewmsgedit.asp?id=" & rs("ID") & "&ForumID=" & intForumID & """>" & rs("godkendt") & "</a> </font></td></tr>"

Og den skal bygges ind i den sidste linie.
Avatar billede jpj3 Nybegynder
31. oktober 2003 - 23:27 #3
Fandt selv ud af det.

strSQL = "SELECT Count(*) AS ItemCount FROM Entries WHERE (ReplyID = " & rs("Id") & ") AND (OrgThread <> TRUE)"
    Set recordCount = myConn.Execute(strSQL)
    strHTML = strHTML & "<tr><td bgcolor=#BBBB88><font face=Verdana size=2><a href=""viewmsg.asp?id=" & rs("ID") & "&ForumID=" & intForumID & """>" & Server.HTMLEncode(rs("Subject")) & "</font></a></td>"
    strHTML = strHTML & "<td bgcolor=#BBBB88 valign=top><font face=Verdana size=2>" & recordCount("ItemCount") & "</font></td>"
    strHTML = strHTML & "<td bgcolor=#BBBB88 valign=top><font face=Verdana size=2>" & rs("FormDate") & "</font></td>"
    %><%
If admin = 1 Then
    strHTML = strHTML & "<td bgcolor=#BBBB88 valign=top><font face=Verdana size=2>" & "<a href=""viewmsgedit.asp?id=" & rs("ID") & "&ForumID=" & intForumID & """>" & rs("godkendt") & "</a> </font></td></tr>"
End If%><%
Avatar billede jpj3 Nybegynder
31. oktober 2003 - 23:27 #4
Der manglede lige et par af dem her.

%> <%
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