Navigacija

Vartotojų tinkle

Prisijungusių svečių: 190
Prisijungusių narių: 0
Prisijungusių narių nėra

Registruoti nariai: 25,953
Naujausias narys: Quwqkibor

Naujausi straipsniai

Paskutiniai nariai

Memento Mori 4 dienos
ozzWANTED 1 savaitė
Quwqkibor 2 savaitės
asirija 6 savaitės
tomeem 8 savaitės
Reikalas 9 savaitės
weberiz12 savaitės
mRokass14 savaitės
kartoonas15 savaitės
iaescortsmap15 savaitės
grunskiz18 savaitės
Bruksnys18 savaitės
illusion18 savaitės
ordo19 savaitės
Jurgaila20 savaitės
originalcs1620 savaitės
Rytis21 savaitės
halis22 savaitės
junkus25 savaitės
morlis25 savaitės

Informacija:


OS: Unknown
Naršyklė: Nežinoma
IP: 18.222.168.152
Naujienų: 529
Straipsnių: 235
Temų: 52,585
Postų: 522,523
Postų pask. parą: 0
Shout'ų pask. parą: 0
P.S.C. pask. parą: 0
Nuorodų kataloge: 13

Lankomumo Statistika

Peržiūrų šiandien: 22

Iš viso peržiūrų: 22948724

Prisijungti

REGISTRUOTIS
Nario vardas

Slaptažodis



Pamiršai slaptažodį?
Paprašyk naujo

Aktyvuoti save

Šaukykla

Jei norite rašyti žinutes, turite prisijungti.

ozzWANTED
2024 Sau. 17 01:01:00
Desperatiškus komentarus šaukykloje su accountu po mėnesio prasibuvimo, ištryniau. Pasaulis ir taip juodas. Įjungiam šviesą, prašviesės. šypsosi

Majakas
2023 Gru. 10 19:12:39
Negaliu patikėti jog žinutės/pranešimai visi yra nuo 2008 m akinanti šypsen

Žmogus
2023 Rugs. 7 21:09:14
O gal BloodKiller pasijungs?

Apocal
2023 Rugs. 2 18:09:23
Nu davai nuveikiam kažką akinanti šypsen. Prisijungti kada visi čia akinanti šypsen.

Apocal
2023 Rugs. 2 00:09:18
Šiaip atėjau pažiūrėti ar dar lopas nesby yra ar koks ten buvo.

Šaukyklos archyvas

Apklausa

Ar esate patenkinti lietuviško vertimo kokybe?

Taip!

Taip, bet yra ką taisyti (parašysiu komentaruose)

Ne

Norėdamas balsuoti turite prisijungti.
Archyvas
Reklama 400x60
kaip isgauti kompiuterio varda
Forumas | Kita | Off-Topic diskusijos

Autorius: BENQ Peržiūrų: 814      Spausdinti temą
2010 Bal. 6 17:04:05          1 žinutė iš 2
Spausdinti pranešimą
sveiki, ar iseina, kaip nors isgauti puslapio lankytojo kompiuterio varda, kuri rodo to kompiuterio sistemos informacijoj?

radau pora scriptuku, kurie turetu tai daryti, bet nemoku ju panaudot.

<%
    Set pc = CreateObject("Wscript.Network")
    response.write pc.ComputerName
    Set pc = nothing
    response.write " (currently connected as "
    response.write ucase(Request.ServerVariables("SERVER_NAME"))
    response.write " on "
    response.write Request.ServerVariables("LOCAL_ADDR") & ")"
%>






<%
    Set Loc = createobject("WBEMScripting.SWBEMLocator")
    Set nms = Loc.ConnectServer()
    WQL = "SELECT CSName FROM Win32_OperatingSystem"
    Set cs = nms.ExecQuery(WQL, "WQL", 48)
    For Each pc In cs
        Response.Write pc.CSName
    Next
    set cs = nothing: set nms = nothing: set loc = nothing
%>




aciu.

2010 Bir. 14 19:06:44          2 žinutė iš 2
Spausdinti pranešimą
Matau, kad čia sena tema, bet gal kam gi reikia.
Susikurk .bat failą ir į jį įmesk šitą kodą. (Bent jau aš taip galvoju.)

Peršokti į forumą: