Dobbelt insert af post
Hej, har et problem jeg ikke kan gennemskue, flg, script opretter en ny post i en db, men gør det at istedet for at 1 post sættes ind sætter den 2 ind. nogen der kan gennemskue det?. Det ser ud som om at når jeg sletter value txtContent opretter den kun en post...<!--#include file="top.asp"-->
<!--#include file="include/settings.asp"-->
<!--#include file="include/common.asp"-->
<%
menu = Request.QueryString("menu")
if Request.QueryString("action") = "save" then
strTitle = Request.Form("txtTitle")
strContent = Request.Form("txtContent")
strGodkendt = Request.Form("menu_godkendt")
IF strGodkendt = "" then strGodkendt = "FALSE"
IF strGodkendt = "on" then strGodkendt = "TRUE"
'response.write strContent
'response.end
set rs=db.execute("SELECT max(menu_id) as id from " & request.querystring("menu") & "")
newid=rs("id")+1
set rs=db.execute("SELECT max(menu_zorder) as zorder from " & request.querystring("menu") & " where menu_parent=" & request.form("id"))
zorder=rs("zorder")
if isnull(zorder) then
zorder=1
else
zorder=zorder+1
end if
sql= "insert into menustruktur(menu_id, menu_title, menu_short, menu_run, menu_end, menu_godkendt, menu_parent, menu_zorder, menu_count, menu_cut, menu_oprettet, menu_author, menu_change, menu_authorupdate , menu_body) values ("
sql= sql & newid & ", "
sql= sql & "'" & replace(strTitle,"'","''") & "', "
sql= sql & "'" & request.form("txtShort") & "', "
sql= sql & "'" & request.form("strstart") & "', "
sql= sql & "'" & request.form("strslut") & "', "
sql= sql & strGodkendt & ", "
sql= sql & request.form("id") & ", "
sql= sql & zorder & ", "
sql= sql & "'0'" & ", "
sql= sql & "'0'" & ", "
sql= sql & "'" & FormatDateTime(now()) & "', "
sql= sql & "'" & session("fornavn") & " " & session("efternavn") & "', "
sql= sql & "'" & FormatDateTime(now()) & "', "
sql= sql & "'" & session("fornavn") & " " & session("efternavn") & "', "
sql= sql & "'" & replace(strContent,"'","''") & "')"
db.execute(sql)
response.write sql
response.end
set rs=nothing
Response.Redirect "edit_submenu.asp?area=cms&file=" & file & "&version=" & version & "&menu=" & menu
end if
%>
<FORM METHOD="post" ACTION="add_submenu.asp?area=<%=area%>&file=<%=file%>&version=<%=version%>&action=save&menu=<%response.write menu%>" NAME="SaveForm" ID=Form1>
<pre id="idTemporary" name="idTemporary" style="display:none">
<%=strContent%>
</pre>
<table width="100%" cellpadding="0" cellspacing="0">
<TR>
<td width="50"><input type="image" src="gfx/gem.jpg" alt="Gem dokument" onclick="save()"></td><td width="100"><img src="gfx/preview.jpg" alt="Se dette dokument i din browser"></td>
<TD width="50" valign="center"><b>Menutitel : </b></td><td valign="center"><INPUT class="input" type="text" name="txtShort" size=25 maxlength=25 value="<%=strShort%>"><br></TD>
<TD width="100" valign="center"><b>Indholdsoverskrift : </b></td><td valign="center"><INPUT class="input" type="text" name="txtTitle" size=30 maxlength=100 value="<%=strTitle%>"></TD>
</tr>
</table>
<table>
<tr>
<td>
<INPUT TYPE="hidden" NAME="id" VALUE=<%=request.querystring("id")%>>
<input type="hidden" name="txtContent" value="" ID=txtContent>
</td>
</tr>
</table>
<table width="100%">
<tr>
<td colspan="3" background="gfx/stipv.gif"></td>
</tr>
<tr>
<TD width="300" valign="top">Vælg publiceringsdato for dokumentet : </td><td valign="top" width="85"><input class="input" type="text" name="strStart" size="10" Value="<%response.write date%>"></td><td valign="top" width="56"><A href="java script:ShowDate('SaveForm.strStart',this.SaveForm.strStart.value)"><img src="gfx/dato.gif" border="0"></a></td>
</tr>
<tr>
<TD valign="top">Vælg evt. slutdato for dette dokument :</td><td valign="top" width="85"><input class="input" type="text" name="strSlut" size="10" Value="01-01-2050"></td><td valign="top" width="56"><A href="java script:ShowDate('SaveForm.strSlut',this.SaveForm.strSlut.value)"><img src="gfx/dato.gif" border="0"></a></TD>
</tr>
<tr>
<td colspan="3" background="gfx/stipv.gif"></td>
</tr>
<tr>
<%if session("level") = "1" then%>
<TD valign="top">Publiceret dokument :</td><td colspan="2" valign="top"><INPUT TYPE="checkbox" NAME="menu_godkendt" <% =mark %> style="font-size: 10 px; border-style: solid; border-width: 0"></TD>
<%else%>
<TD valign="top">Aktiv :</td><td colspan="2" valign="top"><%if strGodkendt=true then strGodkendt="Ja" else strgodkendt=Nej%><%=strGodkendt%></TD>
<%end if%>
</TR>
</table>
</form>
<!--#include file="bottom.asp"-->
