Вопрос : Продолжающая погрешность «800a0005» Майкрософт VBScript пока использование СРЕДНЕЕ

Я читаю в линии архива текста одного одновременно с ReadLine. Мне нужно проверить каждую линию для того чтобы увидеть если сво hyper-link и, то если так добавьте «blank'" target='_ к концу соединения. Я писал функцию для того чтобы считать href= (") но сво в середине линии, поэтому я пытался использовать среднее (шнур, старт, конец) но я получаю эту ошибку на линии с средний функцией: звонок или аргумент процедуре по

Invalid продолжающей погрешности «800a0005»

Microsoft VBScript: «среднее» class= " lineNumbers " >

1 >

dohref функции (theline)
тусклое thelink
a = Cint (InStr (1, Ucase (theline), «», vbtextcompare))             'конец шнура
c = длина b-a 'шнура	
thelink = средний (theline, a, c)
thelink = заменяет ть (thelink, «>»,» blank'> target='_ ")
theleft = вышло (theline, a-1)
theright = право (theline, b+1)
theline = theleft&thelink&theright
class= " ясное " > конца function

  
  class= 

Ответ : Продолжающая погрешность «800a0005» Майкрософт VBScript пока использование СРЕДНЕЕ

Очень просто.
Если он соединяется от дома, то предпринимателя мы можем безопасн принять он или будет от такого же PC или малого комплекта известных машин.
В тот случай, получите имена компьютера.
После этого измените сценарий logon бега для каждого в TS (USRLOGON.CMD) и в конце добавляют что-то как:

ЕСЛИ конец «that_particular_username» == НЕ %USERNAME% переход
ЕСЛИ %CLIENTNAME% NEQ «Computer_Name» TSLOGOFF
: Конец

Так возобновляющ: проверите если username сопрягает потребителя, котор вы хотите позволить. Если не, просто прыгните к концу, то (смысль не делает ничего). Но если она сопрягает, то она идет к следующей линии и проверит %CLIENTNAME% (это передает имя компьютера, котор клиент соединяется от). Если она не сопрягает одно, то вы хотите позволить, побежать TSLOGOFF пнет его из системы.
Эт вы ищет?

Cláudio Rodrigues
Citrix CTP