الصفحة الرئيسية>دروس برمجة الشبكات>البرنامج التعليمي لـ ASP

ملخص رمز المصدر الشائع لـ ASP (الجزء 2)

الكاتب：Eve Cole وقت التحديث：2025-03-19 01:48:02

ستشاركك هذه المقالة بعض التعليمات البرمجية المصدر التي يتم استخدامها غالبًا في برمجة ASP. مناسبة للمبتدئين للقراءة. آمل أن يكون ذلك مفيدًا لك ، دعنا نلقي نظرة معًا!

ASP هو اختصار صفحة الخادم النشط ، وهذا يعني صفحة الخادم الديناميكي. ASP هو تطبيق تم تطويره بواسطة Microsoft لاستبدال برامج البرمجة النصية CGI. تابع مع المقالة السابقة >> http://www.vevb.com/kaifa/asp/70602.html

11. اتصال قاعدة البيانات:

  1. <٪
  2. OptionExplicit
  3. DimStartime ، Endtime ، conn ، connstr ، db
  4. وقت البدء = Timer ()
  5. تغيير اسم قاعدة البيانات
  6. DB = DATA/DVBBS5.MDB
  7. setConn = server.createObject (adodb.connection)
  8. connstr = provider = microsoft.jet.oledb.4.0 ؛ datasource = & server.mappath (db)
  9. "إذا كان الخادم الخاص بك يستخدم إصدارًا أقدم من برنامج تشغيل Access ، فيرجى استخدام طريقة الاتصال التالية
  10. 'connstr = driver = {microsoft accessDriver (*. mdb)} ؛ dbq = & server.mappath (db)
  11. Conn.Openconnstr
  12. وظيفة collosedatabase
  13. conn.close
  14. setConn = لا شيء
  15. الوظيفية
  16. ٪>

12.SQL Connection:

  1. <٪
  2. OptionExplicit
  3. DimStartime ، Endtime ، conn ، connstr ، db
  4. وقت البدء = Timer ()
  5. connstr = driver = {sqlserver} ؛ server = hudenq-n11t33nb ؛ uid = sa ؛ pwd = xsfeihu ؛ database = dvbbs
  6. setConn = server.createObject (adodb.connection)
  7. Conn.Openconnstr
  8. وظيفة collosedatabase
  9. conn.close
  10. setConn = لا شيء
  11. الوظيفية
  12. ٪>

13. افتح رمز صفحة الويب باستخدام لوحة المفاتيح:

  1. <scriptLanguage = javaScript>
  2. وظيفة (EventObject)
  3. {
  4. if ((event.ctrlkey && window.event.keycode == 13) || (event.altkey & window.event.keycode == 83)))
  5. {
  6. Window.Open ('موقع الويب' ، '' ، '')
  7. }
  8. }
  9. </script>

فيما يلي رموز Ctrl+Enter و ALT+S بنفسك ثم قم بتغييرها.

14. اجعل الطبقة غير مكتوبة بواسطة رمز التحكم:

  1. <divz-index: 2> <Objectxxx> </bomf> </viv> #front
  2. <divz-index: 1> <Objectxxx> </bomf> </viv> #back
  3. <divid = layer2style = الموضع: المطلق ؛ الأعلى: 40 ؛ العرض: 400px ؛ الارتفاع: 95px ؛ z-index: 2>
  4. <TableHeight = 100 ٪ عرض = 100 ٪ bgColor =#ff0000> <tr>
  5. <tdheight = 100 ٪ عرض = 100 ٪> </td> </tr> </table> <framewidth = 0height = 0> </frame> </viv>
  6. <divid = layer1style = الموضع: مطلق ؛ الأعلى: 50 ؛ العرض: 200px ؛ الارتفاع: 115px ؛ z-index: 1>
  7. <frameHeight = 100 ٪ عرض = 100 ٪> </frame> </div>

15. Dongwang Flash Code:

  1. <ObjectClassid = clsid: D27CDB6E-AE6D-11CF-96B8-444553540000
  2. CodeBase = http: //download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=5،0،0،0
  3. العرض = 468Height = 60>
  4. <ParamName = movievalue = Images/yj16d.swf>
  5. <ParamName = QualityValue = High>
  6. <inmbedsrc = الصور/dvbanner.swfquality = عالية
  7. pluginspage = http: //www.macromedia.com/shockwave/download/index.cgi؟ p1_prod_verse = shockwaveflash ؛
  8. ؛؛؛؛؛؛؛؛؛؛؛؛ ؛ type = application/x-shockwave-flashwidth = 468Height = 60> </bomust>

16.VBS رمز نافذة المنبثقة:

  1. <scriptLanguage = vbscript>
  2. msgbox لم تسجل أو قمت بتسجيل الدخول إلى المنتدى ، 0 ، منتدى بوتيك
  3. location.href = login.asp
  4. </script>

