Legfrissebb anyagok
Mobilarena témák
PROHARDVER! témák
IT café témák
Új hozzászólás Aktív témák
-
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 lecseszniNem vagyok intelligens. Én AMDligens vagyok...
Új hozzászólás Aktív témák
Aktív témák
Új fizetett hirdetések
- Konica Minolta Bizhub C227 fénymásoló
- Yamaha NS-555 hangfalpár + opcionális HiFi - házimozi cuccok
- Lenovo ThinkCentre M93p SFF PC, Quad Core i5-4570 CPU, 8 GB DDR3 RAM
- Lenovo ThinkCentre M83 SFF PC, Quad Core i5-4590 CPU, 8 GB DDR3 RAM
- Lenovo ThinkCentre E73 SFF PC, Quad Core i5-4460 CPU, 8 GB DDR3 RAM
Új ingyenes hirdetések
- HIBÁS! eladó alaplap + proci + hűtő
- Lenovo IdeaPad Gaming 3 - 16GB RAM - Ryzen 7 5800H - RTX 3050 - 10hó gyártói garancia
- Lenovo SFF Intel 14Gen i5 - 16GB DDR5 - 512GB nvme
- BRAUN 300S Férfi borotva, piros gyári dobozában
- Apple Watch Ultra 2, Black Titanium, kettő darab eredeti apple Ocean Band szíjjal! 28 hónap garancia