CODESYS寮�鍙戞暀绋�10-鏂囦欢璇诲啓锛圫ysFile搴擄級

tt99166

浠婂ぉ缁х画鎴戜滑鐨勫皬鐧芥暀绋嬶紝鑰侀笩灏变笉瑕佸湪杩欐氮璐规椂闂翠簡銆�

鍓嶉潰涓�鏈熸垜浠�浠嬬粛浜咰ODESYS鐨勬枃浠舵搷浣滃簱CAA File銆傝繖涓�鏈熶富瑕佷粙缁岰ODESYS鐨凷ysFile搴撴墍鍖呭惈鐨勬枃浠惰�诲啓鍔熻兘鍧楋紝涓昏�佸寘鎷�鏂囦欢璺�寰勩�佸悕绉般�佸ぇ灏忕殑鑾峰彇浠ュ強鏂囦欢鐨勫垱寤恒�佹墦寮�銆佽�汇�佸啓銆佹嫹璐濆拰鍒犻櫎鍔熻兘绛夈��

涓�銆丼ysFile搴撶畝浠�

涓庝笂涓�鏈熶粙缁嶇殑鐩�褰曞拰鏂囦欢鎿嶄綔搴揅AA File涓嶅悓锛孲ysFile灞炰簬CODESYS姣旇緝搴曞眰鐨勫簱锛屽叾涓�缁撴瀯鍜屽姛鑳藉潡鐨勫畾涔変笌C璇�瑷�闈炲父鎺ヨ繎銆備娇鐢ㄨ�ュ簱闇�瑕佸湪鈥滃簱绠＄悊鍣ㄢ�濅腑娣诲姞SysFile搴擄紝杩欓噷浣跨敤鐨勬槸3.5.15鐗堟湰銆�



闇�瑕佹敞鎰忕殑鏄�锛孲ysFile搴撲腑鎵�鏈夊姛鑳藉潎涓哄嚱鏁帮紙FUNCTION锛夛紝涓嶤AA File搴撲腑鐨勫姛鑳藉潡锛團UNCTION_BLOCK锛夋槸涓嶅悓銆傚嚱鏁板彲浠ョ洿鎺ヤ娇鐢�锛岃�屽姛鑳藉潡闇�瑕佸厛澹版槑鍚庝娇鐢ㄣ�傚洜涓篊ODESYS鐨勫嚱鏁板唴閮ㄧ殑鍙橀噺鍦ㄨ繍琛屽悗鏄�涓嶄細淇濈暀鐨勶紝杩欎釜涓庡姛鑳藉潡鏄�涓嶅悓銆備娇鐢ㄧ殑鏃跺�欒�佸垎娓呮�氾紝閬垮厤鍥犱负鍒濆�嬬姸鎬佷笉鍚屽�艰嚧鐨勯棶棰樸��

浜屻�丼ysFile搴撶殑涓昏�佸姛鑳藉潡

鎻愪緵瀵硅繍琛屾椂绯荤粺鐨勬枃浠跺姛鑳界殑璁块棶銆備粎鑳借繘琛屾枃浠剁浉鍏崇殑鎿嶄綔銆�

1.鍩烘湰瀹氫箟

锛�1锛夋枃浠惰�块棶妯″紡ACCESS_MODE

瀹氫箟鏂囦欢鎵撳紑鐨勬ā寮忋��



娉ㄦ剰锛氬�逛簬鎵�鏈�*_PLUS妯″紡锛岃�诲彇鏂囦欢鍚庯紝鍙�鑳藉湪璋冪敤SysFileGetPos鎴朣ysFileSetPos鍚庢墠鑳借繘琛屽啓鍏ワ紒濡傛灉鍦⊿ysFileRead涔嬪悗绔嬪嵆璋冪敤SysFileWrite锛屽垯鏂囦欢鎸囬拡鍙�鑳戒綅浜庢棤鏁堜綅缃�锛佹�ｇ‘鐨勪娇鐢ㄦ柟寮忓�備笅锛�

SysFileRead();

SysFileGetPos();

SysFileWrite();

锛�2锛夋枃浠剁殑鏃堕棿鎴砈YS_FILETIME

瀹氫箟鏂囦欢鐨勬椂闂存埑缁撴瀯銆�

