التعليمة البرمجية التالية هي طريقة لاستبدال الأحرف، وليست تعبيرًا عاديًا Function content_Code(Str)
خافت ary_String,i,n,n_pos
ary_String=split(Str,[code])
ن=ubound(ary_String)
إذا ن <1 ثم
content_Code=Str
وظيفة الخروج
نهاية إذا
لأني = 1 إلى ن
n_pos=inStr(ary_String(i),[/ كود ])
إذا n_pos>0 ثم
ary_String(i)=<br /><textarea class=gocode id=runcode&i& name=runcode&i&> & server.HTMLEncode(left(ary_String(i),n_pos-1))&</textarea><br /><نوع الإدخال =فئة الزر=قيمة كود الإدخال=تشغيل الكود عند النقر=runCode(runcode&i&)><نوع الإدخال=فئة الزر=رمز الإدخال value=نسخ الكود onclick=copycode(runcode&i&)><input type=button class=input-code value=حفظ الكود onclick=saveCode(runcode&i&)><span class=code-tishi>نصيحة: يمكنك تعديل جزء من الكود قبل تشغيله </span><br /> & _
حق (ary_String (i)،لين (ary_String (i))-n_pos-6)
آخر
ary_String(i)=[كود] & ary_String(i)
انتهي إذا
التالي
content_Code=join(ary_String,)
وظيفة النهاية
الاستخدام أيضًا بسيط جدًا:
عند نشر مقال، تحتاج إلى استخدام وظيفة التعليمات البرمجية قيد التشغيل بشكل أساسي
[كود] [/كود]
على سبيل المثال:
[انسخ هذا الكود]الكود:
[شفرة]
<نوع البرنامج النصي=نص/جافا سكريبت>
تنبيه (بسيط)؛
</script>
[/شفرة]
تجدر الإشارة إلى أنه يجب إدخال جافا سكريبت التالي في الصفحة المعروضة:
وظيفة كود التشغيل (الكائن) {
var winname = window.open('', _blank, '');
winname.document.open('text/html', 'replace');
winname.opener = null
winname.document.writeln(obj.value);
winname.document. Close();
}
كود نسخ الوظيفة (obj) {
var rng = document.body.createTextRange();
rng.moveToElementText(obj);
rng.scrollIntoView();
rng.select();
rng.execCommand(نسخ);
rng.collapse(false);
}
وظيفة saveCode(obj) {
var winname = window.open('', '_blank', 'top=10000');
winname.document.open('text/html', 'replace');
winname.document.write(obj.value);
winname.document.execCommand('saveas','','code.htm');
winname.Close();
}