trp: Datensatz wird doppelt hinzugefügt

Beitrag lesen

Hallo!

Ich versuche einen Datensatz zu einer Datenbank hinzuzufügen.
Wenn ich als Browser Firefox verwende klappt es ohne Probleme. Sobald ich IE verwende wird der Datensatz immer doppelt hinzugefügt (verschiedenste PCs getestet). Er ist dann zweimal in der Datenbank.

Ich schlage mich seit Wochen mit dem Problem rum. Keine Ahnung woran es liegt. Würde mich freuen wenn mir jemand helfen kann.

Vielen Dank!
vg trp

-------------------------------------------------
Poste hier mal den Code der Datei mit dem Form:

<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
</head>
<body>

<form method="POST" name="form_hinzufuegen20" action="process/Reviewing.asp">
          <textarea rows="5" name="TextNeu" cols="50" class="field"></textarea>
          <input type="hidden" name="Process" value="Hinzufuegen">
          <input type="hidden" name="PflanzeID" value="1">
          <input type="hidden" name="FeldName" value="20">
          <input name="New" onClick="document.form_hinzufuegen20.submit()" type="image" src="img/save15px.gif" BORDER="0" width="15" height="15">
        </form>

</body>
</html>
---------------------------------------------------------

Code der aufgerufenen Datei:
<%
'###############
' Request Variables
'###############
  PflanzeID = Request("PflanzeID")
  Process = Request("Process")
  strMessage = Request("TextNeu")
  FeldName = Request("FeldName")

if Process="Hinzufuegen" then

'----------- Connection-Objekt instanziieren
 set conn = server.CreateObject("ADODB.Connection")
 strConn = "Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;"
 strConn = strConn & "Data Source=" & server.MapPath("../../fpdb/") & "/db1.mdb;"
'----------- Connection öffnen
 conn.Open strConn
 strInsert = "INSERT INTO tblReview (PflanzeID, ReviewActiv, FeldName, ReviewTXT, Autor, aktuellerEditor ) VALUES ('" & PflanzeID & "', True, '" & FeldName & "', '" & strMessage & "', '1', '2')"
'----------- Datensatz hinzufügen
 conn.Execute strInsert
'----------- Objekte zerstören
set conn = nothing

end if
%>