vc6.0怎么调用Fortran生成的动态链接库，改动态链接库带有open函数和write函数

vc6.0如何调用Fortran生成的动态链接库，改动态链接库带有open函数和write函数
如题：vc6.0如何调用Fortran生成的动态链接库，改动态链接库带有open函数和write函数
比如最简单的由Fortran生成的动态链接库的代码：

function OutPut(void) 
!DEC$ ATTRIBUTES DLLEXPORT::OutPut

open(1,file='E:\\output.dat')

end function OutPut  

我要在vc6.0中 调用以上代码生成的dll中的OutPut函数，弹出异常，请问各位大侠，该问题如何解决

------解决方案--------------------
extern "Fortran"

???
------解决方案--------------------
看看MSDN的帮助 
关键要注意调用方式和参数传递问题

Migrating Fortran Code