تقدم هذه المقالة بشكل أساسي تطبيق asp لوظيفة سلسلة الاعتراض، الكود موجز للغاية وعملي للغاية، وسأشاركه معك هنا للرجوع إليه من قبل الأصدقاء المحتاجين.
إذا كان العنوان طويلاً جدًا، بسبب قيود تخطيط الصفحة، فيمكن إدراج 10 أحرف فقط. ستساعدك هذه الوظيفة على تحقيق ذلك.
انسخ رمز الكود كما يلي:
'اعتراض قيمة السلسلة (العنوان، عدد الكلمات)
قيمة الدالة (str، lennum)
خافت p_num
خافت أنا
إذا strlen(str)<=lennum إذن
strvalue=str
آخر
p_num=0
س = 0
افعل بينما لا p_num > lennum-2
س=س+1
إذا كان asc(mid(str,x,1))<0 إذن
p_num=int(p_num) + 2
آخر
p_num=int(p_num) + 1
نهاية إذا
strvalue=left(trim(str),x)&...
حلقة
نهاية إذا
وظيفة النهاية
دالة سترلين (شارع)
قاتمة page_len
page_len=0
سترلين=0
إذا تقليم (str) <> ثم
page_len=len(تقليم(شارع))
لـ xx=1 إلى page_len
إذا كان asc(mid(str,xx,1))<0 إذن
سترلين = كثافة العمليات (سترلين) + 2
آخر
سترلين = كثافة العمليات (سترلين) + 1
نهاية إذا
التالي
نهاية إذا
وظيفة النهاية
كيفية الاستخدام:
انسخ رمز الكود كما يلي:
<%=strvalue (لغة برمجة دقيقة، يمكنها تلوين تركيب التعليمات البرمجية بشكل صحيح، وإدخال وصف بسيط لمقتطف التعليمات البرمجية، 10)%>
ما ورد أعلاه هو محتوى هذه المقالة بالكامل، وآمل أن تنال إعجابكم جميعًا.