في ASP ، تسمى قطعة رمز ذات قيمة إرجاع وظيفة. يمكننا كتابة قطعة من التعليمات البرمجية لحساب ما إذا كان الرقم الطبيعي هو رقم رئيسي ، ثم العودة إلى برنامج الاتصال. اليوم ، ستشاركك قناة التكنولوجيا الجديدة ما هي وظائف ASP الشائعة الاستخدام؟ سوف يشرح ذلك المحرر لك بالتفصيل.
<٪
قاتمة ديسيبل
db = "dbms.mdb"
'**********************************************************************
تنفيذ عبارة SQL دون إرجاع القيمة. أفضل بيان SQL هو على النحو التالي:
'تحديث اسم جدول تعيين اسم الحقل = القيمة ، اسم الحقل = القيمة حيث اسم الحقل = القيمة
حذف من اسم الجدول حيث اسم الحقل = القيمة
insert في اسم الجدول (اسم الحقل ، اسم الحقل) القيم (القيمة ، القيمة)
'**********************************************************************
noresult sub (SQL)
قاتمة كون
قاتمة connstr
تعيين conn = server.createObject ("adodb.connection")
connstr = "provider = microsoft.jet.oledb.4.0 ؛ data source =" & server.mappath ("" & db & "")
Conn.Open Connstr
conn.execute SQL
conn.close
تعيين conn = لا شيء
نهاية الفرعية
'*******************************************************************************
قم بتنفيذ عبارة SELECT وإرجاع كائن مجموعة السجلات. هذا الكائن هو القراءة فقط. أي أنه لا يمكن تحديثه
'*******************************************************************************
نتيجة الوظيفة (SQL)
قاتمة كون
قاتمة connstr
RCS DIM
تعيين conn = server.createObject ("adodb.connection")
connstr = "provider = microsoft.jet.oledb.4.0 ؛ data source =" & server.mappath ("" & db & "")
Conn.Open Connstr
set rcs = server.createObject ("adodb.recordset")
RCS.Open SQL ، Conn ، 1،1
SET النتيجة = RCS
وظيفة نهاية
'*******************************************************************************
يظهر مربع الحوار
'*******************************************************************************
التنبيه الفرعي (رسالة)
رسالة = استبدال (رسالة ، "" "،"/'")
Response.write ("<script> ALERT ('" & message & "') </script>")
نهاية الفرعية
'*******************************************************************************
"العودة إلى الصفحة السابقة ، تستخدم عادة بعد الحكم على ما إذا كانت المعلومات قد تم تقديمها بالكامل
'*******************************************************************************
ظهور فرعي ()
Response.write ("<script> History.go (-1) </script>")
نهاية الفرعية
'*******************************************************************************
إعادة توجيه اتصال آخر
'*******************************************************************************
Sub Go (url)
Response.write ("<script> location.href ('" & url & "') </script>")
نهاية الفرعية
'*******************************************************************************
استبدل علامة HTML
'*******************************************************************************
وظيفة htmlencode2 (Str)
نتيجة قاتمة
قاتمة ل
إذا isnull (str) ثم
htmlencode2 = ""
وظيفة الخروج
إنهاء إذا
L = Len (Str)
النتيجة = ""
خافت أنا
لأني = 1 إلى ل
حدد CASE MID (Str ، I ، 1)
حالة "<"
النتيجة = النتيجة+"<"
حالة ">"
النتيجة = النتيجة+">"
Case CHR (13)
النتيجة = النتيجة+"<br>"
Case CHR (34)
النتيجة = النتيجة+"" "
قضية "&"
النتيجة = النتيجة+"و"
Case CHR (32)
'النتيجة = النتيجة+""
إذا كنت i+1 <= l و i-1> 0 ثم
إذا كان منتصف (str ، i+1،1) = chr (32) أو mid (str ، i+1،1) = chr (9) أو mid (str ، i-1،1) = chr (32) أو mid (str ، i-1،1) = chr (9) ثم
النتيجة = النتيجة+""
آخر
النتيجة = النتيجة+""
إنهاء إذا
آخر
النتيجة = النتيجة+""
إنهاء إذا
CASE CHR (9)
النتيجة = النتيجة+""
حالة أخرى
النتيجة = النتيجة+منتصف (str ، i ، 1)
نهاية الاختيار
التالي
htmlencode2 = النتيجة
وظيفة نهاية
'*******************************************************************************
تحقق مما إذا كان هناك عروض أسعار واحدة في سلسلة SQL ، وإذا كان هناك ، قم بتحويلها
'*******************************************************************************
وظيفة checkstr (Str)
Dim Tstr ، L ، أنا ، الفصل
str = trim (str)
L = Len (Str)
لأني = 1 إلى ل
ch = mid (str ، i ، 1)
إذا ch = "" "ثم
tstr = tstr+"''
إنهاء إذا
tstr = tstr+ch
التالي
checkstr = tstr
وظيفة نهاية
٪>
ما هي الوظائف الشائعة المستخدمة في ASP التي أدخلتها قناة التكنولوجيا الجديدة في مقال اليوم؟ أعتقد أنه من خلال المقدمة أعلاه ، تعلم الجميع ذلك بدقة ، لكنه لا يزال بحاجة إلى مراجعته لتعزيز هذه المعرفة.