Cuestión : Error runtime “800a0005” de Microsoft VBScript mientras que usa MEDIADOS DE

Estoy leyendo en una línea del archivo de texto uno a la vez con ReadLine. Necesito comprobar cada línea para ver si su un enlace hipertexto y si agregar tan el “blank'" del target='_ al final del acoplamiento. He escrito una función para encontrar la secuencia del enlace hipertexto (“href= del ) pero su en el medio de la línea, así que he estado intentando utilizar mediados de (secuencia, comienzo, extremo) pero consigo este error en la línea con la mediados de función: llamada o discusión de procedimiento del

Invalid del error runtime “800a0005” del

Microsoft VBScript: “mediados de” class= " lineNumbers " >
1 del >

dohref de la función (theline)
thelink dévil
a = Cint (InStr (1, Ucase (theline), “”, vbtextcompare))             'extremo de la secuencia
c = longitud del b-a 'de la secuencia	
thelink = mediados de (theline, a, c)
el thelink = substituye (thelink, “>”,” blank'> del target='_ ")
el theleft = se fue (theline, el a-1)
theright = derecho (theline, b+1)
theline = theleft&thelink&theright
class= > " claro " del extremo function
class= del

Respuesta : Error runtime “800a0005” de Microsoft VBScript mientras que usa MEDIADOS DE

Muy simple.
Si él está conectando del hogar del dueño podemos asumir con seguridad que será de la misma PC o de un pequeño sistema de máquinas sabidas.
En ese caso, conseguir los nombres de computadora.
Entonces cambiar la escritura de la conexión que los funcionamientos para cada uno en los TS (USRLOGON.CMD) y en el extremo agregar algo como:

SI NO extremo indicado del “that_particular_username” del == del %USERNAME%
SI el %CLIENTNAME% NEQ “Computer_Name” TSLOGOFF
: Extremo

Tan reasumiendo: comprobar si el username empareja a usuario que usted quiere permitir. Si no, saltar simplemente al extremo (el significado no hace nada). Pero si empareja irá a la línea siguiente y comprobará el %CLIENTNAME% (éste pasa el nombre de computadora que el cliente está conectando de). Si no empareja el usted quiere permitir, funcionar un TSLOGOFF qué lo golpeará con el pie del sistema.
¿Este cuál usted es está buscando?

Cláudio Rodrigues
Citrix CTP
Otras soluciones  
 
programming4us programming4us