换种方式，继续请教，谢谢

ok100fen

现在有个驱动代码，
没有错误，但是，怎么用VB，来与它通信?
麻烦那些大牛，给个VB代码
也就是说，如何根据驱动的参数来写VB的代码
我想领会一下驱动通信
谢谢大家

1. 
   
2. 
   
3. #include "ntddk.h"
   
4. #define IOCTL_TEST1 CTL_CODE(\
   
5. FILE_DEVICE_UNKNOWN, \
   
6. 0x800, \
   
7. METHOD_BUFFERED, \
   
8. FILE_ANY_ACCESS)
   
9. VOID Unload(IN PDRIVER_OBJECT pDriverObject)
   
10. {
    
11. UNICODE_STRING symLinkName;
    
12. RtlInitUnicodeString(&symLinkName,L"\\??\\HelloDDK");
    
13. IoDeleteSymbolicLink(&symLinkName);
    
14. IoDeleteDevice(pDriverObject->DeviceObject);
    
15. KdPrint(("Device Delete Success\n"));
    
16. }
    
17. NTSTATUS MyDispatch(IN PDEVICE_OBJECT device,IN PIRP irp)
    
18. {
    
19. PIO_STACK_LOCATION stack = IoGetCurrentIrpStackLocation(irp);
    
20. 
    
21. irp->IoStatus.Status = STATUS_SUCCESS;
    
22. irp->IoStatus.Information = 0;
    
23. 
    
24. if (stack->MajorFunction==IRP_MJ_CREATE)
    
25. {
    
26.   KdPrint(("IRP_MJ_CREATE\n"));
    
27. }
    
28. if (stack->MajorFunction==IRP_MJ_CLOSE)
    
29. {
    
30.   KdPrint(("IRP_MJ_CLOSE\n"));
    
31. }
    
32. 
    
33. IoCompleteRequest( irp, IO_NO_INCREMENT );
    
34. 
    
35. return STATUS_SUCCESS;
    
36. }
    
37. NTSTATUS CreateDevice (
    
38.         IN PDRIVER_OBJECT pDriverObject)
    
39. {
    
40. NTSTATUS status;
    
41. PDEVICE_OBJECT pDevObj;
    
42. 
    
43. //创建设备名称
    
44. UNICODE_STRING devName;
    
45. UNICODE_STRING symLinkName;
    
46. 
    
47. RtlInitUnicodeString(&devName,L"\\Device\\MyDDKDevice");
    
48. RtlInitUnicodeString(&symLinkName,L"\\??\\HelloDDK");
    
49. 
    
50. //创建设备
    
51. status = IoCreateDevice( pDriverObject,
    
52.         0,
    
53.         &devName,
    
54.         FILE_DEVICE_UNKNOWN,
    
55.         0, TRUE,
    
56.         &pDevObj );
    
57. if (!NT_SUCCESS(status))
    
58. {
    
59.   return status;
    
60. }
    
61. pDevObj->Flags |= DO_BUFFERED_IO;
    
62. //创建符号链接
    
63. 
    
64. status = IoCreateSymbolicLink( &symLinkName,&devName );
    
65. if (!NT_SUCCESS(status))
    
66. {
    
67.   IoDeleteDevice( pDevObj );
    
68.   return status;
    
69. }
    
70. return STATUS_SUCCESS;
    
71. }
    
72. NTSTATUS MyIOCTL(IN PDEVICE_OBJECT pDevObj,
    
73.          IN PIRP pIrp)
    
74. {
    
75. NTSTATUS status = STATUS_SUCCESS;
    
76. UCHAR* InputBuffer=NULL;
    
77. ULONG i=0;
    
78. //得到当前堆栈
    
79. PIO_STACK_LOCATION stack = IoGetCurrentIrpStackLocation(pIrp);
    
80. //得到输入缓冲区大小
    
81. ULONG cbin = stack->Parameters.DeviceIoControl.InputBufferLength;
    
82. //得到IOCTL码
    
83. ULONG code = stack->Parameters.DeviceIoControl.IoControlCode;
    
84. switch (code)
    
85. {      // process request
    
86.   case IOCTL_TEST1:
    
87.   {
    
88.    KdPrint(("IOCTL_TEST1\n"));
    
89.    //缓冲区方式IOCTL
    
90.    //显示输入缓冲区数据
    
91.    InputBuffer = (UCHAR*)pIrp->AssociatedIrp.SystemBuffer;
    
92.    for (i=0;i<cbin;i++)
    
93.    {
    
94.     KdPrint(("%X\n",InputBuffer[i]));
    
95.    }
    
96.    break;
    
97.   }
    
98.   default:
    
99.    status = STATUS_INVALID_VARIANT;
    
100. }
     
101. // 完成IRP
     
102. pIrp->IoStatus.Status = status;
     
103. pIrp->IoStatus.Information = 0; // bytes xfered
     
104. IoCompleteRequest( pIrp, IO_NO_INCREMENT );
     
105. return status;
     
106. }
     
107. NTSTATUS DriverEntry(IN PDRIVER_OBJECT pDriverObject,IN PUNICODE_STRING theRegistryPath)
     
108. {
     
109. pDriverObject->DriverUnload = Unload;
     
110. 
     
111. pDriverObject->MajorFunction[IRP_MJ_CREATE] = MyDispatch;
     
112. pDriverObject->MajorFunction[IRP_MJ_CLOSE] = MyDispatch;
     
113. pDriverObject->MajorFunction[IRP_MJ_DEVICE_CONTROL] = MyIOCTL;
     
114. CreateDevice(pDriverObject);
     
115. return STATUS_SUCCESS;
     

复制代码

ok100fen

附上VB代码
希望小李同学给我改改

Tesla.Angela

我看xiaoly被你气糊涂了

ok100fen

呵呵，那就TA帮帮忙吧

向小李老师道歉~

俺太菜了~

Tesla.Angela

这个我也不会，你还是用回我给你的模板吧。

ok100fen

模板的VB部分那句代码填写什么？

ok100fen

TA兄弟，
把你的那个模板的VB代码补上吧

还有，我以前用你提供的工具能成功编译你的那个模板
后来我有装了一个ddk，编译你的模板，就出错
不知道什么原因呢

xiaoly99

你那个代码,用四个字来说,就是"垃圾代码".
你这个修改好的压缩包都要389KB,而我的Dew也只有247KB.
我已经修改好了,把完整的垃圾代码传上来.
还有,不是我打击OK大哥.您这份驱动代码应该不是您写的吧.您说过只提一个问题,现在不断的提问题,提问题,提了多少个问题?您却还是搞不懂Ioctl,连最起码的Ioctl Code都搞不懂.连字符串都......不说了,不然又要被某些"Zzzianses"说打击新手了.

ok100fen

DbgPrint("输入缓冲数据内容:%u 输入缓冲数据长度:%u",*(PULONG)pIrp->AssociatedIrp.SystemBuffer,cbin);


红色的地方还是不明白怎么回事
呵呵，高手，解释一下
谢谢

zEr0

谢谢xiaoly99 分享！