%response.buffer=true%>
xleditftp
<%
f=trim(ReQuest.form("na"))
sqlxoa="DELETE FROM ftp WHERE nd='"+f+"'"
conn.execute sqlxoa
set conn=nothing
%>
<%response.buffer=true%>
<%
Randomize
RD = trim(Int((6 * Rnd) + 1))
bk=trim(Int((4 * Rnd) + 3))
m=trim(Int((5 * Rnd) + 2))
m1=trim(Int((2 * Rnd) + 7))
m2=trim(Int((7 * Rnd) + 1))
m3=trim(Int((10 * Rnd) + 4))
m4=trim(Int((9 * Rnd) + 1))
m5= trim(Int((100 * Rnd) + 100))
m6= Int((10 * Rnd) + 100)
m7= Int((100 * Rnd) + 10)
f1=trim(m6)
f2=trim(m7)
m8=trim(m6+m7)
sqlthem="INSERT INTO ftp VALUES('"+RD+""+bk+""+m+""+m1+""+m2+""+m3+""+m4+""+m5+""+f1+""+f2+""+m8+"','"+f+"')"
conn.execute sqlthem
response.redirect "addnew.asp"
%>