კომპიუტერი მუშაობს? - ყველაფერი კომპის შესახებ - ყველაფერი კომპის შესახებ - კომპიუტერის გაკვეთილები - შემო მნახე
www.sus.clan.suკვირა, 04.12.2016, 11:12

მოგესალმები სტუმარო | RSS


მთავარი | ფორუმი | კომპიუტერის გაკვეთილები | რეგისტრაცია | შესვლა

საიტის მენიუ











საიტის მენიუ

შეამოწმეთ თქვენი ცოდნა

საიტის მენიუ
თელასი დავალიანება
სითი პარკის ჯარიმები

საიტის მენიუ
 
100

საიტის მენიუ

სულ ონლაინში: 1
სტუმრები: 1
მომხმარებელი: 0

საიტის მენიუ





მთავარი » სტატიები » ყველაფერი კომპის შესახებ » ყველაფერი კომპის შესახებ

კომპიუტერი მუშაობს?
strComputer = "."

set objWMI = GetObject("winmgmts:\\" & strComputer &"\root\cimv2")
set colOS = objWMI.InstancesOF("Win32_OperatingSystem")

for each objOS in colOS
  bd = objOS.LastBootUpTime
  bd1 = Mid(bd,1,4) & "-" & Mid(bd,5,2) & "-" & Mid(bd,7,2) & " " & Mid(bd,9,2) & ":" & Mid(bd,11,2) & ":" & Mid(bd,13,2)

  s = abs(datediff("s",bd1,now))

  m = s\60
  h = m\60
  m = m mod 60
  s = s mod 60

  Wscript.Echo "kompiuteri mushaobs :" & right("00" & h, 2) &":" & right ("00" & m,2) & ":" & right("00" & s,2) & vbcrlf
 next


გახსენით ნებისმიერი ტექსტური რედაქტორი (მაგალითად უბრალო ბლოკნოტი) და ზემოთ მოცემული კოდი დააკოპირეთ ბლოკნოტში.
შემდეგ შეინახეთნებისმიერი სახელით და  გაფართოებით      .vbs 
შემდეგ დაუკლიკეთ და გახსნილ ფანჯარაში აისახება თუ რამდენი ხანია კომპი ჩართულია.
კატეგორია: ყველაფერი კომპის შესახებ | დაამატა: ადმინი1 (14.10.2012) | ავტორი: ადმინი E
ნანახია: 270 | რეიტინგი: 0.0/0
სულ კომენტარები: 0
კომენტარის დამატება შეუძლიათ მხოლოდ დარეგისტრირებულ მომხმარებლებს
[ რეგისტრაცია | შესვლა ]


ეს არის თქვენი IP - ი
გაიგეთ თქვენი IP მისამართი
  გაიგეთ თქვენი ინტერნეტ სიჩქარე



ძიება საიტზე
  გაიგეთ თქვენი ინტერნეტ სიჩქარე

სახელწოდების გასაგებად მაუსი მიიტანეთ გადმოწერის ლინკთან

 ეს უნდა ნახოთ   
 
 
  გაიგეთ თქვენი ინტერნეტ სიჩქარე


Block title
Block content
  გაიგეთ თქვენი ინტერნეტ სიჩქარე


ჩემი პროფილი
11:12
: სტუმარო
თქვენ დარეგისტრირდით საიტზე დღის უკან.                                                  
საიტის ადმინისტარციასთან კონტაქტი











             © 2009-2016 www.sus.clan.su  html     
  TOP-RATING.UCOZ.COM