COM1_part_2

[podbelsek982]

Hello again.
Thank you for help but now there are still some problems.Here is my program and errors under. Please tell me what the f... is wrong. Thanks

program test


Dim=Names()
typeof=(DeviceIoControl)


HANDLE=CreateFile(LPCTSTR,DWORD,DWORD )
pFileName=PHYSICALDRIVE2;
dwDesiredAccess=GENERIC_WRITE;
dwCreationDisposition=CREATE_ALWAYS;



bool=DeviceIoControl(HANDLE,LPVOID,DWORD)
hDevice="com1";
lpOutBuffer=7;
nOutBufferSize=9000;


end

--------------------Configuration: commma - Win32 Debug--------------------
Compiling Fortran...
E:UrbanFortrancommmaprvi.f90
E:UrbanFortrancommmaprvi.f90(15) : Error: This name has not been declared as an array. [DEVICEIOCONTROL]
bool=DeviceIoControl(HANDLE,LPVOID,DWORD)
-------^
Error executing df.exe.

commma.exe - 1 error(s), 0 warning(s)

[james1]

I'm not sure if only part of your program came through or if you have cut most of it out. You need to be sure to have the lines:

use kernel32
implicit none

right after your program statement to ensure you are getting the necessary interface definitions and to have the compiler check your variable definitions.

James