处理了AddTextListEx写入会强制修改文本编码的问题 扩展文本读取、写入等功能 后加个参数 1为绝对路径 0或者留空为默认的相对路径 GetRandomText AddTextListEx CHECKTEXTLIST GETRANDOMLINETEXT CHECKTEXTLIST ..\QuestDiary\系统\1卡号.txt <$STR(S2)>默认的相对路径
; I$ E: s4 _5 g' _. X5 w
* ^: n* r( m& m% c# o
& V, |2 b( q4 l+ I+ E# x* i! t0 q( I3 G6 L+ l6 \
2 t( \9 ]9 g3 _2 m: I7 ~
% O' o+ S# z2 W1 J5 c( }5 k# T2 }& ~
7 e0 N4 Y+ E5 ~4 ~, |, A' D
功能: 把字符串写入到指定的文本文件中,可以指定写入行.: Y8 ^0 t6 _' t' { _' Y% t- O; s
格式: AddTextListEx 路径 字符串 行(0-65535) 是否绝对路径3 D0 p8 b* o0 D" B3 y; V
, N) ?2 ~, P1 V; U" R8 }6 u. ^6 n0 g# _" |
#IF8 u6 Y4 Z2 f+ n) {0 }7 z9 i
#ACT
2 s% G Z& p" u) G2 d: p* j# fAddTextListEx ..\TestList.txt <$USERNAME> 0
4 A6 X0 [4 `) V
$ }% a6 N$ I: A5 X1 l9 _4 x1 C1 C4 R/ D' u# S
功能: 文本读取、写入支持绝对路径 扩展文本读取、写入等功能 (后加个参数 1为绝对路径,0或者留空为默认的相对路径; m) c: C1 c+ ]& b2 V
' F- e; a! G, a
" f% g6 c! d$ u! wGetRandomText
4 x$ L8 U9 f& T# PAddTextListEx
5 p4 V: l' _4 T L; y, p6 WCHECKTEXTLIST# y: R0 T% R' U* m8 a
GETRANDOMLINETEXT
0 X$ i! x7 T! T* SCHECKTEXTLIST ..\QuestDiary\充值系统\10元卡号.txt <$STR(S2)>" v6 K2 q: ]8 R7 W0 j
默认的相对路径+ [% r- a5 i7 J5 w s, z. a k/ ~
--------& b" h& x" ?! k2 v, C: b- b9 i; |; K
1 b& K. @. x0 b9 A
! V6 n) q* Y+ [$ |. c下面为绝对路径 后面加个参数1
2 @5 ?* S$ U5 C% e& H) m/ D! O' Y+ i
+ ~/ N4 u$ ~$ x, W! Y: a1 NE:\数据文件\系统\1卡号.txt 1
d6 O. V& r) W" S' ?7 W5 ?7 @) I
# H, S( t4 v4 `& Y6 y6 X
;------------------------------------------
& I9 L4 c1 R7 w3 u( b. q1 A6 B4 t3 j
" |1 j* y. b; M1 _; H+ z: D
绝对路径支持清空文本内容:
& D3 M1 ?( l3 X. oClearNameList 文件名 是否绝对路径(0或空:相对路径;1:绝对路径)+ u2 h: H# T; V
AddNameDateList 文件名 是否绝对路径(0或空:相对路径;1:绝对路径)
" S0 d$ i0 |, }: f- T7 h7 ?DelNameDateList 文件名 是否绝对路径(0或空:相对路径;1:绝对路径)
2 M* ~, [. e. T; m# r! g
. r- e7 \0 W0 w ~8 [
, A- [ W, _' c0 r9 J--------------------------------------------2019-01-31更新扩展参数5----------------------------------------------------------------------------------------# b, a! v1 i7 `5 G
CheckTextList 文件名 检测字符串1 检测字符串2(可为空) 是否绝对路径(为空表示相对路径) 是否区分大小写(0或空:不区分; 1:区分)" v5 T$ H, b0 z' Z$ N% m
注:当字符串2可用'' 或 ""表示空
& i+ P; z* V0 H# ]( p8 X6 N* W) f0 M& W2 E! b
|