questo è il codice della pag che visualizza ciascuna news:
ps-lo metto qui xchè il precedente post era troppo lungo
codice:<% 'no security checking %> <% '**************************************************************************************** '** Copyright Notice '** '** Script originale - www.t-dreams.com by Mohamad Al-Karbi '** Modificato da Asunis Daniele - www.j.com '** '** All copyright notices must remain intacked in the scripts '**************************************************************************************** Response.expires = 0 Response.expiresabsolute = Now() - 1 Response.addHeader "pragma", "no-cache" Response.addHeader "cache-control", "private" Response.CacheControl = "no-cache" %> <% response.buffer = true 'get key key = request.querystring("key") if key="" or isnull(key) then key=request.form("key") end if if key="" or isnull(key) then response.redirect "default.asp" 'get action a=request.form("a") if a="" or isnull(a) then a="I" 'display with input box end if ' Open Connection to the database set conn = Server.CreateObject("ADODB.Connection") conn.Open xDb_Conn_Str Select Case a Case "I": ' Get a record to display tkey = key strsql = "SELECT * FROM [accouncements1] WHERE [ID]=" & tkey set rs = Server.CreateObject("ADODB.Recordset") rs.Open strsql, conn If rs.EOF Then Response.Clear Response.Redirect "default.asp" Else rs.MoveFirst End If ' Get the field contents x_Title = rs("Title") x_DetailedNotes = rs("DetailedNotes") x_date = rs("date") x_Keywords = rs("Keywords") rs.Close Set rs = Nothing End Select %> <HTML> <HEAD> <meta http-equiv="Content-Type" content="text/html; charset=utf-8"> <meta name="GENERATOR" content="Microsoft FrontPage 5.0"> <meta name="ProgId" content="FrontPage.Editor.Document"> <META NAME="AUTHOR" CONTENT="DANIELE ASUNIS danieleasunis.com"> <META NAME="description" CONTENT="WWW.DANIELEASUNIS.COM - ARTE - DESIGN - SPIRITUALITA' - ATTUALITA' - SHOPPING - COMMUNITY - LIFESTYLE"> <TITLE><% response.write x_Title %></TITLE> <META NAME="keywords" CONTENT="<% response.write x_Keywords %>"> <LINK REL="stylesheet" TYPE="text/css" HREF="../sadhana/asunis_global.css"> <LINK REL="stylesheet" TYPE="text/css" HREF="../sadhana/asunis_menu.css"> <SCRIPT LANGUAGE="JavaScript" TYPE="text/javascript" SRC="../sadhana/slideshow.js"> </SCRIPT> </HEAD> <BODY> <%Execute IncludeVariables(x_DetailedNotes)%> </BODY> </HTML>

Rispondi quotando