Mensajes

[EDITO:]

EDITO: no crees carpetas temporales, usa la opción "descomprimir en carpeta temporal" en el autoextraible de Winrar, de esa forma puedes usar ".\"
PD: lee mi firma porfavor y edita tu último comentario con los códigos, ahora no tengo tiempo

los equipos que utilizo tiene la letra asignada asi que quiero decir que todo lo tiene en d por motivos de respaldo

Entonces no hagas caso de lo que te dije, pensé que estabas asumiendo que la letra de los equipos sería "D" (pero sin que tu conocieras ese dato), por eso dije que porsupuesto ese era el fallo, porque estabas asumiendo que la letra sería D: y podría ser C:.

la ruta .\ equivale a que se va a copiar en la misma ruta y no en la que le indique verdad y como comentario

No equivale a que se va a copiar en la misma ruta... equivale a que se va a LEER desde esa ruta, es decir:

Para que lo entiendas...

Esto:

Código [Seleccionar] Expandir

Copy "mapj.bat"

...Es lo mismo que esto:

Código [Seleccionar] Expandir

Copy ".\mapj.bat"

(Lo cierto es que no del todo, porque en el primer ejemplo se busca primero en el PATH, pero bueno, eso es otra historia que no te tiene que importar)

Al igual que esto:

Código [Seleccionar] Expandir

CD /D "C:\Carpeta"
Copy "mapj.bat"

...Es lo mismo que esto:

Código [Seleccionar] Expandir

Copy "C:\carpeta\mapj.bat"

Saludos.

[Windows Store]

Por otra parte, ahora tienes una nueva interfaz moderna, sobre la cual puedes instalar aplicaciones desde la Windows Store y tener acceso a muchas Apps que se van sumando día a dia al ecosistema, pero sin comprometer la experiencia clasica a través del escritorio tradicional al cual ya estabamos acostumbrados.

Hay muchas features que Windows 8 incorpora y que están muy buenas, podria estar hablando bastante de los Charms, el Zoom Semantico, los Live Tiles o el diseño de las apps y el estilo visual, pero no quiero extenderme tanto.

La Windows Store con esos programas inútiles para la mayoría de la gente así como el 70% de las nuevas caracteristicas de Windows 8 ...todo eso es como el apartado de "Spam" de los buzones de correo online, nadie quiere verlas, pero están ahí como lapas.

Aparte, las aplicaciones "nuevas y bonitas" (MetroUI) de Windows 8 son totálmente incompatibles con cualquuier otra versión inferior de Windows, TODO hay que decirlo!, es un punto muy negativo para Windows 8.

La pregunta de este post es "El windows 8 es bueno ?¿" y mi respuesta es Sí, ahora... ¿Es mejor que Windows 7 en lo que reálmente necesitamos que Windows 8 sea BUENO?, pues si a Windows 8 le quitas todo el "Spam" que trae por defecto y si lo sabes configurar para que en algunas cosas se asemeje a Windows 7 como por ejemplo agregarle un botón de inicio, entonces ya lo puedes considerar superior a Windows 7 en cuanto a productividad y ahorro de tiempo, como por ejemplo mi Windows 8 customizado:



Saludos!

Por supuesto el problema es la unidad de disco que estás utilizando (D:).

Es tán sencillo como esto:

Código (dos) [Seleccionar] Expandir

@echo off
Copy /Y ".\mapj.bat" "%APPDATA%\Microsoft\Windows\Start Menu\Programs\Startup\Mapeo.bat"
Exit

http://ss64.com/nt/syntax-variables.html

".\" equivale a la ruta del directorio actual donde se encuentra el archivo bat.

Saludos

[HtmlDocument]

El fallo lo tienes aquí:

Código (vbnet) [Seleccionar] Expandir

AddHandler document.Body.Click, New HtmlElementEventHandler(AddressOf WebBrowser1_Clicked)

Te vuelvo a citar lo que dije comentarios atrás:

PD: el objeto sender es de tipo "HtmlDocument", NO de tipo HtmlElement como está en tu código de arriba.

En resumen, pasa el puntero de tu mouse sobre "Body", y lee lo que pone, lee, lee y comprende, y luego lo modificas...

[EDITO:]

Como te han dicho, ese es el problema.

Al formatear el número se convierte a decimal, y los ceros a la derecha de la coma se eliminan,
Es decir, cuando escribes "2.000", se formatea a "2,000", y eso se representa como un "2" al ser Entero, y eso es lo que sumas, el "2".

¿Verdad que si escribes en los textboxes "2.001" si que te funciona corréctamente?

En fin debes manejar los tipos de números "Double" al sumar ese tipo de números:

Código (vbnet) [Seleccionar] Expandir

TextBox3.Text = FormatNumber(Convert.ToDouble(TextBox1.Text) + Convert.ToDouble(TextBox2.Text), TriState.False)

