elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.

 

 


Tema destacado: Curso de javascript por TickTack


+  Foro de elhacker.net
|-+  Programación
| |-+  Programación General
| | |-+  .NET (C#, VB.NET, ASP) (Moderador: kub0x)
| | | |-+  [SOLUCIONADO] Obtener todos los recursos de tipo TEXTO de My.Resources
0 Usuarios y 1 Visitante están viendo este tema.
Páginas: [1] Ir Abajo Respuesta Imprimir
Autor Tema: [SOLUCIONADO] Obtener todos los recursos de tipo TEXTO de My.Resources  (Leído 2,272 veces)
Eleкtro
Ex-Staff
*
Desconectado Desconectado

Mensajes: 9.809



Ver Perfil
[SOLUCIONADO] Obtener todos los recursos de tipo TEXTO de My.Resources
« en: 8 Enero 2013, 16:45 pm »

Esto no sé hacerlo así que he buscado en Google,
He probado las 2 maneras que se comentan aquí pero ninguna me funciona: http://stackoverflow.com/questions/1000510/how-to-get-the-names-of-all-resources-in-a-resource-file

Necesito hacer algo así:

Código
  1.   Private Sub SearchInResources(ByVal PatternSTR As String)
  2.        For Each ResourceFile In My.Resources ' Esto no funciona cláramente xD
  3.            If ResourceFile.EndsWith(".txt") Then
  4.                Dim fileContent As String = ResourceFile
  5.                Dim stringStream As New System.IO.StringReader(fileContent)
  6.                If stringStream.contains(PatternSTR) Then
  7.                    ' Cosas...
  8.                End If
  9.            End If
  10.        Next
  11.    End Sub


« Última modificación: 8 Enero 2013, 20:22 pm por EleKtro H@cker » En línea

seba123neo


Desconectado Desconectado

Mensajes: 3.621



Ver Perfil WWW
Re: Obtener todos los recursos de tipo TEXTO de My.Resources
« Respuesta #1 en: 8 Enero 2013, 20:04 pm »

obtener todos los strings de esta forma:

Código
  1. Public Class Form1
  2.    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
  3.        Dim ResourceSet As Resources.ResourceSet = My.Resources.ResourceManager.GetResourceSet(Globalization.CultureInfo.CurrentCulture, True, True)
  4.        For Each Dict As DictionaryEntry In ResourceSet.OfType(Of Object)()
  5.            If TypeOf (Dict.Value) Is String Then
  6.                Debug.WriteLine(Dict.Value)
  7.            End If
  8.        Next
  9.    End Sub
  10. End Class

saludos.


En línea

Eleкtro
Ex-Staff
*
Desconectado Desconectado

Mensajes: 9.809



Ver Perfil
Re: Obtener todos los recursos de tipo TEXTO de My.Resources
« Respuesta #2 en: 8 Enero 2013, 20:22 pm »

Perfecto!

^^

Justo ahora mismo habia sacado ese mismo code en StackOverF... e iba a preguntar cual era el correcto "TypeOf" que debía usar, ya me has sacado de dudas xD

Código
  1. Dim ResourceSet As Resources.ResourceSet = My.Resources.ResourceManager.GetResourceSet(Globalization.CultureInfo.CurrentCulture, True, True)
  2.            For Each Dict As DictionaryEntry In ResourceSet.OfType(Of Object)()
  3.                If TypeOf (Dict.Value) Is Drawing.Image Then
  4.                    Debug.WriteLine(Dict.Key) 'outputting resource name
  5.                End If
  6.            Next
« Última modificación: 8 Enero 2013, 20:25 pm por EleKtro H@cker » En línea

Páginas: [1] Ir Arriba Respuesta Imprimir 

Ir a:  

Mensajes similares
Asunto Iniciado por Respuestas Vistas Último mensaje
tipo variable vb texto
Programación Visual Basic
kabukiman 1 1,393 Último mensaje 19 Junio 2007, 07:13 am
por Freeze.
obtener texto.
Programación Visual Basic
astaroth_15 3 2,059 Último mensaje 29 Diciembre 2007, 21:17 pm
por demoniox12
Obtener texto de un JTextPane
Java
soser 2 7,941 Último mensaje 18 Octubre 2010, 03:33 am
por soser
El proceso svchost.exe se comía todos tus recursos en XP, y por fin lo han ...
Noticias
wolfbcn 2 1,924 Último mensaje 19 Enero 2014, 15:47 pm
por burbu_1
como crear mi cms y no consumir todos los recursos en consultas sql
PHP
el_junior 4 2,623 Último mensaje 14 Febrero 2014, 10:47 am
por el_junior
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines