当前位置:首页 » 数据仓库 » au3数据库操作
扩展阅读
webinf下怎么引入js 2023-08-31 21:54:13
堡垒机怎么打开web 2023-08-31 21:54:11

au3数据库操作

发布时间: 2023-01-06 07:31:01

Ⅰ 求一段au3脚本操作txt文件的代码

用户自定义函数 文件管理 _FileCountLines 返回指定文件的行数.

#Include <File.au3>
_FileCountLines($sFilePath)

参数:
$sFilePath 要读取的文件的所在路径

读取300行的画 貌似没有现成函数
的自己想了
建议用 _FileReadToArray 把整个文件 读到 数组
(数组 一个元素 是文件的一行 内容)
找到 后 用_FileWriteFromArray 写入文件

当前日期 可以用 时间和日期 宏 中的
@MDAY 当天属本月的第几天,值的范围是 01 到 31
@MON 当前月份,值的范围是 01到 12

#include <array.au3>
#include <File.au3>
Local $filepath = "C:\Dev-Cpp\include\stdio.h";;;;改成你自己的路径
Local $lines = _FileCountLines($filepath)
If $lines <= 300 Then
MsgBox(0, "小于300行", "实际行数: " & $lines)
Else
If 6 = MsgBox(4, "超过300行", "是否前300行提取?") Then
Local $array
_FileReadToArray($filepath, $array)
Local $ouputfile = @DesktopCommonDir & "\" &@YEAR & "-" & @MON & "-" & @MDAY & ".txt"
_FileWriteFromArray($ouputfile, $array, 1, 300)
EndIf
EndIf

@YEAR 当前年份(4位数)
用 & 把它们拼接成字符串 做文件名

桌面用 目录宏
@DesktopDir 当前用户的 桌面 目录所在路径
@DesktopCommonDir 桌面 目录所在路径(例: C:\Documents and Settings\All Users\桌面)

Ⅱ au3操作txt问题

Local$srcFile="test.txt"
Local$desFile="result.txt"
IfFileExists($desFile)ThenFileDelete($desFile)
Local$file=FileOpen($srcFile,0)
If$file=-1Then
MsgBox(0,"Error","Failedtoopenfile!")
Exit
EndIf
While1
Local$line=FileReadLine($file)
If@error=-1ThenExitLoop
FileWriteLine($desFile,StringFormat("www%scom",$line))
Wend
FileClose($file)
FileMove($desFile,$srcFile,1)

测试可用。

Ⅲ autoit-v3编程高手请进

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=E:\我的文档\工作台\学习资料\Form1.kxf
Global $Form1 = GUICreate("考试系统", 554, 507, 220, 125)
Global $Group1 = GUICtrlCreateGroup("序号:1", 16, 40, 513, 209)
Global $Label1 = GUICtrlCreateLabel("", 32, 64, 472, 40)
Global $Label2 = GUICtrlCreateLabel("A:", 32, 120, 470, 17)
Global $Label3 = GUICtrlCreateLabel("B:", 32, 152, 470, 17)
Global $Label4 = GUICtrlCreateLabel("C:", 32, 184, 464, 17)
Global $Label5 = GUICtrlCreateLabel("D:", 32, 216, 465, 17)
Global $Button1 = GUICtrlCreateButton("答案1", 32, 256, 97, 33)
Global $Button2 = GUICtrlCreateButton("答案2", 160, 256, 97, 33)
Global $Button3 = GUICtrlCreateButton("答案3", 288, 256, 89, 33)
Global $Button4 = GUICtrlCreateButton("答案4", 416, 256, 97, 33)
Global $Group2 = GUICtrlCreateGroup("基本信息", 288, 304, 233, 185)
Global $Label6 = GUICtrlCreateLabel("总题目数:100", 304, 328, 82, 17)
Global $Label7 = GUICtrlCreateLabel("已答题目:0", 304, 360, 166, 17)
Global $Label8 = GUICtrlCreateLabel("正确数量:0", 304, 392, 166, 17)
Global $Label9 = GUICtrlCreateLabel("考生答案:", 304, 424, 166, 17)
Global $Label10 = GUICtrlCreateLabel("正确答案:", 304, 456, 166, 17)
Global $Button5 = GUICtrlCreateButton("下一题", 160, 456, 97, 33)
Global $Button6 = GUICtrlCreateButton("上一题", 32, 456, 97, 33)
Global $Button7 = GUICtrlCreateButton("提交答案", 32, 312, 225, 129)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
global $already=0,$yet=100,$now,$right,$a,$b,$c,$d,$e
global $your="A",$rightnum=0
change()
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button1
$your="A"
Case $Button2
$your="B"
Case $Button3
$your="C"
Case $Button4
$your="D"
CASE $Button5
change()
CASE $Button6

