Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations Rhinorhino on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Creating DLL CVF6.6

Status
Not open for further replies.

rafaeltini

Programmer
Joined
Nov 13, 2007
Messages
4
Location
BR
Hi, i'm new at using fortran, and i'm trying to covert an old progran that i found to a dll, so i can pul it from microsft execel, with the elp of vba.
but i'm having some problens and got lost on how to do this, so i would like a little help from you.
the variables that i want to pass are

READ(10,*) TFRE
READ(10,*) TFRS
READ(10,*) HFR
READ(10,*) CPFF
READ(10,*) TFAE
READ(10,*) TFAS
READ(10,*) HFA
IF(TFAE.EQ.TFAS) THEN
READ(10,*) DENSVAP
END IF
READ(10,*) CPFA
READ(10,*) NCOR
READ(10,*) DTM
READ(10,100) ((A(L,K),L=1,5),K=1,NCOR)
100 FORMAT(F25.12)
READ(10,*)
READ(10,101) ((PROJ(L,K),L=1,6),K=1,NCOR+2)
101 FORMAT(F25.12)
READ(10,*)
READ(10,112) (ESTA(L),L=1,NCOR)
112 FORMAT(F25.12)


they are declared on the code as doulbe precision and dimension.

what i should change , and what lines should i add to the code so i can create the dll

also, how should the vb code be stated?

if you guys could provide me some lnks to other exemples i would really apreciate, because i need to pass a lot of arrays and single vars.
thank you for the help

 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top