Andre de R 0 Newbie Poster

I want to ad an .dll procedure to my VB application but when I try to run the dll I get the error message 453 can't find etc.
The code is

Private target As Integer
Private solutions As Integer
Private mode As Integer
Private Type dealstr
trump As Integer
first As Integer
currenttricksuit(1 To 3) As Integer
currentrickrank(1 To 3) As Integer
remaincards(3, 3) As Integer
End Type
Private Type futuretricksstr
nodes As Integer
cards As Integer
suit(1 To 13) As Integer
rank(1 To 13) As Integer
equals(1 To 13) As Integer
score(1 To 13) As Integer
End Type


Dim deal As dealstr
Dim tricks As futuretricksstr

Private Declare Function Solveboard Lib "dds" Alias "Solveboard@112" (ByRef deal As dealstr, ByVal target As Integer, ByVal solutions As Integer, ByVal mode As Integer, ByRef tricks As futuretricksstr) As Long


Private Sub Command1_Click()

'CALL THE SOLVEBOARD
ChDir ("c:\braassembridge")
Call Solveboard(deal, target, solutions, mode, tricks)

End Sub

The dds.def file whick came with the .dll file (written in VC++ Express) looks like this

LIBRARY dds
EXPORTS
SolveBoard
SolveBoard@112 = SolveBoard

Can someone help me with this problem?

Be a part of the DaniWeb community

We're a friendly, industry-focused community of developers, IT pros, digital marketers, and technology enthusiasts meeting, networking, learning, and sharing knowledge.