From: dbogdan on
Hey,

I need to somehow call some functions from a .net (VC++) dll inside a
Tcl script.I must mention that I don't have access to the dll code.

Did anyone succeed in doing this?

Thanks,
Bogdan

PS: Already tried http://wiki.tcl.tk/12264 and http://sourceforge.net/projects/tcl-dll-caller/
but with no success...
From: APN on
On Feb 11, 8:38 pm, dbogdan <dbog...(a)gmail.com> wrote:
> Hey,
>
> I need to somehow call some functions from a .net (VC++) dll inside a
> Tcl script.I must mention that I don't have access to the dll code.
>
> Did anyone succeed in doing this?
>
> Thanks,
> Bogdan
>
> PS: Already triedhttp://wiki.tcl.tk/12264andhttp://sourceforge.net/projects/tcl-dll-caller/
> but with no success...

Have you tried ffidl - http://wiki.tcl.tk/1197 ?

/Ashok
From: dbogdan on
On Feb 11, 7:08 pm, APN <palm...(a)yahoo.com> wrote:
> On Feb 11, 8:38 pm, dbogdan <dbog...(a)gmail.com> wrote:
>
> > Hey,
>
> > I need to somehow call some functions from a .net (VC++) dll inside a
> > Tcl script.I must mention that I don't have access to the dll code.
>
> > Did anyone succeed in doing this?
>
> > Thanks,
> > Bogdan
>
> > PS: Already triedhttp://wiki.tcl.tk/12264andhttp://sourceforge.net/projects/tcl-dll-ca...
> > but with no success...
>
> Have you tried ffidl -http://wiki.tcl.tk/1197?
>
> /Ashok


Thanks for the reply,

I tried ffidl and I got an error ("couldn't find symbol
"GetUnitConfiguration" : ???") when calling "ffidl::symbol"

load "C:\\FfidlTEST\\Ffidl0.6\\Ffidl06.dll"
set DLL "D:\\ConfigService\\8.0(011040)\
\AvayaIPOConfigBaseServices.dll"

The script I ran is this:

#public string GetUnitConfiguration(IPAddress ipAddress, Int32
portNumber, string accountName, string password, string macAddress)
set sym [ffidl::symbol $DLL GetUnitConfiguration]
ffidl::callout GetUnitConfiguration {string int string string string}
string $sym
set xmlF [GetUnitConfiguration "172.27.3.1" "50805" "Administrator"
"Administrator" "00e00703489f"]