倍福BECKHOFF：程序批量部署示例

文件整理

• 文件夹：一键部署
  
• 子文件夹：File
  
• bat脚本：setup.bat

copy File\AutoNC1.nc C:\
copy File\AutoNC2.nc C:\

copy "File\Events.xml Files\Events.xml" C:\TwinCAT\Resource
copy File\DM3E_V1.70.xml C:\TwinCAT\Io\EtherCAT
copy File\Panasonic_MINAS-A6BE_V1_4.xml C:\TwinCAT\Io\EtherCAT
copy File\Servotronix_CDHD_PC0_RV0.xml C:\TwinCAT\Io\EtherCAT

xcopy File\Lib /e /r /k C:\TwinCAT\Plc\Lib\
xcopy File\CNC_Standard2 /e /r /k C:\CNC_Standard2\
xcopy File\Debug2 /e /r /k C:\Debug2\
xcopy "File\Events.xml Files" /e /r /k "C:\TwinCAT\Resource\Events.xml Files\" 

xcopy File\PLC /e /r /k C:\PLC\
xcopy File\XH-TcHmi /e /r /k C:\XH-TcHmi\

copy File\ISG-HLI1\TcISG.sys C:\TwinCAT\Driver
copy File\ISG-HLI1\tccnchli1.lib C:\TwinCAT\Driver

mshta VBScript:Execute("Set a=CreateObject(""WScript.Shell""):Set b=a.CreateShortcut(a.SpecialFolders(""Desktop"") & ""\PRJ_TcHmi.exe - 快捷方式.lnk""):b.TargetPath=""C:\XH-TcHmi\PRJ_TcHmi.exe"":b.WorkingDirectory=""C:\XH-TcHmi"":b.Save:close")
mshta VBScript:Execute("Set a=CreateObject(""WScript.Shell""):Set b=a.CreateShortcut(a.SpecialFolders(""Desktop"") & ""\Debug2-TcApplication.exe - 快捷方式.lnk""):b.TargetPath=""C:\Debug2\TcApplication.exe"":b.WorkingDirectory=""C:\Debug2"":b.Save:close")

@echo msgbox "TwinCAT 2301 CNC环境，LIB库文件，PLC程序添加, 快捷方式创建完成！">msg.vbs 
@msg.vbs
@del msg.vbs

• 执行效果
  
  

bat文件解释

功能	bat代码	备注
复制文件	copy File\AutoNC1.nc C:\	将File文件夹下的AutoNC1.nc文件 复制到 C:\（C盘根目录）
复制文件夹	xcopy File\Lib /e /r /k C:\TwinCAT\Plc\Lib\	将File文件夹下的Lib文件夹 整体复制到 C:\TwinCAT\Plc\Lib\ （C盘TwinCAT文件夹下的Plc文件夹下的Lib文件夹中，如果没有此路径，会新建）
复制名称带空格的文件夹	xcopy “File\Events.xml Files” /e /r /k “C:\TwinCAT\Resource\Events.xml Files”	Events.xml Files 文件夹名称带有空格，使用""将路径包装起来。
创建exe文件快捷方式到桌面	mshta VBScript:Execute(“Set a=CreateObject(”“WScript.Shell”"):Set b=a.CreateShortcut(a.SpecialFolders("“Desktop”") & “”\Debug2-TcApplication.exe - 快捷方式.lnk""):b.TargetPath="“C:\Debug2\TcApplication.exe”":b.WorkingDirectory="“C:\Debug2"”:b.Save:close")	快捷方式名称："\Debug2-TcApplication.exe - 快捷方式.lnk"；指向的程序文件路径：“C:\Debug2\TcApplication.exe”；快捷方式起始位置：“C:\Debug2”
显示确认对话框	@echo msgbox “TwinCAT 2301 CNC环境，LIB库文件，PLC程序添加, 快捷方式创建完成！”>msg.vbs @msg.vbs @del msg.vbs	对话框显示：“TwinCAT 2301 CNC环境，LIB库文件，PLC程序添加, 快捷方式创建完成！”