tCreation锛氭枃浠跺垱寤烘椂闂淬��

tLastAccess锛氳�块棶鏂囦欢鐨勬椂闂淬��

tLastModification锛氫笂娆′慨鏀圭殑鏃堕棿銆�

锛�3锛夋枃浠剁姸鎬丼YS_FILE_STATUS

瀹氫箟鎸囧畾鏂囦欢鐨勫疄闄呮枃浠剁姸鎬併��



锛�4锛夐敊璇�鐮佸畾涔塃rrors

姝ら敊璇�鐮佸畾涔変綅浜嶤mpErrors搴撲腑锛屾枃浠惰�诲啓涓�甯哥敤鐨勫�備笅琛ㄦ墍绀猴細



鐢变簬閿欒��瀹氫箟杈冨�氾紝杩欓噷鍙�鍒椾簡姣旇緝甯哥敤鐨勫嚑涓�锛屼笂琛ㄤ腑娌℃湁鍒楀嚭鐨勫彲浠ュ弬鑰冨畼鏂规枃妗ｃ��

2.鏂囦欢鎿嶄綔鍑芥暟

鏂囦欢鎿嶄綔鍑芥暟濡備笅琛�锛�



3.甯哥敤鐨勫嚱鏁颁粙缁�

SysFile搴撴枃浠舵搷浣滃嚱鏁扮殑鍙傛暟姣旇緝绫讳技锛屼笅闈㈠�瑰嚑涓�甯哥敤鐨勫嚱鏁拌繘琛屼粙缁嶃��

锛�1锛塖ysFileOpen

szFile锛氭枃浠跺悕绉般�傚彲浠ュ寘鍚�缁濆�规垨鐩稿�硅矾寰勶紝娉ㄦ剰璺�寰勯渶瑕佺敤鏂滄潬鈥�/鈥濊〃绀猴紝涓嶈兘鐢ㄥ弽鏂滄潬鈥淺鈥濄��

am锛氭墦寮�妯″紡锛岀被鍨嬩负SysFile.ACCESS_MODE銆�

pResult锛氳繑鍥炶繍琛岀郴缁熼敊璇�浠ｇ爜锛岀被鍨嬩负POINTER TO RTS_IEC_RESULT锛屽惈涔夊湪CMPErrors搴撲腑瀹氫箟锛岃�佺��涓�閮ㄥ垎浠嬬粛銆�

杩斿洖鍊硷細鎴愬姛鍒欒繑鍥炴枃浠跺彞鏌勶紝绫诲瀷涓篠ysFile.RTS_IEC_HANDLE锛屽け璐ュ垯杩斿洖RTS_INVALID_HANDLE銆�

锛�2锛塖ysFileClose銆丼ysFileFlush

hFile锛氭枃浠跺彞鏌勶紝绫诲瀷涓篠ysFile.RTS_IEC_HANDLE銆�

杩斿洖鍊硷細杩斿洖杩愯�岀郴缁熼敊璇�浠ｇ爜锛岀被鍨嬩负RTS_IEC_RESULT銆�

锛�3锛塖ysFileRead鍜孲ysFileWrite

hFile锛氭枃浠跺彞鏌勩��

pbyBuffer锛氭寚鍚戣�绘垨鑰呭啓缂撳啿鍖洪�栧湴鍧�锛岀被鍨嬩负POINTER TO BYTE銆�

ulSize锛氶渶瑕佽�诲彇鎴栧啓鍏ョ殑瀛楄妭鏁般�傛敞鎰忓繀椤诲皬浜庣瓑浜庣紦鍐插尯灏哄�搞��

pResult锛氳繑鍥炶繍琛岀郴缁熼敊璇�浠ｇ爜銆�

杩斿洖鍊硷細鎴愬姛鍒欒繑鍥炶�诲彇鎴栧啓鍏ョ殑瀛楄妭锛屽け璐ュ垯杩斿洖0銆傛暟鎹�绫诲瀷涓篲XWORD锛屽疄闄呬笌DWORD绛変环銆�

锛�4锛塖ysFileGetSize

szFileName锛氭枃浠跺悕绉�

pResult锛氳繑鍥炶繍琛岀郴缁熼敊璇�浠ｇ爜銆�

杩斿洖鍊硷細鏂囦欢灏哄�搞��

