בדיקת חוקיות שם מחשב (vbs) - תכנות - HWzone פורומים
עבור לתוכן
  • צור חשבון

בדיקת חוקיות שם מחשב (vbs)


MaC_MaN

Recommended Posts

רציתי לדעת האם יש למישהו כיוון כיצד אני יכול לבדוק מתוך קובץ האם שם המחשב שמצויין בקובץ נחשב לחוקי?

* לא עולה על 15 תווים.

* רק תווים כגון (a-z,A-Z, ו _)

רעיוניות התקבלו בברכה...

קישור לתוכן
שתף באתרים אחרים

כן הסתדרתי עשיתי בסוף דבר כזה...


Function CheckComp(strComputer)
'Check if computer name is legal by the following conditions
' Max 15 Chars, only a-Z/0-9/*/-/_
Set RegCheck = New regexp
RegCheck.IgnoreCase = True
RegCheck.Global = True
RegCheck.Pattern = "^[\*|\-|\_|0-9|a-z|0-9]{1,15}$"
If (RegCheck.test(strComputer) And Len(strComputer) <= 15) Then
CheckComp = True
Else
CheckComp = False
End If
End Function

אני עדיין לא הכי מבדיל בין sub לfunction אבל זה עובד יפה :)

תודה לעוזרים

קישור לתוכן
שתף באתרים אחרים

בתוך סוגריים מרובעים אתה לא צריך לשים, סוגריים מרובעים מראש אומרים שצריך לקחת רק אחד מהתווים.

חוץ מזה, יש כל מיני קיצורים:

http://www.regular-expressions.info/posixbrackets.html

http://www.regular-expressions.info/charclass.html#shorthand

קישור לתוכן
שתף באתרים אחרים

ארכיון

דיון זה הועבר לארכיון ולא ניתן להוסיף בו תגובות חדשות.

×
  • צור חדש...