موصى به: استخدم ASP لإنشاء البحث في الموقع إذا كان لديك موقع ويب ضخم والكثير من المحتوى ، فغالبًا ما يكون من الصعب على الزائرين العثور على ما يحتاجون إليه. في هذا الوقت ، تحتاج إلى بحث موقع ويب لمساعدة الزائرين في العثور على المعلومات التي يبحثون عنها بشكل أسرع! يمكنك الآن تنفيذ هذه الوظيفة بسهولة مع ASP ، ناهيك عن أن هناك العديد من المواقع التي تدعم ASP الآن. يمكنك استخدام محرك البحث هذا للبحث في أي من صفحتك الرئيسية
<٪@ language = vbscript ٪>
<٪
الخيار صريح
نموذج سترسوبميت المستخدمة لحفظ قيمة زر الإرسال
Dim StrprinterPath 'حفظ قيمة مسار طابعة الشبكة في النموذج
قيمة اسم المستخدم الخافتة لاسم المستخدم في النموذج
Dim Stprassword 'قيمة كلمة المرور في النموذج
يطبع نموذج Dim Strmessage قيمة المحتوى
كائنات نظام ملفات dimbjfs في vbscript
كائنات شبكة صافية Dim Objwshnet في WSH
كائن طباعة dimpjprinter '
strsubmit = request.form (إرسال)
٪>
<html>
<head>
<meta name = Generator Content = Microsoft Visual Studio 6.0>
</head>
<body>
<٪
إذا كان strsubmit = إذن
٪>
لاحظ أن:
نظرًا لأن هذا مظاهرة ، يتم تمرير الحساب وكلمة المرور حول NT في ASP باستخدام الوسائل غير المشفرة.
يجب التعامل مع عملية تسجيل الدخول بأمان في الاستخدام الحقيقي.
<form action = aspprint.asp method = post id = name form = form>
<عرض الجدول = 100 ٪ محاذاة = حدود المركز = 0 cellpacing = 1 cellpadding = 1>
<tr>
<td align = yere nowrap> مسار طابعة الشبكة: </td>
<td align = left nowrap> <type type = text id = printerpath name = printerpath
value = // <bomain>/<printer>> </td>
</r>
<tr>
<td align = live nowrap> حساب تسجيل الدخول: </td>
<td align = Left Nowrap> <type type = text id = اسم المستخدم = اسم المستخدم
value = <٪ = strusername ٪ >> </td>
</r>
<tr>
<td align = live nowrap> كلمة مرور تسجيل الدخول: </td>
<td align = Left Nowrap> <type type = password id = كلمة المرور
name = password> </td>
</r>
<tr>
<td align = live nowrap> الرجاء إدخال النص الذي تريد طباعته: </td>
<td align = Left Nowrap> <textarea rows = 2 cols = 20 id = message
name = message> </textarea> </td>
</r>
<tr>
<td align = yere nowrap> </td>
<td align = Left Nowrap> <type type = إرسال قيمة = إرسال
المعرف = إرسال اسم = إرسال> </td>
</r>
</table>
</form>
عند تقديم المعلومات أعلاه ، يمكنك طباعتها وفقًا للرمز التالي.
<٪
آخر
احصل على معلومات الاستجابة من النموذج.
strprinterpath = request.form (printerpath)
strusername = request.form (اسم المستخدم)
straPsword = request.form (كلمة المرور)
strmessage = request.form (رسالة)
سنستخدم الآن كائن VBScript FileSystemObject وكائن شبكة WSH. سوف كائن الشبكة
امنحنا الأساليب التي نحتاجها لفتح اتصال الطابعة ، وسيسمح لنا نظام الملفات ببثنا
الإخراج إلى الطابعة. نقوم بإنشاء هذه الكائنات في مثال الكود التالي:
تعيين OBJFS = createObject (scripting.filesystemObject)
تعيين OBJWSHNET = createObject (wscript.network)
الاتصال بطابعة شبكة باستخدام WSH
Objwshnet.AddPrinterConnection LPT1 ، StrprinterPath ، false ، strusername ، straphorword
استخدم كائن نظام الملف لاستخدام جهاز الطباعة كملف
تعيين OBJPRINTER = OBJFS.CreateTextFile (LPT1: ، صحيح)
أرسل نصًا إلى جهاز الطباعة
objprinter.write (strmessage)
أغلق كائن جهاز الطباعة وأداء معالجة فخ الخطأ
عند استئناف الخطأ التالي
objprinter.close
في حالة حدوث خطأ ، أغلق اتصال الطباعة وإخراج رسالة الخطأ
إذا أخطأ بعد ذلك
Response.write (خطأ # & cstr (err.number) & & err.description)
err.clear
آخر
"العملية ناجحة ، معلومات تأكيد الإخراج
استجابة. write (<center>)
استجابة. write (<عرض الجدول = 100 ٪ محاذاة = حدود المركز = 0 cellpacing = 1 cellpadding = 1>)
Response.write (<tr> <td align = ight> <b> رسالة طباعة إرسال: </b> </td>)
استجابة. write (<td align = left> & strmessage & </td> </tr>)
Response.write (<tr> <td align = ight> <b> مسار طابعة الشبكة: </b> </td>)
استجابة. write (<td align = left> & strprinterpath & </td> </tr>)
استجابة. write (<tr> <td align = ight> <b> حساب تسجيل الدخول: </b> </td>)
Response.write (<td align = left> & strusername & </td> </tr>)
استجابة. write (</table>)
استجابة. write (</center>)
إنهاء إذا
"إلغاء اتصال الطباعة
Objwshnet.RemovePrinterConnection LPT1:
اضبط Objwshnet = لا شيء
تعيين OBJFS = لا شيء
تعيين OBJPRINTER = لا شيء
إنهاء إذا
٪>
</body>
</html>
مشاركة: ASP يدمج فئة بيان SQL عند كتابة برنامج قاعدة بيانات ASP ، عادة ما نستخدم عبارات SQL ، وعند إضافة وتحديث البيانات ، عادة ما نستخدم الطريقة التالية: إدراج في رسالة (incept ، المرسل ، العنوان ، المحتوى ، إرسال وقت ، العلم ، الإصدار) ("incept (I)" ،