sqlite语法,正则替换引号

heavenm

Local $sSource = 'aaa,bb,,,ccc'
;~MsgBox(0, '源字符串', $sSource)
Local $sSRERe = StringRegExpReplace($sSource, '(?m)[' & "'" & '"]*([^,=\v' & "'" & '"]*)[' & "'" & '"]*(?:,|$)', '"\1",')
MsgBox(0, '', StringTrimRight($sSRERe,4))

一句正则搞不定,后面删除四位就OK了!~

heavenm

_SQLiteEx_Write($pjtDB, '表.字段', 值(可以为数组))
Func _SQLiteEx_Write($_hdb, $_table, $_vaule)
        $__table = StringRegExp($_table, '[^\.]+', 3) ;拆分表与表名,以点(.)分隔!
        If IsArray($_vaule) Then
                For $i = 0 To UBound($_vaule) - 1
                        _SQLiteEx_Write($_hdb, $_table, _ArrayToString($_vaule, ',', $i, $i))
                Next
        Else
                $__vaule = StringTrimRight(StringRegExpReplace($_vaule, '(?m)[' & "'" & '"]*([^,=\v' & "'" & '"]*)[' & "'" & '"]*(?:,|$)', '"\1",'), 4)
                 $_sCommand = 'INSERT OR IGNORE INTO ' & $__table[0] & ' (' & $__table[1] & ') VALUES (' & $__vaule & ')'
                ConsoleWrite($_sCommand & @CRLF)
                _SQLite_Exec($_hdb, $_sCommand)
        EndIf
EndFunc   ;==>_SQLiteEx_Write

OK,又搞定个SQLITE,现在经常用SQLITE去操作,这样子方便多了!第一次写这种代码 函数里面套用自身~

kk_lee69

https://www.jianshu.com/p/985fc3b360e1
https://www.cnblogs.com/peterYong/p/6556680.html