CMS - edit........... vis ændringer ?
Jeg her følgende kode som viker fint, MEN der er et problem :-(Hvordan får jeg lavet det sådan at man ser ændringerne og ikke html-koden i tekst boksene.......... ?
KODE:
-------------------------------------------------------
<% @ LANGUAGE="VBScript" %>
<% Response.Expires = 0 %>
<!--#INCLUDE file="db/test.asp" -->
<%
response.write "<script>function GetDialogWin(my_url,win_name,width_x,height_y,top_pos,left_pos,scrollbars) { var editwin = """";editwin = editwin + ""width="" + width_x;editwin = editwin + "",height="" + height_y;editwin = editwin + "",resizable=yes""; editwin = editwin + "",scrollbars=yes"";editwin = editwin + "",menubar=no"";editwin = editwin + "",toolbar=no"";editwin = editwin + "",directories=no"";editwin = editwin + "",location=no"";editwin = editwin + "",status=no"";editwin = editwin + "",top="" + top_pos;editwin = editwin + "",left="" + left_pos;editwin_win = window.open(my_url,win_name,editwin);editwin_win.focus();editwin_win.opener = self;return (editwin_win);}</script>"
%>
<script language=javascript>
<!--
var sT , toinsert
function checkFocus()
{
if (toinsert)
document.selection.createRange().text='<HR noshade size="1">';
else
alert("Sæt makøren der hvor du vil indsætte et linieskift!");
}
function changeUrl(surl)
{
if(surl == "")
return(false);
sT.text = "<a href=\"" +surl+ "\">"+ sT.text + "</a>";
return(true);
}
function createLink()
{
sT = document.selection.createRange();
sTxt = sT.text;
if(!sTxt.length > 0)
{
alert("Markere den tekst du vil bruge som link!");
return( false);
}
var mywin = GetDialogWin('','tetst',350,110,50,150,'no');
mywin.document.title="Insert Link";
mywin.document.writeln("<font face=\"verdana\" size=1>");
mywin.document.writeln("<b>" + sTxt + "</b>");
mywin.document.writeln("<br>Skriv adressen:");
mywin.document.writeln("<br><input type=text name=\"vtxt2\" target=\"_self\" size=\"35\" value=\"http://www. \">");
mywin.document.writeln("<input type=button value=\"Ok\" onClick=\"opener.changeUrl(vtxt2.value);window.close();\">");
mywin.document.writeln("<br><input type=button value=\"Tjek Link\" onClick=\"opener.GetDialogWin(vtxt2.value,'CheckUrl',550,310,150,250,'no');\">");
}
function createEmail()
{
sT = document.selection.createRange();
sTxt = sT.text;
if(!sTxt.length > 0)
{
alert("Markere den tekst du vil bruge som mail-adresse link!");
return( false);
}
var mywin = GetDialogWin('','tetst',350,110,50,150,'no');
mywin.document.title="Insert Link";
mywin.document.writeln("<font face=\"verdana\" size=1>");
mywin.document.writeln("<b>" + sTxt + "</b>");
mywin.document.writeln("<br>Skriv mail-adressen:");
mywin.document.writeln("<br><input type=text name=\"vtxt2\" size=\"35\" value=\"mailto:\">");
mywin.document.writeln("<input type=button value=\"Ok\" onClick=\"opener.changeUrl(vtxt2.value);window.close();\">");
}
function makeBold()
{
sT = document.selection.createRange();
sTxt = sT.text;
if(!sTxt.length > 0)
{
alert("Markere den tekst du vil gøre fed!");
return( false);
}
sT.text = "<strong>" + sTxt + "</strong>";
}
function makeItalic()
{
sT = document.selection.createRange();
sTxt = sT.text;
if(!sTxt.length > 0)
{
alert("Markere den tekst du vil gøre kursiv!");
return( false);
}
sT.text = "<i>" + sTxt + "</i>";
}
function makeBigger()
{
sT = document.selection.createRange();
sTxt = sT.text;
if(!sTxt.length > 0)
{
alert("Markere den tekst du vil gøre større!");
return( false);
}
sT.text = "<big>" + sTxt + "</big>";
}
function makeSmaller()
{
sT = document.selection.createRange();
sTxt = sT.text;
if(!sTxt.length > 0)
{
alert("Markere den tekst du vil gøre mindre!");
return( false);
}
sT.text = "<small>" + sTxt + "</small>";
}
function unFormat()
{
var outtext = "";
var flag = 0;
var i = 0;
sT = document.selection.createRange();
sTxt = sT.text;
while(i <= sTxt.length)
{
c = sTxt.charAt(i)
if(c == "<")
flag++;
if(flag==0)
outtext += c;
if(c == ">")
flag--;
i++;
}
if(flag==0)
sT.text = outtext;
else
alert("error");
}
//-->
</script>
<script language="JavaScript">
<!--
function tjekform(form) {
if (form.Overskrift.value == "") {
alert("Husk at indtaste en overskrift !")
return false
}
if (form.Afsnit.value == "") {
alert("Husk at udfylde afsnits feltet !")
return false
}
return true;
}
//-->
</script>
<%
If Request.Form("Action") = "Opdater" Then
session("SideTitel") = Replace(Request.Form("Overskrift"), "'", "''")
session("SideTekst") = Replace(Request.Form("Afsnit"), "'", "''")
'Updater indtastet data
strSQL = "UPDATE Sideindhold SET SideTitel='"& session("SideTitel") &"', SideTekst='"& session("SideTekst") &"' WHERE SideID='" & session("SideID") & "'"
set rs = Conn.Execute(strSQL)
'Luk databasen
conn.Close
Set Conn = Nothing
session("sideopda") = "ok"
Response.Redirect "start.asp"
%>
<%
Else
' Udskriv alt fra tabellen Forside
strSQL = "Select * FROM Sideindhold WHERE SideID = '" & request.querystring("ID") & "'"
set rs = Conn.Execute(strSQL)
session("SideID") = rs("SideID")
session("SideTitel") = rs("SideTitel")
session("SideTekst") = rs("SideTekst")
'Lukker databasen
conn.Close
Set Conn = Nothing
%>
<form onSubmit="return tjekform(this)" name="form" method="post" action="file:///C|/Inetpub/wwwroot/Projekter/NeoCon.dk/neoconedit/opdater_indhold.asp?pageId=<%= session("Sidenavn") %>">
<table width="575" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td><b>Ret indholdet på:</b> <%= session("SideID") %></td>
</tr>
<tr>
<td align="center"> <br>
<table width="75%" border="0" cellpadding="0" cellspacing="0" bordercolor="#999999">
<tr align="center">
<td><a href="#"><img src="file:///C|/Inetpub/wwwroot/Projekter/NeoCon.dk/neoconedit/images/BOLD.gif" width="23" height="22" border="0" alt="Fed tekst" onClick="makeBold();"></a></td>
<td><a href="#"><img src="file:///C|/Inetpub/wwwroot/Projekter/NeoCon.dk/neoconedit/images/bigger.gif" width="23" height="22" border="0" alt="Stor tekst" onClick="makeBigger();"></a></td>
<td><a href="#"><img src="file:///C|/Inetpub/wwwroot/Projekter/NeoCon.dk/neoconedit/images/smaller.gif" width="23" height="22" border="0" alt="Lille tekst" onClick="makeSmaller();"></a></td>
<td><a href="#"><img src="file:///C|/Inetpub/wwwroot/Projekter/NeoCon.dk/neoconedit/images/at.gif" width="23" height="22" border="0" alt="Indsæt e-mail adresse" onClick="createEmail();"></a></td>
<td><a href="#"><img src="file:///C|/Inetpub/wwwroot/Projekter/NeoCon.dk/neoconedit/images/LINK.gif" width="23" height="22" border="0" alt="Indsæt link" onClick="createLink();"></a></td>
<td><a href="#" onMouseDown="checkFocus();"><img src="file:///C|/Inetpub/wwwroot/Projekter/NeoCon.dk/neoconedit/images/hr.gif" width="22" height="4" border="0" alt="Indsæt linie"></a></td>
<td><a href="#"><img src="file:///C|/Inetpub/wwwroot/Projekter/NeoCon.dk/neoconedit/images/undo.gif" width="23" height="22" border="0" alt="Fortryd" onClick="unFormat();"></a></td>
</tr>
</table>
<hr width="100%" size="1" align="center">
<br>
</td>
</tr>
<tr>
<td align="left"> <b> Overskrift:</b> </td>
</tr>
<tr>
<td align="center">
<input type="text" name="Overskrift" class="text_felt" size="65" onFocus="toinsert=true;" onBlur="toinsert=false;" value="<%= session("SideTitel")%>">
<hr width="100%" size="1" align="center">
<br>
</td>
</tr>
<tr>
<td align="left"><b>Afsnit:</b> </td>
</tr>
<tr>
<td align="center">
<textarea name="Afsnit" class="text_felt" cols="64" rows="15" onFocus="toinsert=true;" onBlur="toinsert=false;"><%= session("SideTekst")%></textarea>
<hr width="100%" size="1" align="center">
</td>
</tr>
<tr>
<td align="center" height="34">
<input type="submit" name="Action" value="Opdater" class="knap">
</td>
</tr>
</table>
</form>
<% End If %>
