Modem

[The Matrix]

dial a phone number with your modem like the windows program "phone dialer"

[Cakkie]

Add to mudule

public declare Function tapiRequestMakeCall Lib "TAPI32.DLL"(byval Dest as string, byval AppName as string byval CalledParty as string, byval Comment as string) as long

public sub MakeCall(strNumber as string, strName as string)
dim retval as long
retval = tapiRequestMakeCall(Trim$(strNumber), App.Title, Trim$(strName),"")
If retval = 0 then
' succeeded
else
' failed
end if
end sub




Tom Cannaerts
slisse@planetinternet.be

The best way to escape a problem, is to solve it.