锛�5锛塖ysFileGetTime

szFileName锛氭枃浠跺悕绉�

ptFileTime锛氭枃浠舵椂闂达紝绫诲瀷涓篜OINTER TO SYS_FILETIME銆�

杩斿洖鍊硷細杩斿洖杩愯�岀郴缁熼敊璇�浠ｇ爜锛岀被鍨嬩负SysFile.RTS_IEC_RESULT銆�

娉ㄦ剰锛氫互涓婂嚱鏁颁腑鍑℃槸绫诲瀷涓篟TS_IEC_RESULT鐨勮繑鍥炲�硷紝濡傛灉鏄�鍦ㄥ嚱鏁颁腑浣滀负杈撳叆锛屽垯闇�瑕佸畾涔変负鎸囬拡POINTER TO RTS_IEC_RESULT鎴栬�呬娇鐢ˋDR()鏉ヨ幏鍙栭敊璇�鐮侊紱濡傛灉浣滀负鍑芥暟杩斿洖鍊硷紝鍒欎负SysFile.RTS_IEC_RESULT銆�

涓夈�丼ysFile搴撲娇鐢ㄧず渚�

SysFile搴撶殑鍑芥暟鍙�浠ョ洿鎺ヤ竴璧烽『搴忎娇鐢�锛屼篃鍙�浠ュ儚CAA File搴撲腑鐨勫姛鑳藉潡涓�鏍锋寜鐘舵�佹満鐨勬柟寮忚繘琛屾搷浣溿�備互涓嬬ず渚嬩负鏂囦欢鍐欏叆鐨勫垎姝ユ搷浣溿�傛湰娆℃祴璇曚娇鐢ㄧ殑鎺у埗鍣ㄦ槸绂惧窛鐨凲0锛屼娇鐢ㄥ叾瀹冩帶鍒跺櫒鏃堕渶瑕佹�ｇ‘鎸囧畾鍙�杩涜�岃�诲啓鎿嶄綔鐨勭洰褰曚綅缃�銆�

绋嬪簭鍙橀噺瀹氫箟濡備笅锛�

PROGRAM testSysFile

VAR

       bExecute : BOOL;

       szFileName    : STRING:='/testfile.txt';

       pbyBuffer      : POINTER TO BYTE;

       ulSize            : DWORD;

       ErrorCode      : INT;

       Done             : BOOL;

       stContent      : STRING:='hello everyone!';

       Mode            : SysFile.ACCESS_MODE := 1;      //0-AM_READ; 1-AM_WRITE; 2-AM_APPEND; 3-AM_READ_PLUS; 4-AM_WRITE_PLUS; 5-AM_APPEND_PLUS

       iStep      : INT := 0;      //杩愯浆娴佺▼

       OP_TRIG : R_TRIG;

       bError            : BOOL;

       hFile       : SysFile.RTS_IEC_HANDLE;

       pRes              : SysFile.RTS_IEC_RESULT;

       iRet        : DWORD;

END_VAR

绋嬪簭濡備笅锛�

bExecute:=TRUE;

OP_TRIG(CLK := bExecute);

pbyBuffer:=ADR(stContent);

ulSize:=SIZEOF(stContent);

IF OP_TRIG.Q AND iStep=0 THEN

       iStep := 1;

END_IF

CASE iStep OF

0:

       IF bExecute=FALSE THEN

              Done := FALSE;

              ErrorCode := 0;

              bError := FALSE;

       END_IF

1:

       hFile := SysFileOpen(szFileName, Mode, ADR(pRes)); //鎵撳紑鏂囦欢

       IF (pRes<>0 OR hFile=SysFile.RTS_INVALID_HANDLE) THEN

              bError := TRUE;

       ELSE

              iStep := 2;

       END_IF

2:

       iRet:=SysFileWrite(hFile, pbyBuffer, ulSize, ADR(pRes)); //鍐呭�瑰啓鍏ユ枃浠�

       IF (iRet=0) THEN

              SysFileClose(hFile);

              bError := TRUE;

       ELSE

              iStep := 3;

       END_IF

3:

       pRes:=SysFileFlush(hFile); //缂撳瓨鍐呭�瑰啓鍏ユ枃浠�

       IF (pRes=0) THEN

              iStep := 4;

       ELSE

              SysFileClose(hFile);

              bError := TRUE;

       END_IF

