Hur applicerar jag den? Alltså funktionen som byter kod-tecken och färgar olika ord. Den som finns här i arkivet att ladda ner.. <code> ÄR det inte bättre med en include. Eftersom servern can caha hela sidan. Execut bör bara användas vid dynamiska fall. Då sidan inte alltid behöver utföras. Jag håller inte heller reda på den. Men var försiktig med dina svar. Folk kanske använder sig av dem.colorCode
<%
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFil = objFSO.OpenTextFile(server.MapPath("test.txt"),1)
texten = objFil.readall
objFil.Close
%>
<html>
<%=texten%>
Om vi säger att texten är den jag vill kolla med funktionen..Sv: colorCode
<%
server.execute("coloCode.asp")
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFil = objFSO.OpenTextFile(server.MapPath("test.txt"),1)
texten = objFil.readall
texten = colorCode(texten, "Verdana", 9)
objFil.Close
%>
<html>
<%=texten%>
</code>Sv: colorCode
Sv: colorCode
<!-- #include file="coloCode.asp" -->