Jump to content

Function not found in DLL please Help me!


ChenYangHuan
 Share

Recommended Posts

#Include 

$DLLFile = FileOpenDialog("Choose DLL file", @ScriptDir, "DLL files (*.*)", 3)
if @error Then Exit

$aNames = _DLLGetFunctionNames($DLLFile)
If @error Then Exit ConsoleWrite($DLLFile &": Fault " & @error & @CR)

;~ $sNames = _DLLGetFunctionNames($DLLFile, 1)
;~ ConsoleWrite($sNames & @CRLF)

_ArrayDisplay($aNames, StringTrimLeft($DLLFile, StringInStr($DLLFile, "\", 0, -1)))

For $i=0 To 768
If StringInStr($aNames[$i],'Create')<>0 Then MsgBox(0,$i,$aNames[$i])
Next




Func _DLLGetFunctionNames($sFileName, $ParamResult = 0)
;funkey Aug, 12th, 2010
;$ParamOutput: 0 --> Result is array
; 1 --> Result is string
Local $hFile = FileOpen($sFileName, 0)
If $hFile = -1 Then Return SetError(1) ; file error
Local $sFile = FileRead($hFile)
FileClose($hFile)
Local $iStartPos, $iEndPos, $sFunctionNames, $aFunctionNames
Local $DLLName = StringTrimLeft($sFileName, StringInStr($sFileName, "\", 0, -1))
For $i = 1 To 99
$iStartPos = StringInStr($sFile, $DLLName &amp; Chr(0), 0, -$i)
If $iStartPos = 0 Then Return SetError(2) ;search error
$sFunctionNames = StringTrimLeft($sFile, $iStartPos - 2)
$sFunctionNames = StringTrimLeft($sFunctionNames, StringInStr($sFunctionNames, "dll") + 3)
$iEndPos = StringInStr($sFunctionNames, Chr(0) &amp; Chr(0))
$sFunctionNames = StringLeft($sFunctionNames, $iEndPos - 1)
If StringInStr($sFunctionNames, Chr(0) &amp; Chr(0x90)) Then $sFunctionNames = StringLeft($sFunctionNames, StringInStr($sFunctionNames, Chr(0) &amp; Chr(0x90)) - 1)
$aFunctionNames = StringSplit($sFunctionNames, Chr(0), 2)
If UBound($aFunctionNames) > 0 And StringStripWS($aFunctionNames[0], 8) <> "" Then ExitLoop
Next
Switch $ParamResult
Case 0
Return $aFunctionNames
Case 1
Return StringReplace($sFunctionNames, Chr(0), @CRLF)
EndSwitch
EndFunc

This show func but when use it show function not found, please help me!

$dr=@ScriptDir&amp;('\PDUConverter.dll')
$a=DllCall($dr,'str','CreateConcatTextMessage','str','This is text','bool',True,'str','123456789')
MsgBox(0,'',@error)
MsgBox(0,'',$a)

PDUConverter.zip

Edited by ChenYangHuan
Link to comment
Share on other sites

Search the Forum for DLL Helper

It was written by Yashied

Using that I found that there is not a single function in that DLL

Maybe its a COM(ACTIVEX) DLL

Edited by PhoenixXL

My code:

PredictText: Predict Text of an Edit Control Like Scite. Remote Gmail: Execute your Scripts through Gmail. StringRegExp:Share and learn RegExp.

Run As System: A command line wrapper around PSEXEC.exe to execute your apps scripts as System (LSA). Database: An easier approach for _SQ_LITE beginners.

MathsEx: A UDF for Fractions and LCM, GCF/HCF. FloatingText: An UDF for make your text floating. Clipboard Extendor: A clipboard monitoring tool. 

Custom ScrollBar: Scroll Bar made with GDI+, user can use bitmaps instead. RestrictEdit_SRE: Restrict text in an Edit Control through a Regular Expression.

Link to comment
Share on other sites

As far as I see this is a .NET Library. You can not use it directly in AutoIt.

Programming today is a race between software engineers striving to
build bigger and better idiot-proof programs, and the Universe
trying to produce bigger and better idiots.
So far, the Universe is winning.

Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...