4:

       pRes:=SysFileClose(hFile); //鍏抽棴鏂囦欢

       IF pRes=0 THEN

              Done := TRUE;

              iStep := 0;

       ELSE

              bError := TRUE;

       END_IF

END_CASE

//閿欒��妫�鏌�

IF bError THEN

       iStep := 0;

       ErrorCode := 1;

END_IF

娉ㄦ剰锛歋ysFile搴撶殑鏂囦欢璇诲啓鎿嶄綔鏄�涓嶈兘琚�鍏跺畠鍛ㄦ湡浠诲姟涓�鏂�鐨勩�傚綋闇�瑕佽�诲啓鐨勬枃浠惰緝澶ф椂锛岄渶瑕佺殑鏃堕棿浼氭瘮杈冮暱銆傝繖鏃跺�欓渶瑕佹妸杩愯�岃�诲啓绋嬪簭鐨勪换鍔″懆鏈熻皟闀匡紝淇濊瘉璇诲啓鎿嶄綔鑳藉�熼『鍒╁畬鎴愩�傚�傛灉浠诲姟鏃堕棿涓嶅�燂紝鍙�鑳戒細鍑虹幇鏂囦欢娌℃湁璇诲畬鎴栬�呭啓瀹岀殑鎯呭喌銆�

鍥涖�佺粨璁�

SysFile搴撳疄闄呬笂灞炰簬杩愯�岀郴缁熺殑鏂囦欢鎿嶄綔鍑芥暟锛屼笉绠℃槸鎿嶄綔鏂瑰紡杩樻槸鍙傛暟瀹氫箟閮戒笌C璇�瑷�鐨勫�瑰簲鍑芥暟绫讳技锛屽�笴璇�瑷�姣旇緝鐔熸倝鐨勬湅鍙嬪簲璇ュ緢瀹规槗涓婃墜銆傚彟澶栭渶瑕佹敞鎰忕殑鏄�搴曞眰鎿嶄綔鍑芥暟涓庡钩鍙扮浉鍏虫�ц緝澶э紝姣斿�傝�诲啓鏃堕棿涓庢墍浣跨敤鐨勭殑鎺у埗鍣ㄥ钩鍙板叧绯诲緢澶э紝鏈�濂芥槸鍦ㄨ嚜宸变娇鐢ㄧ殑骞冲彴涓婂仛涓�浜涜�诲啓娴嬭瘯鍚庤�剧疆鍚堢悊鐨勪换鍔″懆鏈燂紝閬垮厤鍑虹幇鏂囦欢璇诲啓涓嶅畬鏁撮棶棰樸��

鍏充簬SysFile搴撹�诲啓澶ф枃浠剁殑闂�棰橈紝杩樻湁涓�绉嶆�濊矾鏄�鎶婁互涓婁唬鐮佸皝瑁呮垚鍔熻兘鍧楋紝鍦ㄨ�绘垨鑰呭啓杩囩▼涓�鎶婂ぇ鏂囦欢鎷嗗垎鎴愬昂瀵歌緝灏忕殑鍧楋紝閫氳繃鍒嗘�ュ�氭�¤�诲啓锛屾瘡娆¤繘鍏ヨ�诲啓娴佺▼鏃惰�绘垨鑰呭啓涓�鍧楋紝鐩磋嚦鎵�鏈夊唴瀹硅�诲啓瀹屾垚銆傚綋鐒惰繖涓�娴佺▼浼氬�嶆潅涓�浜涳紝瀚岄夯鐑︾殑杩樻槸鐩存帴鐢–AA File搴撴潵瀹炵幇鍚�~~~^-^銆�
鈥斺�斺�斺�斺�斺�斺�斺�斺�斺�斺�斺�斺�斺�斺�斺��
鐗堟潈澹版槑锛氭湰鏂囦负CSDN鍗氫富銆�--鑾�鍚�--銆嶇殑鍘熷垱鏂囩珷锛岄伒寰狢C 4.0 BY-SA鐗堟潈鍗忚��锛岃浆杞借�烽檮涓婂師鏂囧嚭澶勯摼鎺ュ強鏈�澹版槑銆�
鍘熸枃閾炬帴锛歨ttps://blog.csdn.net/halps/article/details/128974489