موصى به: تفسير القائمة الكاملة لأنواع الأخطاء الشائعة من ASP ActiveServerPages ، ASP0126 (0x80004005)-لا يمكن العثور على ملف Microsoft OledBproviderforoDbcdrivers (0x80040e21)-حدث خطأ في عبارة SQL (نوع البيانات غير المتطابق أو اسم الجدول (اسم الميدان) خطأ أو جدول في حالة التحرير أو الجدول غير موجود في بيانات البيانات. OLEDBPROVIDERODBCDRIVERS (0x800
<٪
'=======================================================================
التنقل وظيفة
'FormatDate (DT ، TP) ------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
'isinteger (para) ------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
'ChkrequestDate (Para) ------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
'Chkpost () ------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
'ISValidemail (البريد الإلكتروني) ----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
'makedownname () ----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
'getip () ------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
'LeftTrue (Str ، N) --------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
'checksql () - لأمن النظام ، أضف مناعة حقن SQL مباشرة حيث يوجد اتصال قاعدة بيانات
'RunTime () ------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
'----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
'CheckFolder (FolderPath) ------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
'DeleteFolder (FolderPath) --------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
'FileHaveno (Filename) --------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
'ReadFilerEcord (Filename) ------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
'WriteString (سلسلة ، اسم الملف) ----------------------------- اكتب السلسلة المحددة إلى الملف الجديد المحدد
'----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
'تشفير (Thenumber) | فك تشفير (العقم) مجموعة من الوظائف التي تشفر وفك تشفير المعرفات ، حتى 8 بتات
'UTF2GB (UTFSTR) ----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
'TOUTF8 (Szinput) ----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
'C10TO2 (X) ------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
'C16TO2 (X) ----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
'C2TO16 (X) ----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
'C2TO10 (X) ------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
'=========================================================================
٪>
<٪
وقت البدء = Timer ()
تنسيق التاريخ
تنسيق الوظيفة (DT ، TP)
Dim Y ، M ، د
Y = السنة (DT)
M = الشهر (DT)
د = اليوم (DT)
إذا m <10 ثم m = 0 & m
إذا كان d <10 ثم d = 0 & d
حدد CASE TP
CASE 1 FormatDate = Y & Y & M & M & M & D&D
Case 2 FormatDate = y &/& m &/& d
Case 3 FormatDate = M &/& D.
Case 4 FormatDate = y &/& m &/& d
Case 5 FormatDate = y &-& m &-& d
نهاية الاختيار
وظيفة نهاية
'---------------------------------
'--- تحكم على ما إذا كانت البيانات عدد صحيح ---------------------------------------
وظيفة isinteger (الفقرة)
خافت شارع
قاتمة ل ، أنا
إذا isnull (الفقرة) ثم
isInteger = خطأ
وظيفة الخروج
إنهاء إذا
str = cstr (الفقرة)
إذا تقطع (str) = ثم
isInteger = خطأ
وظيفة الخروج
إنهاء إذا
L = Len (Str)
لأني = 1 إلى ل
إذا كان منتصف (str ، i ، 1)> 9 أو mid (str ، i ، 1) <0 ثم
isInteger = خطأ
وظيفة الخروج
إنهاء إذا
التالي
isInteger = صحيح
إذا err.number <> 0 ثم err.clear
وظيفة نهاية
'---------------------------------
'اكتشاف ما إذا كانت المعلمة التي تم تمريرها هي نوع التاريخ
وظيفة chkrequestdate (الفقرة)
chkrequestdate = false
إذا لم يكن (isnull (para) أو trim (para) = أو لا isdate (الفقرة)) ثم
chkrequestdate = صحيح
إنهاء إذا
وظيفة نهاية
'---------------------------------
المشاركة: يقوم ASP بتنفيذ رمز المقالات الطويلة اليدوية الطويلة ٪ setRecordSet1 = server.createObject (adodb.RecordSet) exec = select*fromNewSwhereId = id recordset1.openexec ، conn ، 1،1 ٪ tablewidth = 85 ٪ border = 0align = 0
6 صفحات في إجمالي الصفحة السابقة 123456NEXT