关于WIN32API函数OpenDriver的问题

Question

Public Declare Function OpenDriver Lib "winmm.dll" (ByVal szDriverName As String, ByVal szSectionName As String, ByVal lParam2 As Long) As Longdim myvar as long
myvar = OpenDriver("ReelDrv",0,0)
为什么总是返回0？？？？
请高手指教！

Answer 1

没用过这个函数，刚看了MSDN，这个函数的参数是LPCWSTR。不知道是不是这个问题。
OpenDriver(StrConv("ReelDrv",vbUnicode),0,0)

Answer 2

还是不行，不过我估计差不多了，你再帮我改改，我看了以前的帖子，以前有人也碰到过这个问题，他只说了要进行Unicode转换，具体没说该怎么转换，我没装MSDN，这里查不到

Answer 3

你也试试用ReelDrv来代替reeldrv。
dim Iopen as Long
Iopen= OpenDriver("ReelDrv",vbnullstring,byval 0&)

Answer 4

Public Declare Function OpenDriver Lib "winmm.dll" Alias "OpenDriver" (ByVal szDriverName As String, ByVal szSectionName As String, ByVal lParam2 As Long) As Longdim Iopen as Long
Iopen= OpenDriver(strconv( "ReelDrv", vbunicode ) ,vbnullstring,byval 0&)这样呢？

Answer 5

试下这样可以吗
OpenDriver(strconv( "ReelDrv", 5) ,0,0)
是在VFP调用的.