creating a dll using Visual Basic 6

[gerrythistle]

would like the ability to share information between 2 VB6 applications through a dll. The problem is that the 2nd app never gets the data supplied by the first.

Any ideas or direction?

Created and compiled the dll
added the reference in each application
declared as follows in APP#1
option Explicit
public x as CAnimal ' see class code below
Private Sub MDIForm_Load()
set x = new CAnimal
x.Animal = "Animal Name"
end sub

declared as follows in APP#2
option Explicit
public x as CAnimal
Private Sub MDIForm_Load()
set x = new CAnimal
msgbox x.Animal
end sub

Dll visual Basic Code
Option Explicit
Private mvarAnimal As String 'local copy

Public Property Let Animal(ByVal vData As String)
'used when assigning a value to the property, on the left side of an assignment.
'Syntax: X.Animal = 5
mvarAnimal = vData
End Property

Public Property Get Animal() As String
'used when retrieving value of a property, on the right side of an assignment.
'Syntax: Debug.Print X.Animal
Animal = mvarAnimal
End Property

Thanks for any help

 

[paulbent]

You can't. Each app creates a new and separate instance of the Animal object.

One way to share data between applications is via the file system (registry, ini file, text file, database etc)

Paul Bent
Northwind IT Systems

http://www.northwindit.co.uk

 

[grandnagel]

Have a look at Memory mapped files... a lightning fast, cross process way to access data between applications.

http://www.fawcette.com/archives/listissue.asp?pubID=1&MagIssueId=207#

http://home.att.net/~geekStuff/wshMemoryMappedFilePage.htm

http://www.devx.com/Java/Article/10027/0

http://www.simpits.org/programming/ShareMemVB/ShareMemVB.html

 

[ESquared]

Can't you declare an ActiveX EXE's Instancing property to MultiUse, causing only one copy to load even though run many times?

Can you make this work the same for DLLs?

Someone with more knowledge has to take it from here.

 

[strongm]

I've given example code of exactly how to do this in this forum in the past. A keyword search should find it.