PD: Primero debes detectar si el string contiene puntos o comas para manejar el resto de números como "Long" (aka Int64)

Saludos.


EDITO:

No es perfecto, si intentas sumar "2.00" se reconoce como "200", pero bueno, solo es para mostrarte, eso ya lo mejoras tú...

Código (vbnet) [Seleccionar] Expandir

Public Class Form1

    Dim num1 As Object
    Dim num2 As Object

    Private Sub TextBox1_TextChanged(sender As Object, e As EventArgs) Handles TextBox1.TextChanged
        If sender.Text.Contains(".") Then _
             num1 = Convert.ToDouble(sender.Text) _
        Else num1 = Convert.ToInt64(sender.Text)
    End Sub

    Private Sub TextBox2_TextChanged(sender As Object, e As EventArgs) Handles TextBox2.TextChanged
        If sender.Text.Contains(".") Then _
             num2 = Convert.ToDouble(sender.Text) _
        Else num2 = Convert.ToInt64(sender.Text)
    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        TextBox3.Text = FormatNumber(num1 + num2, TriState.False)
    End Sub

End Class


[KiLiaN]

Has probado a ponerle un poco de 3 en 1 a los motores de los ventiladores? y a limpiarle el polvo y tal?

No KiLiaN, no voy a tocar los ventiladores más de lo necesario, no soy técnico y la puedo cagar.

...pero tenían ESCASO polvo y lo limpié hace unos días, yo supongo que hace tanto ruido por la calor que hace (por la entrada al verano), el ruido no viene de ahora, sinó de hace unas semanas, y en invierno no hacia casi nada de ruido el PC, por eso supongo que si quiero menos ruido debo hacer algo con los ventiladores (comprar o reemplazar)...pero no sé exáctamente el que, jeje.

Eres de los que se toman las cosas con calma, he? xD

Bienvenido!

[cullons]

Hola,
bueno pues mi PC hace muchísimo ruido y me gustaría saber que necesito comprar para disminuir el ruido de manera considerable.

...Es que no sé si debo centrarme en los ventiladores (añadir más ventiladores o reemplazar los que hay), o en el disipador (reemplazar el disipador).

Además debo decir que el ruido del ventilador no sé percibir exáctamente si se trata del ventilador de la GPU o del CPU... :-/ (Normalmento no gasto la GPU así que pienso que será el de la CPU)

Y en la bios tengo el modo "silencioso" activado, pero silencioso mis cullons... xD

Aquí tienen la info de las temperaturas y otros datos de mi PC por si sirve de algo o ven algo que no esté bien:







Un saludo.

[EDITO:]

Desués del Then dce toda la vida se dice la función a realizar, no?

Sí.

Aunque yo declararía el objeto del sender afuera de los Subs, o haria un TryCast dentro de ese Sub que muestras para que pudieras "manejar" y ver fácilmente en el IntelliSense todos los métodos/propiedades del objeto Sender, para que no vayas preguntando mucho sobre eso en el futuro xD.

Código (vbnet) [Seleccionar] Expandir

Dim document As HtmlDocument = TryCast(sender, HtmlDocument)

EDITO:

Código (vbnet) [Seleccionar] Expandir

    Private Sub Document_Clic(ByVal sender As Object, ByVal e As HtmlElementEventArgs)

        Dim document As HtmlDocument = TryCast(sender, HtmlDocument)

        Select Case document.ActiveElement.TagName.ToLower
            Case "button" : MsgBox("apretaste un button")
            Case "input" : MsgBox("apretaste un input")
            Case Else
        End Select

    End Sub

Tampoco es para que nos baneen Un moderador es moderador por algo, piensalo.

Para ser sincero yo creo que NovLucker ya pasa de leer tus post (No me extraña, es que cansa siempre ver lo mismo!) xD

Sobre lo del baneo...se banean a los Trolls, y nosotros (los "implicados") hemos dicho lo que pensamos siempre con respeto, y además es por tu bien, IKillNukes, no gustan la gente que lo pide todo hecho siempre.

lo que quiero es que los recorra desde el más antiguo al más nuevo

¿Por fecha de creación, o por fecha de modificación?

Un ejemplo:

Código (dos) [Seleccionar] Expandir

@Echo OFF

(for /D %%# in ("*") Do (
Set "DateTime=%%~t#"
Call Set "Y=%%DateTime:~6,4%%"
Call Set "M=%%DateTime:~3,2%%"
Call Set "D=%%DateTime:~0,2%%"
Call Echo %%Y%%%%M%%%%D%% %%~f#
))>"%TEMP%\dirs.tmp"

For /F "tokens=1,*" %%A  in ('Type "%TEMP%\dirs.tmp" ^| SORT') Do (
Echo %%B
REM xcopy "%%B" ...
)

Pause&Exit

Saludos!