17. استخدم FSO لتعديل وظائف المحتوى الخاصة بالملف:

  1. FunctionFSoChange (اسم الملف ، الهدف ، السلسلة)
  2. Dimobjfso ، objcountfile ، fileTempdata
  3. setObjfso = server.createBject (scripting.filesystemObject)
  4. setObjCountFile = objfso.opentextFile (server.mappath (اسم الملف) ، 1 ، صحيح)
  5. fileTempdata = objcountfile.readall
  6. objcountfile.close
  7. FileTempdata = استبدال (FileTempdata ، الهدف ، السلسلة)
  8. setObjCountFile = objfso.createTextFile (server.mappath (filename) ، true)
  9. objcountfile.writefiletempdata
  10. objcountfile.close
  11. setObjCountFile = لا شيء
  12. setobjfso = لا شيء
  13. الوظيفية

18. الوظائف التي تستخدم FSO لقراءة محتوى الملف:

  1. FunctionFsoFileread (اسم الملف)
  2. Dimobjfso ، objcountfile ، fileTempdata
  3. setObjfso = server.createBject (scripting.filesystemObject)
  4. setObjCountFile = objfso.opentextFile (server.mappath (اسم الملف) ، 1 ، صحيح)
  5. fsofileread = objcountfile.readall
  6. objcountfile.close
  7. setObjCountFile = لا شيء
  8. setobjfso = لا شيء
  9. الوظيفية

19. الوظائف التي تستخدم FSO لقراءة سطر معين من الملف:

  1. FunctionFsolinedIt (اسم الملف ، الكتان)
  2. iflinenum <1thenexitfunction
  3. Dimfso ، F ، Temparray ، Tempcnt
  4. setfso = server.createBject (scripting.filesystemObject)
  5. ifnotfso.filexists (server.mappath (filename)) thenexitfunction
  6. setf = fso.opentextFile (server.mappath (filename) ، 1)
  7. ifnotf.atendofstreamthen
  8. tempcnt = f.readall
  9. F.Close
  10. setf = لا شيء
  11. قالب = انقسام (tempcnt ، chr (13) و CHR (10))
  12. iflinenum> ubund (temparray)+1then
  13. exitfunction
  14. آخر
  15. fsolinedit = temparray (الكتان 1)
  16. Endif
  17. Endif
  18. الوظيفية

20. الوظائف التي تعدل المحتوى الخاص بالملف باستخدام FSO:

  1. FunctionFSoChange (اسم الملف ، الهدف ، السلسلة)
  2. Dimobjfso ، objcountfile ، fileTempdata
  3. setObjfso = server.createBject (scripting.filesystemObject)
  4. setObjCountFile = objfso.opentextFile (server.mappath (اسم الملف) ، 1 ، صحيح)
  5. fileTempdata = objcountfile.readall
  6. objcountfile.close
  7. FileTempdata = استبدال (FileTempdata ، الهدف ، السلسلة)
  8. setObjCountFile = objfso.createTextFile (server.mappath (filename) ، true)
  9. objcountfile.writefiletempdata
  10. objcountfile.close
  11. setObjCountFile = لا شيء
  12. setobjfso = لا شيء
  13. الوظيفية

21. الوظائف التي تستخدم FSO لقراءة محتويات الملفات

:

  1. FunctionFsoFileread (اسم الملف)
  2. Dimobjfso ، objcountfile ، fileTempdata
  3. setObjfso = server.createBject (scripting.filesystemObject)
  4. setObjCountFile = objfso.opentextFile (server.mappath (اسم الملف) ، 1 ، صحيح)
  5. fsofileread = objcountfile.readall
  6. objcountfile.close
  7. setObjCountFile = لا شيء
  8. setobjfso = لا شيء
  9. الوظيفية

22. الوظائف التي تستخدم FSO لقراءة سطر معين من الملف:

  1. FunctionFsolinedIt (اسم الملف ، الكتان)
  2. iflinenum <1thenexitfunction
  3. Dimfso ، F ، Temparray ، Tempcnt
  4. setfso = server.createBject (scripting.filesystemObject)
  5. ifnotfso.filexists (server.mappath (filename)) thenexitfunction
  6. setf = fso.opentextFile (server.mappath (filename) ، 1)
  7. ifnotf.atendofstreamthen
  8. tempcnt = f.readall
  9. F.Close
  10. setf = لا شيء
  11. قالب = انقسام (tempcnt ، chr (13) و CHR (10))
  12. iflinenum> ubund (temparray)+1then
  13. exitfunction
  14. آخر
  15. fsolinedit = temparray (الكتان 1)
  16. Endif
  17. Endif
  18. الوظيفية

في هذه المرحلة ، سأقدمها لك في ملخص رموز ASP شائعة الاستخدام.

مقالات ذات صلة