Mensajes

Uno de los moderadores de esta sección.

Y la otra pregunta no me la respondes, si es que si es que xD 

[Seba123Neo]

Yo también se mucho (Inglés leido) y te aseguro que saber no te va a servir de nada cuando empiezas a aprender un programa y necesitas leer tutoriales y manuales,
prueba a aprender Photoshop con la APP en castellano y todos los tutoriales/pasos en Inglés, y me cuentas que tál te fue...

Ese tal Sebaneo me suena su nombre, refrescame la memoria XD

Para usar el VS al Español y sin miedo hay que estar al nivel de Seba123Neo xD





Pero si ya tienes la variable declarada en el form1, ¿Quieres crear la misma variable y con el mismo valor en el form2?

Código [Seleccionar] Expandir

form1
public folder as string
end class

form2
dim folder2 as string = form1.folder
Dim Files As Array = IO.Directory.GetFiles(folder2 , "*", IO.SearchOption.TopDirectoryOnly)

Con el mismo valor no, con el nuevo valor del FolderBrowserDialog xD  

[mucho]

El error está más que claro, la variable "Folder" está vacía.

Me pregunto porque a veces seré tan cazurro. xD
La verdad que lo imagine, pero me faltaba un puto Form1. xDDD

En fin

Ahora tengo que hacer que se actualice el ListBox cuando lo ejecute en el FolderBrowserDialog, porque no hace nada. Le echare un vistazo igualmente.  

Si realmente quieres aprender te va a ser mucho más dificil si te modificas el lenguaje de la IDE al castellano, más que nada porque no vas a encontrar referencias en castellano ni ayuda en ningún sitio cuando tengas un problema en concreto sobre la IDE y necesites buscar un código o solución en Google, todos los terminos son en ingles, y hay que aprender a usar en inglés, déjate eso para cuando sepas mejor las cosas.

saludos

Se bastante ingles o eso creo, y la verdad es que aunque tenga el programa en Español se me da igual, yo lo traduzco al ingles y busco en ingles que es lo que hago xDDD



Hihihihihi, que burraco soy, hay conflicto entre el Folder del Form1 y el del Form2 aunque no lo diga se ve claramente. XD Como hagi para anular el Folder del Form1.Folder y tomar el nuevo folder?

Codigo:

Código (vbnet) [Seleccionar] Expandir

Dim Files As Array = IO.Directory.GetFiles(Form1.Folder, "*", IO.SearchOption.TopDirectoryOnly)

Código (vbnet) [Seleccionar] Expandir

Public Shared puta_variable As String = "Elektro H@cker"

MsgBox(Form1.puta_variable)

saludos

Bueno, pues llevo con un error putandome de hay la variable xD un ratillo.

Necesito declarar una primera variable para que se pueda abrir de hay tu ultimo codigo, pero cuando se va abrir el form 2 me suelta este error:



Y luego pa colmo, necesito guardarlo en un archivo dat o dentro del mismo exe para que la proxima vez se guarde y se ejecute esa direccion.

Es decir, necesita una direccion base para abrir y  luego cargar otra direccion que seria la guardada de la ultima vez.  



Y a ver si me ayudas con el paquete en castellano  

[Eing?]

Eing?

No se si te he entendido muy bien...

Las variables declaradas dentro de un sub, se quedan en el sub.

Ya te dije que leyeses los tipos de variables y declaraciones.

EDITO: Todas las variables que vayas a usar en más de un sub/ocasión las deberías declarar fuera de los subs... ejemplo:

Código [Seleccionar] Expandir

class

Public putavariable as string

form load sub
 putavariable = "putovalor"
 sub1()
end sub

sub1
 msgbox(putavariable)
end sub

end class

xD saludos.

Y como lo puedo pasar de form a form? xD Me refiero a la putavariable xD

[Folder]

Código (vbnet) [Seleccionar] Expandir

Dim Folder As String = FBD.SelectedPath ' Aquí tienes "la dirección"

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click

       Dim FBD As New FolderBrowserDialog
       FBD.Description = " Seleccionar una carpeta "
       FBD.SelectedPath = Environment.GetFolderPath(Environment.SpecialFolder.MyDocuments)

       Dim Resultado As DialogResult = FBD.ShowDialog
       If Resultado = Windows.Forms.DialogResult.OK Then
           Dim Folder As String = FBD.SelectedPath ' Aquí tienes "la dirección"
           MsgBox("Carpeta seleccionada: " & vbnewline & Folder)
       End If

       FBD.Dispose()

   End Sub

Gracias por ese c&p oculto xD

Un duda, y si quiero setear una variable general desde un sub nivel? Es decir desde el "If Resultado = Windows.Forms.DialogResult.OK Then" poner una variable general que valga tambien para: "Dim Files As Array = IO.Directory.GetFiles(Folder, "*", IO.SearchOption.TopDirectoryOnly)"

Un saludo.

[EDITO:]

Hola pues bueno, quiero hacer algo así:



Y que cuando le hagamos click a una carpeta pues se cambie de directorio:

La ruta la tengo seteada como "Ruta", en un Dim Ruta As String = "aqui iria la ruta seleccionada a otra ves del FolderBrowserDialog"

Necesito por lo menos que me digais como saco la direccion a través de un:  "selecteditemchanged".

