>Yes
>I Tried:
>
>DECLARE Integer HvsCodeOpen IN HvsCodeDll.dll string dbDirectory
>DECLARE INTEGER vbHvsCodeTeze IN HvsCodeDll STRING @vHvsCode, STRING @vHvsAdr
>test=HvsCodeOpen("D:\DllTest\") &&Opens the Database Access MDB
>
>vHvsAdr="DEU"+chr(0)+"30559"+chr(0)+"Hannover" + chr(0)+ "Strasse 1"+chr(0)
>vHvsCode=REPLICATE(CHR(0),512)
>
>retval=vbHvsCodeTeze(@vHvsCode,@vHvsAdr)
>
>
>But still get only get a message "declare dll caused an exception"
>
>can you point out where my mistake is ?

see anatoliys reply - if that one still throws an error, try 2nd parameter as value, not reference. In prev posts I also described the needed structure.