Foro de elhacker.net

Programación => Programación Visual Basic => Mensaje iniciado por: BlackZeroX en 8 Agosto 2008, 18:28 pm



Título: Duda con Manejo de Plugins
Publicado por: BlackZeroX en 8 Agosto 2008, 18:28 pm
bueno esta es mi gran duda:

cuando se manejan plugins o bueno la carga de librerias en vb6 afuerzas deberian estar dentro de una carpeta llamada plugins ¬¬?

Antiguo Post de manejo de plugins en VB6 (http://foro.elhacker.net/programacion_vb/ejemplo_de_creacion_uso_de_plugins_en_visual_basic_60-t203061.0.html)

bueno aca reduje el codigo a practicamente nada:

bueno aca esta Simplificado ¬¬

Código
  1.    Set plug = CreateObject("miplugin.plugin")
  2.    plug.AbrirPlugin Me
  3.  

la parte del codigo original del ejemplo:

Código
  1. Public Sub CargarPlugins()
  2. 'On Error GoTo error:
  3. Dim dll$, temp$, obj
  4. Dim i As Integer
  5. Subfolders (App.path & "\plugins\") '<-------- si la cambio me salen errores y ademas no carga las dll como plugins ¬¬
  6.  For i = 0 To a - 1
  7.         dll = NplugIns(i)
  8.         MsgBox dll
  9.         dll = Left(dll, Len(dll) - 4) 'quita ".dll" del nombre
  10.        temp = dll & "." & "plugin"
  11.        Set obj = CreateObject(temp) 'se crea el plugin
  12.        Call Agregar(ListaDePlugins, temp, obj.NombrePlugin)
  13.         DoEvents
  14.   Next i
  15. ListaDePlugins(0).Visible = False 'Desaparecemos el primer elemento
  16. Exit Sub
  17. error:
  18.    'MsgBox "Error al cargar un plugin. Puede que no esté corretamente registrado.", , "Error"
  19. End Sub
  20.  

---------------------------------

Y se supone que en ese ejemplo se cargan los plugins de la carpeta indicada (en este caso "directorioActual/plugins") bueno yo la cambio (por ejemplo a "D:\data\plugins" siendo que mi exe este en "D:\") y nada de nada ¬¬ afuerzas solo me agarran con la carpeta "plugins" y q esta este en el directorio de mi compilado.

mis interrogantes son:

¿?Se puede cambiar dicha carpeta¿?
¿?Si es asi como¿?

gracias de antemano.