Új hozzászólás Aktív témák

• #15 beeboy addikt

  Új Válasz 2004-09-23 14:01:50 #15

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  beeboy

  addikt

  xxx.vbs-be írni:
  
  Dim Input1
  Input1 = InputBox(''Üzenet ?'',''Üzenetküldés!'',''Végzetes hiba! Nem lekezelt kivétel a @00FF023 memóriacímen! Ön illegálisan használja ezt a programot! A BSA úton van, maradjon a helyén!'')
  
  
  Input=''cmd /K CD C:\ & NET SEND IDE_A_GÉP_NEVE '' & Input1
  rem Dim MyVar
  rem MyVar = msgbox(Input,65,''párbeszéd'')
  
  
  Dim oShell
  Set oShell = WScript.CreateObject (''WSCript.shell'')
  oShell.run Input,0
  Set oShell = Nothing
  
  
  a dupla felülvessző macskaköröm
  még csak kísérletezem a vbs-el, úgyhogy ne tessék lecseszni

Új hozzászólás Aktív témák