Я хочу отправить ввод нескольким эмулированным мышам, используя dsf (фреймворк для симуляции устройства), включенный в текущий windows ddk. Мой код ниже проблемы в том, что диспетчер устройств распознает добавленное устройство, но моя программа (вред от мыши - также Microsoft) не создает дополнительный указатель, как предполагалось:
WriteLine "Create first input report to send to the consumer control"
Dim strMessage
strMessage = "Press Enter key to stop looping"
WriteLine strMessage
Do While NOT WScript.StdIn.AtEndOfLine
Dim InputReport1(4)
InputReport1(0) = CByte(0)
InputReport1(1) = CByte(100)
InputReport1(2) = CByte(100)
InputReport1(3) = CByte(0)
InputReport1(4) = CByte(0)
'PromptAndWaitForEnterKey "Queue input reports for processing"
GenericHIDDev.QueueInputReport(InputReport1), 10
'PromptAndWaitForEnterKey "Wait for the device to finish enumerating. Press enter to start processing input reports."
GenericHIDDev.StartProcessing
'WriteLine "You may send additional input reports at this time..."
'PromptAndWaitForEnterKey "Press enter at any time to stop processing input reports and start cleanup."
GenericHIDDev.StopProcessing
Input = WScript.StdIn.Read(1)
Loop
Примечание: это единственный раздел, который я модифицировал из примера TestGenericHid, включенного в dsf в Windows ddk (комплект драйверов устройств). После установки windows ddk перейдите в c: \ Program Files \ dsf \ GenericHid или что-то подобное для доступа к файлу vbscript.
Нужны mousmischief и windows ddk, чтобы полностью понять, что происходит, и правильно ответить на это. Не волнуйтесь, все примеры в vbscript и могут быть переделаны в vb.net, но я не хочу тратить время на преобразование, пока я не получу vbscript для работы.