منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : cmd
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
السلام عليكم

كيف نكتب اوامر cmd

ب 29 سطر في الفيجوال
او كيف نرسلها الى cmd
PHP كود :
Dim StrChr As String
    Dim StCode 
As String
    Dim InFil 
As Integer

    StrChr 
Chr(34)
    
StCode StCode "@ECHO OFF" vbNewLine
    StCode 
StCode "md " StrChr "C:\Program Files\Test" StrChr vbNewLine
    InFil 
FreeFile
    
    Open 
"Temp.bat" For Output As InFil
    
Print #InFil, StCode
    
Close InFil
    
    Shell 
"Temp.bat"vbHide