Gracias por intentarlo.
Yo creo que en el manual pdf de integrating goldmine habla de todo. Que todo lo tengo ahí, pero que no lo se ver.
Yo no preciso compilación. Por eso estoy dando tropezones con los archivos vbs
Voy a hacerte una pregunta que probablemente podrás responderme.
Qué diferencias significativas hay entre vbs, vba y vb
vb visual basic
vb visual basic for applications
vbs visual basic script with the Windows Script Host que me permite montar en un editor de textos cualquiera como notepad++ un programa ejecutable sin compilar (como lo es un bat....)
Ahí es donde tengo el problema.
En el libro vienen ya los scripts de cómo integrar goldmine con otros entornos para por ejemplo añadir o editar un registro y una serie de operaciones con el entorno.
Pero trato de meter el código en un vbs y no me trota.....
Por ejemplo :
CreatingaContact.vbs
Dim lGMPtr As Long, _
sGMnvm As String, _
sGMvle As String, _
lResult As Long
'//Create NV and pass pointer value to a variable
lGMPtr = GMW_NV_Create()
'//Fill Variables with Nulls
sGMnvm = String$(100, Chr(0))
sGMvle = String$(100, Chr(0))
'//Set Name Values
lResult = GMW_NV_SetValue(lGMPtr, "Company", "GoldMine Software")
lResult = GMW_NV_SetValue(lGMPtr, "Contact", "Calvin Luttrell")
lResult = GMW_NV_SetValue(lGMPtr, "Phone1", "(310)555-1212")
lResult = GMW_NV_SetValue(lGMPtr, "Email", "calvin@gm.com")
lResult = GMW_NV_SetValue(lGMPtr, "WebSite", "www.gm.com")
'//Execute Business Logic Function
lResult = GMW_Execute("WriteContact", lGMPtr)
de forma similar no me trota este script para correr Word :
EjecutarWord3.vbs
On Error Resume Next
Set variable = CreateObject("WScript.Shell")
variable.Run "M:\Archivos de programa\Microsoft Office\Office10\WINWORD.EXE"
o esta otra intentona tampoco trota
EjecutarWord2.vbs
Private Sub ActivarExe()
Dim x
x = Shell("M:\Archivos de programa\Microsoft Office\Office10\WINWORD.EXE")
AppActivate x
End Sub
Tengo la impresión de que a estos scripts les falta poco para lograr su objetivo, pero fallan.
El error habitual que presentan :
Windows Script Host
Secuencia de comandos: M:\Documents and Settings\JOSE\Escritorio\GoldmineDDE.vbs
Línea: 2
Carácter:15
Error: Se esperaba un final de instrucción
Código: 800A0401
Origen: Error de compilación de Microsoft VBScript
Aceptar
En cuanto al entorno Basic no dispongo de él. Dispongo del entorno AutoIt y de Autohotkey, que por supuesto tampoco manejo casi nada.
Lo que preguntas al final de tu escrito bien sabes que es posible si el destino (aplicación , entorno base de datos, o lo que sea) dispone de de un sistema de comunicación vía DDE, vía COM, vía de una librería asociada al programa destino u orígen diseñada para ello que posibilite la conexión de los entornos, o también con ODBC como un standard supuesto más.
En el caso de goldmine lo estoy intentando usando la librería gm5s32.dll
