مثال على تحميل الملفات الخالية من مكونات المجال متعدد الأشكال تحت ASP

في الآونة الأخيرة ، غالبًا ما يطرح الناس هذا النوع من الأسئلة ، لذلك سأقوم بنشره هنا ، المحتوى:

1. بنية جدول قاعدة البيانات (الوصول):

معرف المستخدم: نص (معرف المستخدم الذي يحفظ الملف الذي تم تحميله)

FileContentType: Text (يستخدم لحفظ نوع الملف الذي تم تحميله ، على سبيل المثال: "Application/Msword" ، والذي يستخدم بشكل أساسي لتمكين المستخدمين من تنزيل هذا الملف بشكل صحيح)

FileContent: OleObject (حفظ بيانات الملف)

2. ملفات HTML

muploadfile.htm

<PormName = "Upload_file" enctype = "multipart/form-data" Action = "muploadfile.asp" method = post>

<inputType = HiddenName = "userId" value = "ABC">

<pecttype = hiddenname = "fileUploadStart"> 'يتم استخدام هذا للإشارة إلى بدء تحميل بيانات الملف

Filetosend:

<pecttype = "file" name = "file_up" size = "30"> <br>

<pecttype = "file" name = "file_up" size = "30"> <br>

يتم استخدام <inputType = HiddenName = "FileUploadend"> "للإشارة إلى نهاية بيانات الملف

<inputType = submitValue = submit>

</form> </p> <p>

3. ملفات ASP

muploadfile.asp </p> <p> <٪

استجابة. expires = 0

FunctionBin2str (Binstr)

Dimvarlen ، Clow ، CCC ، Skipflag </p> <p> skipflag = 0

CCC = ""

ifnotisnull (binstr) ثم

varlen = lenb (binstr)

fori = 1tovarlen

ifskipflag = 0then

clow = midb (binstr ، i ، 1)

Ifascb (clow)> 127then

CCC = CCC & CHR (ASCW (MIDB (BINSTR ، I+1،1) & CLOW))

Skipflag = 1

آخر

CCC = CCC و CHR (ASCB (CLOW))

Endif

آخر

Skipflag = 0

Endif