การแลกเปลี่ยนข้อมูลระหว่างไฟล์ข้อความและไฟล์ฐานข้อมูลใน ASP
แอปพลิเคชันฐานข้อมูลเครือข่ายเป็นองค์ประกอบที่สำคัญมากของ www อาจกล่าวได้ว่าหากฐานข้อมูลหายไปเครือข่ายจะสูญเสียจิตวิญญาณ คุณสามารถจินตนาการได้ว่ามันยากแค่ไหนในการหาเป้าหมายออนไลน์โดยไม่มีเครื่องมือค้นหาเช่น Yahoo และ Sohu ทุกคนสับสนและสูญเสียทางในทะเลที่กว้างใหญ่ของอินเทอร์เน็ต อันที่จริงแล้วเครื่องมือค้นหาเหล่านี้เป็นแอพพลิเคชั่นทั่วไปของฐานข้อมูลเครือข่าย มีการดำเนินการโดยตรงมากมายเกี่ยวกับฐานข้อมูลในเทคโนโลยี ASP (หน้าเซิร์ฟเวอร์ที่ใช้งานอยู่) ต่อไปนี้อธิบายวิธีการส่งข้อมูลจากไฟล์ข้อความไปยังไฟล์ฐานข้อมูล
แบบฟอร์มข้อความนี้ถูกรวบรวมและส่งไปยังไดเรกทอรีคงที่ของเซิร์ฟเวอร์โดยเทอร์มินัล เซิร์ฟเวอร์อ่านข้อมูลและเก็บไว้ในฐานข้อมูลท้องถิ่น หลังจากการแปลงไฟล์ข้อความจะถูกลบ ด้วยวิธีนี้เทอร์มินัลมีหน้าที่รวบรวมข้อมูลและอัปโหลดไปยังไดเรกทอรีที่กำหนดของเซิร์ฟเวอร์ในรูปแบบที่กำหนด ฐานข้อมูลฝั่งเซิร์ฟเวอร์นั้นทึบไปยังเทอร์มินัลอย่างสมบูรณ์เพื่อให้มั่นใจถึงความปลอดภัยของเซิร์ฟเวอร์และอาจมีประโยชน์สำหรับแอปพลิเคชันฐานข้อมูลเครือข่ายปัจจุบัน
txttolib.asp
<html>
<head>
<meta http-equiv = refresh content = 30; url = deltext.asp>
<meta http-equiv = ประเภทเนื้อหา
content = text/html; charset = gb_2312-80>
<meta name = generator content = Microsoft FrontPage Express 2.0>
<title> [แปลงไฟล์ข้อความเป็นไฟล์ฐานข้อมูล] </title>
</head>
<body bgcolor =#ffffff>
<align = center>
<p allign = center> <font color =#ff0000> ข้อมูลกำลังถูกประมวลผลโปรดรอ!
<br>
</font> <font color =#000000> <align = center> <%
str = server.mappath (/) 'รับไดเรกทอรีรูทของเซิร์ฟเวอร์
ตั้งค่า fso = createObject (scripting.filesystemobject)
ตั้งค่า f = fso.getFolder (str & /thetext)
ตั้งค่า fc = f.files
k = 1
สำหรับ F1 แต่ละตัวใน FC
ไฟล์ (k) = f1.name 'รับชื่อไฟล์ทั้งหมดภายใต้พา ธ นี้
k = k+1
ต่อไป
%> <%ii = 1%> <%
ตั้งค่า fs = createObject (scripting.filesystemobject)%> <%
ในขณะที่ II <k
Response.write File (II) & <br>
ตั้งค่า textinstance = fs.opentextfile (str & / thetext / & ไฟล์ (ii), 1, เท็จ, เท็จ) 'เปิดไฟล์เพื่ออ่านข้อมูล
ในขณะที่ textinstance.atendofstream <> true 'หากไฟล์ไม่สิ้นสุด
Visitornum = TextInstance.readline 'อ่านบรรทัดข้อมูล
J = 0
CD = LEN (Visitornum)
สำหรับ i = 1 ถึง cd
ถ้า mid (visitornum, i, 1) = ดังนั้น 'ข้อมูลจะถูกคั่นด้วย ","
j = j+1
อื่น
เลือก Case J 'รับแต่ละค่าข้อมูลแยกกัน
กรณี 0
me1 = me1+mid (เยี่ยมชม, ฉัน, 1)
กรณีที่ 1
me2 = me2+mid (เยี่ยมชม, ฉัน, 1)
กรณีที่ 2
me3 = me3+mid (เยี่ยมชม, ฉัน, 1)
กรณีที่ 3
me4 = me4+mid (เยี่ยมชม, ฉัน, 1)
กรณีที่ 4
me5 = me5+mid (เยี่ยมชม, ฉัน, 1)
กรณีที่ 5
me6 = me6+mid (เยี่ยมชม, ฉัน, 1)
สิ้นสุดเลือก
สิ้นสุดถ้า