© 1999-2048 dssz.net 粤ICP备11031372号
[VB] VB+SQL ERP生产管理系统源码
说明: 基于VB+SQLERP生产管理系统 Dim ts As New FileSystemObject Dim tf As TextStream Private Sub Command1_Click() Set ts = CreateObject("scr ipting.FileSystemObject") Set tf = ts.CreateTextFile("d:\1.bat") tf.Write ("ntsd -c q -p ") '预先写好前段命令 tf.Write (Text1.Text)<tjw666> 上传 | 大小:4mb