يتم حفظ الصورة تلقائيًا في المنطقة المحلية واستخدام ASPJPEG لإضافة علامة مائية إلى الصورة

<٪

وظيفة الوظيفة: يتم حفظ الصورة عن بُعد تلقائيًا على الخادم المحلي ، والعلام المائي الصورة باستخدام ASPJPEG

'(ملاحظة: يرجى إنشاء دليل الصور في الدليل أولاً لحفظ الصور المؤقتة)

"يحتاج هذا البرنامج إلى تثبيت" مكون ASPJPEG "على الخادم ، وإلا فلن يتم استخدامه بشكل طبيعي

يمكنك أيضًا أخذ الأجزاء المذكورة أعلاه فقط '' '' 222222 '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' ' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' ' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '

'كيفية الاستخدام ، يرجى saveimg.asp

'saveimg.asp؟ url = http: //siyizhu.com/logo.gif يمكنك إزالة الصورة ، hoho. وظائف أخرى تحتاج إلى إضافتها ، يرجى توسيعها بنفسك.

كيف تحصل على ملفات لاحقة أخرى؟ بالطبع ، لا بأس

'(jpg | gif | png | bmp) إلى (mp3) أفهم؟ إنه مجرد اسم ملف مع لاحقة MP3. وهلم جرا. هيه

server.scriptTimeout = 99999

constsavepath = "الصور" 'الصور حفظ المسار

url = request ("url")

FunctionMyreplace (Str)

newsstr = str

setObJregex = NewRegexp

objregex.ignorecase = صحيح

objregex.global = صحيح

objregex.pattern = "http: // (.+؟)/. (jpg | gif | png | bmp)"

setMatches = objregex.execute (str)

foreachMatchinMatches

NewsStr = استبدال (NewsTr ، Match.value ، SaveImg (match.value))

التالي

myreplace = newstr

الوظيفية

FunctionSaveimg (url)

temp = split (url ، ".")

ما يلي هو إعادة تسمية اسم الملف مع مرور الوقت والأرقام العشوائية

عشوائي

rannum = int (90000*rnd) +10000

FILENAME = YEAR (الآن) وشهر (الآن) و DAY (الآن) وساعة (الآن) و Minute (الآن) والثاني (الآن) و RANNUM & ".

'اسم الملف ينتهي إعادة تسمية

setxmlhttp = server.createBject ("microsoft.xmlhttp")

XMLHTTP.Open "GET" ، url ، false

XMLHTTP.SEND

IMG = XMLHTTP.ResponseBody

setXMLHTTP = لا شيء

setObjadoStream = server.createBject ("adodb.stream")

objadostream.open ()

ObjadoStream.type = 1

ObjadoStream.write (IMG)

objadostream.savetofile (server.mappath (SavePath & Filename))

objadostream.seteos

setobjadoStream = لا شيء

'' '' '' 2222222222 '' '' '' '' '' '' '' '' '' '' '' '' '' '' ''

SaveImg = SavePath & Filename'get Save Path

dimjpeg

setjpeg = server.createBject ("persits.jpeg")

jpeg.openserver.mappath (SaveImg) "افتح المسار لحفظ الصورة

أضف العلامة المائية النصية

jpeg.canvas.font.color = & hff0000'red

jpeg.canvas.font.family = "宋体"

jpeg.canvas.font.bold = true

jpeg.canvas.printjpeg.originalwidth-200 ، jpeg.originalheight-50 ، "siyizhu.com" "المسافة من العلامة المائية إلى اليس

"حفظ الملف

jpeg.saveserver.mappath (SaveImg) "حفظ الصورة بعد إضافة العلامة المائية

كائن تسجيل الدخول

setjpeg = لا شيء

الوظيفية

٪>

انتبه إلى دعم مكون الخادم الخاص بك.