CASE $Button7
check()
EndSwitch
WEnd
func change();选题函数
guictrlsetdata($Group1,"序号:"&$already+1)
$now=random(1,3,1);题目序号,将3修改为999就代表题库中有999个答案
$k=iniread("题库.ini",$now,"k","");读取题目内容
;msgbox(0,$now,$k)
$a=iniread("题库.ini",$now,"a","");读取数据A
$b=iniread("题库.ini",$now,"b","");读取数据B
$c=iniread("题库.ini",$now,"c","");读取数据C
$d=iniread("题库.ini",$now,"d","");读取数据D
$e=iniread("题库.ini",$now,"e","");读取正确答案
guictrlsetdata($Label1,"题目:"&$now&@crlf&$k)
guictrlsetdata($Label2,"A:"&$a)
guictrlsetdata($Label3,"B:"&$b)
guictrlsetdata($Label4,"C:"&$c)
guictrlsetdata($Label5,"D:"&$d)
endfunc
func check();查看数据答案是否正确
guictrlsetdata($label9,"考生答案:"&$your)
guictrlsetdata($label10,"正确答案:"&StringUpper($e))
if $your=StringUpper($e) then
$rightnum=$rightnum+1
guictrlsetdata($label8,"正确数量:"&$rightnum)
endif
$already=$already+1
guictrlsetdata($label7,"已答数量:"&$already)
endfunc
==========================================================
数据库保存在au3同目录下"题库.ini"里面,里面现在一共3个题,你自己增加。
格式如下:
[1]
k=酒后能否驾驶?
a=能
b=应该能
c=不能
d=没规定
e=c
[2]
k=红灯是什么意思?
a=停
b=行
c=等
d=随便
e=a
[3]
k=开车前方遇见上帝怎么办?
a=绕过去
b=压过去
c=停下
d=下车磕头
e=a

Ⅳ AU3大神帮看下,如何点击窗口内的按钮1和2,定重谢!!!

可以在(窗口1)里面写代码,直接指向 (窗口2),Text1.Text = "12345",但是不建议这种模式,以后遇到的问题会更多。
建议在工程里添加模块,自定义全局变量,比如 Public MyStr as String
你可以在(窗口1)里赋值 MyStr = "12345" ,然后在(窗口2)里直接读取 Text1.Text = MyStr
自定义全局变量函数就是数个窗体之间的数据传递桥梁。

同理,你也可以在全局模块里自定义 '数据库的连接变量' '数据集的连接变量',两个窗口都可以随时操控这个全局变量的数据。

Ⅳ au3的简介

Au3脚本,也就是AutoIt3 Windows自动安装脚本语言。
AutoIt 是一种自动控制工具。这在PC首次展示时非常有用,那时成百上千的机器需要被自动的安装。尽管有一些程序如 MS Office, Mcafee, IE4 等具有自动安装的组件,可还有太多的程序不具备自动安装的功能。那就是用到 AutoIt 的地方。AutoIt 也可以被用来在你的机器上完成简单的任务。
AutoIt 运行时读取一个指定的脚本文件。这个脚本文件使得 AutoIt 完成一系列操作,包括
执行程序(Windows 应用程序,DOS命令,等等。)
发出按键和鼠标点击(所有字符,不受键盘布局约束)。
窗口操作(例如最小化,隐藏,恢复,等待,激活(同样适用 Win98/Win2000))。
简单剪贴板文本操作。
最值一提的是它很小(本身包含EXE件,没有DLL文件,没有注册表项)而且免费! (并且将保持免费).
2.1 版后新加入的Aut2Exe。 本程序可以从一个 AutoIt 脚本创建可执行程序!
2.21版后,你可以发送十进制 ASCII 代码,就像 ALT 键加数字小键盘(比如 ALT+65='A') 非常有用来发送特定的字符(比如 '~' 在一个意大利键盘上)。
Au3脚本就是 Autoit v3 版的简称。

Ⅵ 请教一个au3的问题有知道的大虾帮帮忙

用下面的代码试试呢?

#include<Array.au3>
_ArrayDisplay($Select_Db,"数据库所有库属性");显示数组
_ArrayToClip($Select_Db,1)
MsgBox(0,"返回数组内容",ClipGet())

Ⅶ Autoit怎样才能连接Mysql数据库并查询内容

