%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> <% Function PrintSiteText(tp,tn) Dim rsText Set rsText = dbCon.Execute("SELECT TextValue FROM SiteText WHERE TextPage = '" &tp &"' AND TextName = '" &tn &"'") PrintSiteText = rsText("TextValue") End Function %>
|