按键精灵怎么得到数据库使用SQL命令后的返回值

按键精灵怎么得到数据库使用SQL命令后的返回值,第1张

给你个Access的例子(很早之前写的,现在好久没用过按键了):

Ret = Plugin.Access.Connect(path,"")

If RET = true Then

Form1.短信1.Text="连接数据库成功"

原ID = Plugin.Access.SelectData("MSG_Inbox", "max(ID)", "MMSUrl='" &num &"'")

Do

新ID = Plugin.Access.SelectData("MSG_Inbox", "max(ID)", "MMSUrl='" &num &"'")

If 新ID = 原ID Then

Delay 5000

Else

Form1.短信老.Text=Form1.短信老.Text&"提取前"&新ID&VBCrLf

新ID = Lib.算法.提取字串符中所有数字(新ID)

Form1.短信老.Text=Form1.短信老.Text&"提取后"&新ID&VBCrLf

yzm = Plugin.Access.SelectData("MSG_Inbox", "MsgTitle","ID="&新ID)

If instr(yzm,"百度")>0 Then

Form1.短信1.Text=yzm

Exit Do

Else

Form1.短信1.Text="【获取到不是来自百度的短信???】"&VBCrLf&yzm

Exit Do

End If

End If

Loop

Ret = Plugin.Access.Close()

End If

给你段代码参考:

//将查询出的数据导出成Excel文件

procedure TForm1.N1Click(Sender: TObject)

var MSExcel:Variant

i,n:Integer

begin

SaveDialog1.Filter:='*.xls|*.xls'

SaveDialog1.DefaultExt:='XLS'

if SaveDialog1.Execute then

begin

MSExcel:=CreateOLEObject('Excel.Application')

MSExcel.WorkBooks.Add

MSExcel.Visible:=False

form1.ADOQuery1.Open

n:=form1.ADOQuery1.RecordCount

form1.ADOQuery1.First

MSExcel.Cells[1,1].NumberFormat:='@'

MSExcel.Cells[1,1].Value:='编号'

MSExcel.Cells[1,2].Value:='歌曲名'

MSExcel.Cells[1,3].Value:='演唱者'

MSExcel.Cells[1,4].Value:='类型代码'

MSExcel.Cells[1,5].Value:='使用时间'

MSExcel.Cells[1,6].Value:='备注'

for i:=2 to n do

begin

MSExcel.Cells[i,1].NumberFormat:='@'

MSExcel.Cells[i,1].Value:=ADOQuery1.FieldByName('SongID').AsString

MSExcel.Cells[i,2].Value:=ADOQuery1.FieldByName('SongName').AsString

MSExcel.Cells[i,3].Value:=ADOQuery1.FieldByName('Singer').AsString

MSExcel.Cells[i,4].Value:=ADOQuery1.FieldByName('ClassID').AsString

MSExcel.Cells[i,5].Value:=ADOQuery1.FieldByName('UseTimes').AsString

MSExcel.Cells[i,6].Value:=ADOQuery1.FieldByName('Note').AsString

form1.ADOQuery1.Next

end

MSExcel.ActiveWorkBook.SaveAs(SaveDialog1.FileName)

MSExcel.ActiveWorkBook.Saved:=True

MSExcel.Quit

end

//messagebox(0,'数据已成功导出!','系统提示!',MB_OK+MB_ICONINFORMATION)

end

按键精灵是不可能建立一个数据库的。

因为,按键精灵是一款模拟鼠标键盘动作的软件。

通过制作脚本,可以让按键精灵代替双手,自动执行一系列鼠标键盘动作。按键精灵简单易用,不需要任何编程知识就可以作出功能强大的脚本。只要在电脑前用双手可以完成的动作,按键精灵都可以替代完成。


欢迎分享,转载请注明来源:内存溢出

原文地址: http://outofmemory.cn/sjk/10013415.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-05-04
下一篇 2023-05-04

发表评论

登录后才能评论

评论列表(0条)

保存