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 Mike Lewis 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
Nov 13, 2007
4
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