Salinan kode adalah sebagai berikut:
<%
db = "market.asp" 'ubah ke alamat database Anda
setConn = server.CreateObject ("adodb.connection")
connstr = "provider = microsoft.jet.oledb.4.0; datasource =" & server.mappath (db)
Conn.openconnstr
Conn.execute ("CreateTableNoTDownLoad (NotDownleObject)")
setRs = server.CreateObject ("adodb.recordset")
sql = "pilih*fromnotdownload"
rs.opensql, Conn, 1,3
rs.addnew
RS ("notdown"). AppendChunk (chrb (ASC ("<")) & chrb (ASC ("%"))))
rs.update
rs.close
setRs = tidak ada
Conn.Close
setConn = tidak ada
%>