# MySQL UDFs (without ODBC)

## Recommended Posts

Share UDF, please. Links in the topic do not work. I'll be very grateful

##### Share on other sites
• 1 month later...
• Replies 189
• Created

#### Popular Posts

MySQL UDFs using libmysql.dll functions: most functions from MySQL API all are prefixed with an underscore: _MySql... e.g.: _MySQL_Real_Query( sometimes parameters are chaged - read function descripti

I don't get it. @mLipok has polished (pun intended) a nice ADO UDF which works flawlessly. Why insist on using another one which causes issues?

@ProgAndy I like anything that smells to SQL !! Unfortunately you link does not work (for me ?). Rgds ptrex

#### Posted Images

@ProgAndy

I'm actually getting a 403 from all links on your domain web server http://progandy.de/

Looking forward to trying out this UDF.   Thanks

##### Share on other sites

Actually, a whois lookup suggests the domain might no longer be active.  If someone else has a copy of this UDF, please repost a link to an alternate download location.  Or if it's small enough, perhaps even paste the code here in the forum?   It would be a shame for this to become no longer available, as it looks like it could be really useful to many people.  Thanks!

##### Share on other sites
• 7 months later...
On 7/4/2018 at 5:07 AM, TpeTTeT said:

Share UDF, please. Links in the topic do not work. I'll be very grateful

##### Share on other sites
• 3 weeks later...

Hey Guys, i have a statement problem.. i don't know, how put on this correctly..

$fdata = "INSERT INTO asd.qwe (name,lname,email,note) VALUES (" & _ "'" &$sName & "'," & _
"'" & $sLname & "'," & _ "'" &$sEmail & "'," & _

;~ If StringInStr($ctrl, "'") Then ;~ If StringInStr($val, ",") Then
;~  "'" & StringSplit($val, ',',$STR_ENTIRESPLIT)[1] & "');"
;~ Else
;~  "'" & $val & "');" ;~ EndIf ;~ Else ;~ "'"$empty "');"
;~ EndIf
_MySQL_Real_Query($cnn,$fdata)

i'll be so much grateful..

*****************************************

Solution..

$fdata = "INSERT INTO asd.qwe (name,lname,email,note) VALUES (" & _ ;~ db col - name "'" &$sName & "'," & _
;~ db col - lname
"'" & $sLname & "'," & _ ;~ db col - email "'" &$sEmail & "',"
;~ db col - note
If StringInStr($ctrl, "'") Then If StringInStr($val, ",") Then
$fdata =$fdata & "'" & StringSplit($val, ',',$STR_ENTIRESPLIT)[1] & "');"
Else
$fdata =$fdata & "'" & $val & "');" EndIf Else$fdata = $fdata & "'" &$empty & "');"
EndIf
_MySQL_Real_Query($cnn,$fdata)

maybe it helps someone..

Edited by Ujube
##### Share on other sites
• 2 months later...

Does anyone still have the zip file for this? I am working on a project to use a MySQL database for data collection at each client. I can't seem to follow any of the links (as they are very old apparently), and locate the zip for download.

##### Share on other sites
2 hours ago, Daymond said:

Does anyone still have the zip file for this?

##### Share on other sites
1 hour ago, argumentum said:

Thank you, I missed that one. I thought I checked them all.

##### Share on other sites
• 3 months later...

Hi , Anydy

Thanks for your great work.  Today , I tried to use this UDF  and had successful fetch records from my databae. Unfortunately , It can not display the Chinese big5 character. what's wrong with it ? my c connector driver version is 6.1 1 and  mysql was 8.0.17.  Could you help me with it ?  Much Thanks in advance!  Or someone's help  would be appreciated

Asparagus

.

##### Share on other sites

I haven't looked and I don't use MySQL but most probably the various functions in this UDF deal with native AutoIt strings which are Unicode UTF16-LE.

In case this is the cause, you can convert wide strings to any codepage (including double-byte types like Big5) and vice-versa with these functions:

Func _StringToCodepage($sStr,$iCodepage = Default)
If $iCodepage = Default Then$iCodepage = 65001        ; or Int(RegRead("HKLM\SYSTEM\CurrentControlSet\Control\Nls\Codepage", "OEMCP"))
Local $aResult = DllCall("kernel32.dll", "int", "WideCharToMultiByte", "uint",$iCodepage, "dword", 0, "wstr", $sStr, "int", StringLen($sStr), _
"ptr", 0, "int", 0, "ptr", 0, "ptr", 0)
Local $tCP = DllStructCreate("char[" &$aResult[0] & "]")
$aResult = DllCall("Kernel32.dll", "int", "WideCharToMultiByte", "uint",$iCodepage, "dword", 0, "wstr", $sStr, "int", StringLen($sStr), _
"struct*", $tCP, "int",$aResult[0], "ptr", 0, "ptr", 0)
Return DllStructGetData($tCP, 1) EndFunc ;==>_StringToCodepage Func _CodepageToString($sCP, $iCodepage = Default) If$iCodepage = Default Then $iCodepage = 65001 ; or Int(RegRead("HKLM\SYSTEM\CurrentControlSet\Control\Nls\Codepage", "OEMCP")) Local$tText = DllStructCreate("byte[" & StringLen($sCP) & "]") DllStructSetData($tText, 1, $sCP) Local$aResult = DllCall("kernel32.dll", "int", "MultiByteToWideChar", "uint", $iCodepage, "dword", 0, "struct*",$tText, "int", StringLen($sCP), _ "ptr", 0, "int", 0) Local$tWstr = DllStructCreate("wchar[" & $aResult[0] & "]")$aResult = DllCall("kernel32.dll", "int", "MultiByteToWideChar", "uint", $iCodepage, "dword", 0, "struct*",$tText, "int", StringLen($sCP), _ "struct*",$tWstr, "int", $aResult[0]) Return DllStructGetData($tWstr, 1)
EndFunc   ;==>_CodepageToString

Use the codepage IDs defined there https://docs.microsoft.com/fr-fr/windows/win32/intl/code-page-identifiers

For instance, Big5 is 950.

Edited by jchd

This wonderful site allows debugging and testing regular expressions (many flavors available). An absolute must have in your bookmarks.
RegExp tutorial: enough to get started
PCRE v8.33 regexp documentation latest available release and currently implemented in AutoIt beta.

SQLitespeed is another feature-rich premier SQLite manager (includes import/export). Well worth a try.
SQLite Expert (freeware Personal Edition or payware Pro version) is a very useful SQLite database manager.
An excellent eBook covering almost every aspect of SQLite3: a must-read for anyone doing serious work.
SQL tutorial (covers "generic" SQL, but most of it applies to SQLite as well)
A work-in-progress SQLite3 tutorial. Don't miss other LxyzTHW pages!
SQLite official website with full documentation (may be newer than the SQLite library that comes standard with AutoIt)

## Create an account

Register a new account

• ### Similar Content

• By DevMode
welcome
I need help dealing with a C++ DLL
Specify that I need help with how to use this function
struct libusb_device; typedef struct libusb_context libusb_context; ssize_t LIBUSB_CALL libusb_get_device_list(libusb_context *ctx,libusb_device ***list); My problem is how to deal with "libusb_device ***list"
my code
$libusb_device = DllStructCreate("PTR") Func libusb_init()$Var = DllCall($libusb0, "ptr", "libusb_init",'ptr',$_libusb_device_handle_Ptr) If @error Then Return False Return $Var[1] EndFunc Func libusb_get_device_list() MsgBox(0,VarGetType($_libusb_device_handle_Ptr),$_libusb_device_handle_Ptr)$Var = DllCall($libusb0, "int", "libusb_get_device_list","ptr",$_libusb_device_handle_Ptr,"ptr*",POINTER(POINTER($libusb_device)))$Error = @error If $Error Then Return False MsgBox(0,VarGetType($Var),$Error&@CRLF&$Var) _ArrayDisplay($Var) Return$Var[1] EndFunc
Thank you
iLibUSB.dll iLibUSB_32.dll libusb.h

• Hi all,
My programming knowledge is very basic.
I have an old script that creates shares and assign permissions. It normally registers SetAcl.ocx if necessary and creates an object to assign permissions.
The command that registers SetAcl was apparently working fine under Windows 7 but is not working under Windows 10.
RunWait("regsvr32.exe path\to\setacl.ocx /s", "", @SW_HIDE) As I'm logged in as admin, I changed this command to :
RunAsWait(@UserName, "", "", 0, "regsvr32.exe path\to\setacl.ocx /s", "", @SW_HIDE) It seems to terminate correctly but the script still doesn't work as expected.
To check that, I've created that small script :
Local $objSetAcl = ObjCreate("SETACL.SetACLCtrl.1") If IsObj($objSetAcl) Then ConsoleWrite("Object successfully created." & @CRLF) Else ConsoleWrite("Object not created. Registering SetAcl.ocx" & @CRLF) Local $result = RunAsWait(@UserName, "", "", 0, "regsvr32.exe path\to\setacl.ocx /s", "", @SW_HIDE); Use of my admin username to elevate CMD ConsoleWrite("Return code : " &$result & @CRLF) ConsoleWrite("Creating object" & @CRLF) $objSetAcl = ObjCreate("SETACL.SetACLCtrl.1") If IsObj($objSetAcl) Then ConsoleWrite("Object successfully created." & @CRLF) Else ConsoleWrite("Object creation failed." & @CRLF) EndIf EndIf It tries to register SetAcl.ocx, return code 0 seems to be fine but still can't use SetAcl.
But if I go to CMD as admin, run the regsvr32 command and restart my script, it can create the object without issue.
I know my poor knowledge makes me miss something. Anyone can help me figure this out ?

• Dear members of the forum,
I'm working on a project in which I have to use Image recognition technique.
Due to client restrictions, I couldn't use AutoIt for this project.
Is there a way to use this DLL "ImageSearchDLL.dll" (which is used to do image recognition steps in AutoIt) in VB.Net to achieve the same result?
I have used this DLL few years before and got good results. If there is a latest version of this DLL and if you can share it, that will be helpful too.
Any guidance is deeply appreciated.

• Hi AutoIt Scripters/Programmers. I have a question about MIME Tools for Notepad++:
I've recently found a UDF about Base64 in forum, but they can't decode\encode correctly some emojis , other UTFs and etc. so i decided to use mimeTools.dll of Notepad++ or main site
My problem is how to use this dll in AutoIt Language?

• Good morning Forums
In these days, I am working on a project that involved me to use some Windows APIs to obtain some information about Terminal Servers.
I'm doing this using wtsapi32.dll in a VBA Project, but, the lack of knowledge about few things threated in the articles make this quite difficult to
implement and understand at the same time.
The most difficult thing I'm facing is "translating" C/C++ functions or struct in VBA when pointers are used, or pointers of pointers, and so on.
Since VBA seems to not have a pointer type, to make those functions work I need to implement other functions taken from other DLLs, and this confuses me a lot.
For example, starting from this code, I splitted all the functions and all the definitions to understand why they are there, and why I need to use them.
At the end, I've found out that the code I was going to implement starting from the functions provided in the Microsoft Docs won't be ever be able to work without some supplementary functions which are not mentioned anywhere.
So, I was wondering if someone would please point me out to a good and practical exaplanation about pointers (in general) or specifically for VBA, because I need to use them quite often in these days, and I'd like to understand what I am doing.

Best Regards and Stay at home 🏡

×

• Wiki

• Back

• #### Beta

• Git
• FAQ
×
• Create New...