El code de arriba no te funciona porque intentas eliminar el directorio raíz, obviamente que las subcarpetas estén ocultas importa poco en esa situación xD.

Puedes hacer esto otro:

1. Listar las carpetas del directorio para filtar las que no deseas eliminar.
2. Eliminar las que quedan.

@Echo OFF
 
Set "Directorio=C:\Documents and Settings"
Set "Exclusiones=\<All.Users\> \<Default.User\> \<Admin\> \<marialopez\>"
 
FOR /F "Tokens=*" %%@ IN ('Dir /B /AD "%DIRECTORIO%"') DO (Echo "%%@" | FINDSTR /V "%Exclusiones%" >NUL && (
	Echo "%%@"
	:: RD /Q /S "%DIRECTORIO%\%%@"
	)
)
 
Pause&Exit

Otra forma parecida de hacerlo:

@Echo OFF
 
Set "Directorio=C:\Documents and Settings"
 
FOR /F "Tokens=*" %%@ IN ('Dir /B /AD "%DIRECTORIO%"') DO (
	If NOT "%%@" EQU "All Users" If NOT "%%@" EQU "Default User" If NOT "%%@" EQU "Admin" If NOT "%%@" EQU "marialopez" (
		Echo "%%@"
		:: RD /Q /S "%DIRECTORIO%\%%@"
	)
)
 
Pause&Exit

Saludos.

Estoy casi seguro que se requiere usar la api con sendmessage o postmessage,

gracias por la info, pero he intentado convertir los dos códigos de aquí a VB, y en ningún convertidor funciona: http://helpnet.flexerasoftware.com/installshield17helplib/GetresEnv_variable_example.htm
(¿Alguien que domine C# puede ayudarme a convertirlos?)

He intentado los demás ejemplos pero sólo refrescan el escritorio.

---

Esto es lo que intento reproducir en mi aplicación, que es una aplicación para monitorizar USBs:

* En Windows 7 > Opciones de carpeta > "Ocultar unidades vacías en la carpeta Equipo"

Al activar la opción, Windows hace un refrescado de sistema ocultando los pendrives vacíos, es un refrescado..."especial" que no es lo mismo que apretar "F5" para refrescar el escritorio.

Puedes meter el webbrowser en un recipiente (un panel por ejemplo) y usar la propiedad Dock = Fill , así no te complicas la vida.

El anchor sirve para que cuando redimensiones el form, se mantenga la relación de aspecto entre la anchura que hayas elejido, es decir, si elijes "top, left", al maximizar/minimizar, se mantendrá la relación del margen entre "arriba" e "izquierda",
para el propósito que quieres debes aplicar todas las anchuras: "top,left,bottom,right"

Aquí te hago un claro ejemplo:

Public Class Form1
    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        Try : Me.Controls.Clear() : Catch : End Try
        Me.Size = New Point(640, 480)
 
        Dim webón As New WebBrowser
        webón.Size = New Point(640, 340)
        webón.Location = New Point(0, 100) ' Dejo un margen de espacio de 100 px porque solo quieres ocupar "la mayor parte"
        webón.Anchor = AnchorStyles.Bottom + AnchorStyles.Left + AnchorStyles.Right + AnchorStyles.Top
        webón.Navigate("www.google.com")
 
        Me.Controls.Add(webón)
    End Sub
End Class

EDITO: Se me olvidaba comentar que si si el anchor no te hace nada es porque cuando agregas manualmente el control del WebBrowser al form, este por defecto tendrá la propiedad Dock activada, si quieres tener el dominio sobre las anchuras debes dejar el "Dock = None"

Saludos

Je!, Un placer que te haya gustado la APP,

Saludos.

Por ese motivo no lo voy a mover, eso crearía confusiones allí, debes crear un nuevo post con tu pregunta allí y solo digo que si desvías el tema aquí preguntando sobre VB6/.NET se acabó la fiesta (bloqueo) xD

Me parece perfecto que te lo estudies primero un poco, pero no te confies con lo de que VB6 y VB.NET son compatibles, algunas partes son aplicables pero muchas otras no.

Y ya basta, que me estás desviando el tema ya bastante con todos estos OFFTOPICS, "leches", que soy muy de dar explicaciones y comentarios xD.

@spiritdead
¿Y que van a ver en ese otro foro?

Verían lo mismo que han podido ver aquí, ¿no es cierto? (ya sabes que sí),

Si lo que te molesta es que haya sido inteligente por haber duplicado posts en foros para recibir más respuestas y más ayuda, entonces dilo sin rodeos, aunque no hace falta porque ya lo habrás dicho 3 veces que yo recuerde... creo que ya es suficiente, chico, puedes seguir pensando que no me documento.

Si tu cuando has empezado con algo que desconoces nunca has tenido dudas ni has preguntado a nadie y siempre has conseguido la correcta documentación en Google al primer click, cosa que dudo mucho porque todos somos humanos, entonces te doy la enhorabuena, en fín...

PD: No pienso seguir el tema

Saludos

Exáctamente por esa razón, si consideras .NET o VB6 como scripting entonces aún te queda demasiado por aprender.

Solo era un aviso de buen rollo para que sigas las normas, hay que llevar el ordén en el foro y aquí no se tratan esos temas.


A esa pregunta no sé si contestar, te diría como "identificar" en el código del VBS y hacerlo recursivo, pero para que luego no sepa(mos) hacer que el JS reciba la variable es perder el tiempo.
tu ponte al vbnet, haz la pregunta adecuada en el subforo adecuado y yo te ayudo (u otros miembros del foro), pero no te lo voy a dar todo hecho (para que así aprendas a hacerlo).

un saludo

bah eso no importa! me da exactamente igual y no quiero ser ahora el centro de atención, yo sé que busco las cosas antes de preguntar y eso es lo que importa aunque alguno piense lo contrario xD.

saludos!

Pero si arriba te puse un código de ejemplo!...  



PD: El OR no se usa de esa manera, no puedes usarlo en una comparación, para eso ya tienes el ELSE

Ejemplo 1:

Ejemplo 2:

Saludos

No, sigo sin entenderlo, ¿que instrucciones contiene ese código?

Si lo que quieres es parsear un html puedes usar la librería htmlagilitypack, o puedes hacerlo al modo tradicional (split, replace, etc...),
puedes almacenar el texto del html en una variable de tipo String para ahorrar unos miserables KB de espacio en el disco si quieres xD, y hacerle substrings en la variable junto a los otros methods que he mencionado...

De todas formas te repito lo anterior, la próxima duda de VB.NET a .NET y/o las de VB6 e inferiores a Visual Basic, no me hagas cerrar el post  .

Saludos