<html dir="rtl">
<head>
<meta name="verify-v1" content="BnfsFfYT6nNW4AcnOhWGZAgtpjcsVw51ehnhYAKW5Lc=" />
<title></title>
<link rel="stylesheet" type="text/css" href="styles.css">
</head>
<body background="panelpic/3D_adamant_enlemency.jpg">
<center>
<form method="post">
<select name="what2delete">
<option value="seker">סקר</a>
<option value="invites">הזמנות</a>
<option value="news">עדכונים</a>
</select>
<% delete_item=Request.Form("what2delete") %>
<font size="4">סיסמת הבטחון היא:
</font>
<br>
<img src="panelpic/delp.gif">
<% If IsEmpty(Request.Form("safe")) Then %>
<div align=center>
הקש סיסמת בטחון:
<br>
<input type="password" name="safe">
<br>
<input type="submit">
</form>
</div>
<% Else %>
<% If Request.Form("safe")="delp" Then %>
<%
Set oConn = Server.CreateObject("ADODB.Connection")
oConn.Open "Driver={Microsoft Access Driver (*.mdb)};" & _
"Dbq= D:\content\users1\aviad\db\("&delete_item&").mdb;" & _
"Uid=admin;" & _
"Pwd=;"
%>
<% Change= "DELETE From table1" %>
<%
oConn.Execute(Change)
oConn.close
Set oConn= nothing
%>
<br>
<font color="red">הנתונים אופסו בהצלחה</font>
<% Else %>
<div align=center>
קוד האבטחה שגוי
<br>
<form method="post">
<input type="password" name="safe">
<br>
<input type="submit">
</form>
</div>
<% End If %>
<% End If %>
גירסת הדפסה
סגן המנהל
מפקח
Winner
צל"ש
מומחה