Un saludo.



EDITO:

Enconte un codigo que lo hace todo, codigo aquí:

Código (vbnet) [Seleccionar] Expandir


Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
       Try
           ' Configuración del FolderBrowserDialog
           With FolderBrowserDialog1

               .Reset() ' resetea

               ' leyenda
               .Description = " Seleccionar una carpeta "
               ' Path " Mis documentos "
               .SelectedPath = Environment.GetFolderPath(Environment.SpecialFolder.MyDocuments)

               ' deshabilita el botón " crear nueva carpeta "
               .ShowNewFolderButton = False
               '.RootFolder = Environment.SpecialFolder.Desktop
               '.RootFolder = Environment.SpecialFolder.StartMenu

               Dim ret As DialogResult = .ShowDialog ' abre el diálogo

               ' si se presionó el botón aceptar ...
               If ret = Windows.Forms.DialogResult.OK Then

                   Dim nFiles As ObjectModel.ReadOnlyCollection(Of String)

                   nFiles = My.Computer.FileSystem.GetFiles(.SelectedPath)

                   MsgBox("Total de archivos: " & CStr(nFiles.Count), _
                                           MsgBoxStyle.Information)
               End If

               .Dispose()

           End With
       Catch oe As Exception
           MsgBox(oe.Message, MsgBoxStyle.Critical)
       End Try
   End Sub


Si tengo alguna duda, pues pregunto.



Tengo una duda:

Código (vbnet) [Seleccionar] Expandir


               If ret = Windows.Forms.DialogResult.OK Then

                   Dim nFiles As ObjectModel.ReadOnlyCollection(Of String)

                   nFiles = My.Computer.FileSystem.GetFiles(.SelectedPath)

                   MsgBox("Total de archivos: " & CStr(nFiles.Count), _
                                           MsgBoxStyle.Information)
               End If


Lo que quiero hacer es setear la direccion desde aqui, pero no tengo ni idea, porque nunca maneje este campo.

Un saludo.

[Mi instalador personalizado ejecuta el instalador original de VS2012, es decir, Microsoft es quien te coloca el acceso directo donde cree oportuno, y quien te instala el VisualStudio en las rutas que debe instalarse,no tiene nada que ver con la parte customizada de mi instalador]

@Seazoux
Eres tán liante que me has acabado confundiendo a mí xD.

Te comento (Ahora que lo he pensado con la mente clara y sin sueño xD),

Mi instalador personalizado ejecuta el instalador original de VS2012, es decir, Microsoft es quien te coloca el acceso directo donde cree oportuno, y quien te instala el VisualStudio en las rutas que debe instalarse,
no tiene nada que ver con la parte customizada de mi instalador, así que no te puedo dar soporte ni ayudar, porqué tampoco sé cual puede ser el problema, quizás no hayas desinstalado el VS2008 antes de instalar el VS2012, ¿Ah que no me equivoco?, y eso te haya causado conflictos... y lo mismo a lo de "reparar"...

Sigue estos pasos:

1. Descarga un desinstalador tipo "uninstallTool", "myUninstaller", etc...

2. En dicho programa, desinstala el VS2008, luego el VS2012, y luego todos los paquetes relacionados con el VisualStudio para no dejar restos de instalaciones anteriores que puedan entrar en conflicto al intentar instalar el VS2012...

3. Reinicia PC/Sesión, y vuelve a instalar el VS2012.

PD: Hay que llevar un orden.

Saludos.

A ver, yo ya habia desinstalado todo excepto los FramWork 2.0 y 3.5

Pues te explico, el primer paso hecho, el segundo no he encontrado nada pero nada, ni siquiera con este programa encontre el VB 2012, y para que voy a reniciar sesion si no tengo nada instalado xD

Voy a intalarlo de nuevo y te cuento.  



Bueno, pues lo instale correctsmente, pero tuve unos errores entre los que estan:





Voy a mirar esos errores, a ver lo que es.

Un saludo.  



Mire los errores, ahora el problema es que no hay cojones manera de poner el paquete de idioma en castellano, se lo pasa por hay debajo.  

["C:\program files"]

No estoy seguro de si ha sido un fallo mío, o tuyo, en una máquina virtual win7 x64 se instaló correctamente,
de todas formas el problema tiene fácil solución, es tán simple como pinchar click derecho en las propiedades del acceso directo y modificar la ruta del acceso directo "C:\program files" por "C:\program files (x86)"  (Suponiendo que el fallo haya sido mío y la ruta esté mal).

Cuéntame si lo arreglaste,

Saludos!

EDITO:
Aquí debes tener el executable una vez se haya instalado:

Código [Seleccionar] Expandir

"C:\Program Files (x86)\Microsoft Visual Studio 11.0\Common7\IDE\devenv.exe"

Pues malas noticias, 1

El acceso de ruta es ese, y ledi ayer a reprar sin querer queriendo y se fue el instalador a la *****.
2 Al hacer esto, en el Panel de Control para desintstalar este programa no me sale,  



Ademas en la carpeta que me dijistes solo hay 2 archivos bat XDD

Bueno pues he ido a instalar el programa, me han  saltado unos errores y luego cuando he ido a ejecutar el programa, tachan!:



Un saludo, jefe.