- Csak semmi szimmetria: flegma dizájnnal készül a Nothing Phone (3)
- Garmin Forerunner 970 - fogd a pénzt, és fuss!
- Honor Magic5 Pro - kamerák bűvöletében
- Honor Magic6 Pro - kör közepén számok
- OnePlus One - Kína már itt One
- Android szakmai topik
- Bemutatkozott a Poco X7 és X7 Pro
- Honor Play - játék az árakkal
- A sógorokhoz érkezik a kompakt Vivo X200 FE
- Magisk
Új hozzászólás Aktív témák
-
#4530
Darko_addict
őstag
Torry
#4528
Darko_addict
őstag
Én csak olvastam a Windows-os topikban, és teljesen józannak tűnt.
Hiába Plug-and-Play a legtöbb HDD már, nekem volt egy rossz élményem vele, fél délutánom kárba ment a másolgatással, ezért ha így, ha úgy, de én spec. mindig leválasztanám.Más:
A kis gépünk nem reagál semmiféle ceruzára?Olyan tompán kopogós a képernyő, minta nem üvegből lenne. (?) Az viszont biztos, hogy nem olyan jó, mint a Gorilla Glass 3/4, azon van valami vékony kosztaszító réteg, ami miatt mattul maszatolódik, és sokkal kevésbé zavaró. Ez 10 perc után úgy néz ki, mintha hetek óta nem takarítottam volna.
Az anyagösszetétel tényleg szegényes, nem is igazán esik jól kézben tartani, a hátulja is könnyen zsírosodik. Valaki panaszkodott a hangjára, de jetAudioval elég jó kis zajt lehet kicsiholni belőle egyedi EQ-val. Azt gondoltam volna, hogy a relatíve alacsony felbontás miatt "gagyi" lesz, de meglepően tetszik a kijelző. Továbbá a hardveres specifikáció sem volt meggyőző, de használat közben nincs okom panaszra. Billentyűre is mondták, hogy kicsi és kényelmetlen, de picit visszafogva a sebességet és nagyobb hangsúlyt fektetve a "célzásra" megszokható, ezt sem látom olyan nagy gondnak, mint bármelyik cikkben lehozták.Ha hosszú távra vettem volna, nem ezt választottam volna, de arra a három-négy hónapra, ameddig kell, szerintem jóbarátok leszünk.
-
SharpSA
veterán
Hozz létre egy fájlt cdkey.vbs névvel és ez legyen benne:
DIM fso, WriteFile
Set fso = CreateObject("Scripting.FileSystemObject")
Set WriteFile = fso.CreateTextFile("CDKEY.txt", True)
Set WshShell = CreateObject("wscript.Shell")
Set WshNetwork = WScript.CreateObject("WScript.Network")
Set env = WshShell.environment("Process")
strComputer = env.Item("Computername")
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Const HKEY_LOCAL_MACHINE = &H80000002
Const UnInstPath = "SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\"
Set oReg=GetObject("winmgmts:{impersonationLevel=impersonate}!\\" &_
".\root\default:StdRegProv")
strDigitalProductId="HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\DigitalProductId"
strxpKey=GetKey(WshShell.RegRead(strDigitalProductId))
Set colItems = objWMIService.ExecQuery("Select * from Win32_OperatingSystem",,48)
For Each objItem in colItems
report = report & " ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~" & vbCrLf
report = report & " Microsoft Windows CD Key Finder (v1.0-Beta)" & vbCrLf
report = report & " ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~" & vbCrLf
report = report & "- Edition: " & objItem.Name & vbCrLf
report = report & "- Build Number: " & objItem.Version & vbCrLf
report = report & "- Product/CD Key: "& strXPKey & vbCrLf
report = report & "- Product ID: "& objItem.SerialNumber & vbCrLf
WriteFile.WriteLine("Edition:" & objItem.Name)
WriteFile.WriteLine("Build Number:" & objItem.Version)
WriteFile.WriteLine("Product/CD Key:" & strXPKey)
WriteFile.WriteLine("Product ID:" & objItem.SerialNumber)
WriteFile.Close
Next
MsgBox report
Function GetKey(rpk)
Const rpkOffset=52:i=28
szPossibleChars="BCDFGHJKMPQRTVWXY2346789"
Do 'Rep1
dwAccumulator=0 : j=14
Do
dwAccumulator=dwAccumulator*256
dwAccumulator=rpk(j+rpkOffset)+dwAccumulator
rpk(j+rpkOffset)=(dwAccumulator\24) and 255
dwAccumulator=dwAccumulator Mod 24
j=j-1
Loop While j>=0
i=i-1 : szProductKey=mid(szPossibleChars,dwAccumulator+1,1)&szProductKey
if (((29-i) Mod 6)=0) and (i<>-1) then
i=i-1 : szProductKey="-"&szProductKey
End If
Loop While i>=0 'Goto Rep1
GetKey=szProductKey
End FunctionHa ezt elindítod, akkor kapsz egy cdkey.txt fájlt, amiben benne lesz a kulcs.
-
Necc
addikt
Új hozzászólás Aktív témák
Hirdetés
- Futás, futópályák
- Csak semmi szimmetria: flegma dizájnnal készül a Nothing Phone (3)
- Autós topik
- Genshin Impact (PC, PS4, Android, iOS)
- SSD kibeszélő
- Garmin Forerunner 970 - fogd a pénzt, és fuss!
- A fociról könnyedén, egy baráti társaságban
- sziku69: Szólánc.
- Synology NAS
- Óvodások homokozója
- További aktív témák...
- Dell Latitude 7390, 13,3" FHD IPS , I5-7300U CPU, 16GB DDR4, 512GB SSD, WIN 11, ( olvasd végig )
- Acer PREDATOR HELIOS NEO 16 / i9-14900HX / RTX 4070 (140W) / 1 TB SSD / 240HZ
- Lenovo Ideapad 330S-15IKB / I5 /20GB RAM / GTX 1050 / M.2 SSD
- Lenovo ThinkPad T14 Gen 5 Ultra-I7/64GB/512SSD/Érintőképernyő/garancia
- Lenovo ThinkPad T14 G3 I5-1245U/32GB/1TBSSD/Érintőképernyő/Garanciás.
- BESZÁMÍTÁS! GIGABYTE AORUS MASTER RTX 3070 8GB GDDR6 videokártya garanciával hibátlan működéssel
- ÁRGARANCIA!Épített KomPhone i7 14700KF 32/64GB RAM RTX 5070Ti 16GB GAMER PC termékbeszámítással
- ÁRGARANCIA!Épített KomPhone i5 10600KF 16/32/64GB RAM RTX 3050 6GB GAMER PC termékbeszámítással
- 125 - Lenovo Legion Pro 5 (16ARX8) - AMD Ryzen 9 7945HX, RTX 4070 (ELKELT)
- Xiaomi 11T Pro 128GB, Kártyafüggetlen, 1 Év Garanciával
Állásajánlatok
Cég: CAMERA-PRO Hungary Kft
Város: Budapest
Cég: PC Trade Systems Kft.
Város: Szeged