وظائف معالجة الملفات شائعة الاستخدام في ASP

في ASP ، وخاصة في أنظمة CMS التي تحتاج إلى إنشاء حالات ثابتة ، غالبًا ما يتم الحكم على بعض الملفات وإنشائها وحذفها. اليوم ، قام محرر The Error New Technology Channel بتصنيفها هنا ، والتي تلبي الاحتياجات الأساسية بشكل أساسي.

وظائف مخصصة شائعة الاستخدام في ASP للتعامل مع تحميل الملف وحذفه

<٪

'' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' ' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '

'جميع وظائف VBS مخصصة

'' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' ' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '

وظيفة deletefile (اسم الملف) 'حذف الملف

إذا كان اسم الملف <> "" ثم

set fso = server.createObject ("scripting.filesystemObject")

إذا fso.filexists (اسم الملف) ثم

fso.deletefile اسم الملف

إنهاء إذا

تعيين fso = لا شيء

إنهاء إذا

وظيفة نهاية

'' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' ' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '

الوظيفة التي تم إنشاؤها (Byval LocalPath) "البرنامج الذي ينشئ دليلًا. إذا كان هناك عدة مستويات من الدلائل ، فإنه يخلقها مستوى واحد في كل مرة

عند استئناف الخطأ التالي

LocalPath = استبدال (LocalPath ، "/" ، "/")

set fileObject = server.createObject ("scripting.filesystemObject")

patharr = split (localpath ، "/")

path_level = ubund (patharr)

لأني = 0 إلى path_level

إذا كان i = 0 ثم pathtmp = patharr (0) و "/" else pathtmp = pathtmp & patharr (i) & "/"

CPATH = LEFT (PATHTMP ، LEN (PATHTMP) -1)

إذا لم يكن fileObject.folderexist

التالي

تعيين fileObject = لا شيء

إذا err.number <> 0 ثم

Createdir = false

err.clear

آخر

Createdir = صحيح

إنهاء إذا

وظيفة نهاية

'' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' ' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '

دالة SaverAndFilename (Byval Szfilename) "إنشاء اسم ملف عشوائي جديد بناءً على اسم الملف الأصلي

عشوائي

'rannum = int (90000*rnd) +10000

"إذا شهر (الآن) <10 ثم c_month =" 0 "والشهر (الآن) آخر c_month = الشهر (الآن)

"إذا كان اليوم (الآن) <10 ثم c_day =" 0 "واليوم (الآن) آخر c_day = day (الآن)

"إذا ساعة (الآن) <10 ثم c_hour =" 0 "والساعة (الآن) أخرى c_hour = ساعة (الآن)

"إذا كانت دقيقة (الآن) <10 ثم c_minute =" 0 "و Minute (الآن) أخرى c_minute = دقيقة (الآن)

"إذا الثانية (الآن) <10 ثم c_second =" 0 "والثاني (الآن) آخر c_second = دقيقة (الآن)

filext_a = split (szfilename ، ".")

fileext = lace (fileext_a (ubund (filext_a))))

caverandfilename = استبدال (استبدال (الآن (الآن ، ":" ، "") ، "-" ، "") ، "" ، ") & int (10*rnd) &". "& filext

"ANDERANTORANDOMFILENAME = YEAR (الآن) & C_MONTH & C_DAY & C_HOUR & C_MINUTE & C_SECOND &" _ "& Rannum &". "& filext

وظيفة نهاية

'' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' ' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '

دالة jaron_replacer (strcontent ، start_string ، end_string ، replist_string)

وظيفة استبدال CMS: سلسلة المصدر ، الجزء الأول ، الجزء الأخير ، استبدال الأحرف

إعادة السلسلة التي تم استبدالها

jaron_replacer = استبدال (strcontent ، mid (strcontent ، instr (strcontent ، start_string) ، instr (strcontent ، end_string)+len (end_string) -1) ، replist_string)

وظيفة نهاية

'' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' ' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '

وظيفة replaceplus (strcontent ، start_string ، end_string ، replist_string)

في المستند ، احذف جميع الأحرف بين البداية والنهاية

عند استئناف الخطأ التالي

MarkCounts = Ubund (تقسيم (strcontent ، start_string))

prestring = strcontent

ل I = 0 إلى MarkCounts

startMark = instr (1 ، prestring ، start_string ، 1)

إذا كانت البداية = 0 ثم الخروج من أجل

compmark = instr (1 ، prestring ، end_string ، 1) + len (end_string)

VERSTRING = MID (PRESTRING ، StartMark ، Compmark - StartMark)

prestring = استبدال (prestring ، verstring ، replist_string)

التالي

replaceplus = prestring

إذا err.number <> 0 ثم err.clear

وظيفة نهاية

'' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' ' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '

٪>

المقالة أعلاه تدور حول وظائف معالجة الملفات شائعة الاستخدام في ASP. أعتقد أن الجميع يعرف معظمهم. ستواصل قناة التكنولوجيا الجديدة الخاطئة جمع المزيد من المعرفة المفيدة لك. آمل أن تتمكن من فهم النوايا الحسنة للمحرر. إذا كنت تحب هذه المقالة ، فاستمر في متابعتنا!