关于mysql.au3的一个问题

nop

是withoutODBC的版本，自带的test.au3里只有查询，可以正常查询我的mysql，但是我在其中使用 _AddRecord添加记录时提示，怎么回事?

ERROR: _AddRecord(): undefined function.



mysql.au3的相关文件我都在当前目录和include文件夹都放了一份

nivisde

#include是否包含正确的文件名。是否存在
函数名是否正确。

nop

回复 2# nivisde


    include肯定没问题，自带的test里面就调用了很多mysql.au3的函数。
_AddRecord是我照着论坛的教程添加的，mysql.au3中也找到了，没问题

xms77

直接copy MySql.au3里的_AddRecord()试试.

nop

回复 4# xms77


    问题依旧啊，这个是mysql.au3中的_AddRecord

Func _AddRecord($oConnectionObj, $sTable, $vRow, $vValue = "")
        If IsObj($oConnectionObj) Then
                $query = "INSERT INTO " & $sTable & " ("
                
                If IsArray($vRow) Then
                        For $i = 0 To UBound($vRow, 1) - 1
                                If $i > 0 And $i <> UBound($vRow, 1) - 1 Then
                                        $query = $query & "," & $vRow[$i] & ""
                                ElseIf $i = UBound($vRow, 1) - 1 And $vRow[$i] <> "" Then
                                        $query = $query & "," & $vRow[$i] & ") VALUES("
                                ElseIf $i = 0 Then
                                        $query = $query & "" & $vRow[$i] & ""
                                ElseIf $vRow[$i] = "" Then
                                        $query = $query & ") VALUES("
                                EndIf
                        Next
                EndIf
                If Not IsArray($vRow) And Not IsArray($vValue) And Not IsInt($vValue) Then
                        $oConnectionobj.execute ("INSERT INTO " & $sTable & " (" & $vRow & ") VALUES('" & $vValue & "')")
                        return 1
                ElseIf IsInt($vValue) And Not IsArray($vRow) And Not IsArray($vValue) Then
                        $oconnectionobj.execute ("INSERT INTO " & $sTable & " (" & $vRow & ") VALUES(" & $vValue & ")")
                        return 1
                EndIf
                
                If IsArray($vValue) Then
                        For $i = 0 To UBound($vValue, 1) - 1
                                If $i > 0 And $i <> UBound($vValue, 1) - 1 And Not IsInt($vValue[$i]) Then
                                        $query = $query & ",'" & $vValue[$i] & "'"
                                ElseIf $i = UBound($vValue, 1) - 1 And $vValue[$i] <> "" And Not IsInt($vValue[$i]) Then
                                        $query = $query & ",'" & $vValue[$i] & "');"
                                ElseIf $i = 0 And Not IsInt($vValue[$i]) Then
                                        $query = $query & "'" & $vValue[$i] & "'"
                                ElseIf $vValue[$i] = "" Then
                                        $query = $query & ");"
                                ElseIf IsInt($vValue[$i]) And $vValue[$i] <> "" Then
                                        $query = $query & "," & $vValue[$i]
                                EndIf
                        Next
                EndIf
                If StringRight($query, 2) <> ");" Then
                        $query = $query & ");"
                        
                EndIf
                $oconnectionobj.execute ($query)
        EndIf
        If Not IsObj($oConnectionObj) Then
                SetError(2)
                Return 0
        EndIf
        If @error And IsObj($oConnectionObj) Then
                Return 0
                SetError(1)
        Else
                Return 1
        EndIf
        
EndFunc   ;==>_AddRecord

代码我这样写的
dim $tvalues[3]
$tvalues[0] = "pc"
$tvalues[1] = "email"
$tvalues[2] = "";

_AddRecord($connected,'s',$tvalues,$tvalues)