รหัสต้นฉบับเพื่อการศึกษา

File : crtsearch.asp. ID : 2403

Skin : Default | Sons-of-obsidian | Sunburst | Highlighter | Frame

<%
set ftxt=createobject("scripting.filesystemobject")
set ln = ftxt.createtextfile(server.mappath("/cgi-bin/search.dat"),true)
ln.writeline("thaiall dot com:www.thaiall.com:Web for education in thai")
ln.writeline("PERLPHPASP:www.perlphpasp.com:CGI programming 3 language")
ln.write("yahoo dot com:")
ln.write("www.yahoo.com:")
ln.writeline("Search engine for everyone")
ln.close
response.write "Create : ok"
%>