Autoit怎样才能连接MySql数据库并查询内容
#include <array.au3>
#include "mysql.au3"
__MySQL_ExtractEmbeddedDLL()
_MySQL_InitLibrary()
$MysqlConn = _MySQL_Init()
;方法1 开始
;$connected = _MySQL_Real_Connect($MysqlConn,"localhost","root","asdf1234","gmsj")
;If $connected = 0 Then
; $errno = _<a href="https://www..com/s?wd=MySQL_errno&tn=44039180_cpr&fenlei=-bIi4WUvYETgN-" target="_blank" class="-highlight">MySQL_errno</a>($MysqlConn)
; MsgBox(0,"Error:",$errno & @LF & _MySQL_error($MysqlConn))
; If $errno = $CR_UNKNOWN_HOST Then MsgBox(0,"Error:","$CR_UNKNOWN_HOST" & @LF & $CR_UNKNOWN_HOST)
;Endif
;MsgBox(0, "sda", "ok")
;方法1 结束
$connected = _MySQL_Real_Connect($MysqlConn, "<a href="https://www..com/s?wd=127.0.0.1&tn=44039180_cpr&fenlei=-bIi4WUvYETgN-" target="_blank" class="-highlight">127.0.0.1</a>", "root", "sssss", "data")
; _MySQL_Real_Connect($MysqlConn,"服务器IP","账户","密码","数据库名称")
If $connected = 0 Then Exit MsgBox(16, 'Connection Error', _MySQL_Error($MysqlConn))
$query = "SELECT * FROM CHARACTER_SETS"
_MySQL_Real_Query($MysqlConn, $query)
$res = _MySQL_Store_Result($MysqlConn)
$fields = _<a href="https://www..com/s?wd=MySQL_Num_Fields&tn=44039180_cpr&fenlei=-bIi4WUvYETgN-" target="_blank" class="-highlight">MySQL_Num_Fields</a>($res)
$rows = _<a href="https://www..com/s?wd=MySQL_Num_Rows&tn=44039180_cpr&fenlei=-bIi4WUvYETgN-" target="_blank" class="-highlight">MySQL_Num_Rows</a>($res)
MsgBox(0, "data","row:"&$rows & "-" & $fields&"ok")

Ⅷ AU3数组编辑排序问题

_FileListToArray自身就会进行排序的吧 不行的话参考_ArraySort函数

Ⅸ 如何用au3编写软件自动安装

如果只是用于软件自动安装,那么下面这些足够了。
1)学会使用au3自带的窗口信息工具来捕获软件安装程序的窗口信息和控件信息。
2)学习并掌握以下几个函数的用法:
WinExists, WinActive, WinActivate, WinWaitActive —— 窗口操作
Sleep —— 延时操作
Send, ControlClick, ControlCommand, MouseClick —— 按钮/单选框/复选框 控件操作
ConsoleWrite, MsgBox —— 调试方法
如果想要能用于Win7/Vista带用户权限控制的OS,记得在脚本开头加 #RequireAdmin
3)学习并掌握条件判断语句(if)的结构,循环语句(while)的结构。

Ⅹ Autoit怎样才能连接MySql数据库并查询内容

您好,很高兴为您解答。


#include<array.au3>
#include"mysql.au3"
__MySQL_ExtractEmbeddedDLL()
_MySQL_InitLibrary()
$MysqlConn=_MySQL_Init()
;方法1开始
;$connected=_MySQL_Real_Connect($MysqlConn,"localhost","root","asdf1234","gmsj")
;If$connected=0Then
;$errno=_MySQL_errno($MysqlConn)
;MsgBox(0,"Error:",$errno&@LF&_MySQL_error($MysqlConn))
;If$errno=$CR_UNKNOWN_HOSTThenMsgBox(0,"Error:","$CR_UNKNOWN_HOST"&@LF&$CR_UNKNOWN_HOST)
;Endif
;MsgBox(0,"sda","ok")
;方法1结束
$connected=_MySQL_Real_Connect($MysqlConn,"127.0.0.1","root","sssss","data")
;_MySQL_Real_Connect($MysqlConn,"服务器IP","账户","密码","数据库名称")
If$connected=0ThenExitMsgBox(16,'ConnectionError',_MySQL_Error($MysqlConn))
$query="SELECT*FROMCHARACTER_SETS"
_MySQL_Real_Query($MysqlConn,$query)
$res=_MySQL_Store_Result($MysqlConn)
$fields=_MySQL_Num_Fields($res)
$rows=_MySQL_Num_Rows($res)
MsgBox(0,"data","row:"&$rows&"-"&$fields&"ok")


如若满意,请点击右侧【采纳答案】,如若还有问题,请点击【追问】


希望我的回答对您有所帮助,望采纳!


~O(∩_∩)O~