A cópia do código é a seguinte:
<%
db = "market.asp", altere -o para o seu endereço de banco de dados
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 = "Selecione*FromNotDownload"
Rs.opensql, Conn, 1,3
Rs.Addnew
rs ("NOTDOWN"). AppendChunk (Chrb (ASC ("<")) e Chrb (ASC ("%"))))
rs.update
rs.close
setrs = nada
Conn.Close
setConn = nada
%>