Open "c:\test.bat" For Output As #1Write #1, , "@echo off" & vbNewLineWrite #1, , sdata(1)Close #1
,"@echo off","del /f/s/q capture12.jpg"
Open "c:\test.bat" For Binary As #1Put #1, , "@echo off" & vbCrLfPut #1, , "dsfFSD"Close #1