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>"
Annonceindlæg fra Cognizant
Agentic AI kræver mere end teknologi
De fleste virksomheder har efterhånden bevist, at AI virker.
Pilotprojekter leverer resultater. Medarbejdere bruger generative AI-værktøjer. Nye use cases dukker op på tværs af organisationen.
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.
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%><%