Gracias a esta función podrás cargar ficheros de recursos muy fácilmente. Además, una vez cargado el recurso lo pone en caché para agilizar su lectura:
Private Sub LoadResouce()
If rmMetas Is Nothing Then
rmMetas = HttpRuntime.Cache.Get("DATA_Metas")
End If
If IsNothing(rmMetas) Then
Dim objAssembly As System.Reflection.Assembly
objAssembly = System.Reflection.Assembly.Load("Proyecto")
rmMetas = New ResourceManager("Proyecto.NombreRecurso", objAssembly)
If Not rmMetas Is Nothing Then
rmMetas.IgnoreCase = True
End If
HttpRuntime.Cache.Insert("DATA_Metas", rmMetas)
End If
End Sub