كيف اظهر اسم الجهاز بالجافا

[love php]

السلام عليكم

اخواني اريد اظهار اسم الجهاز بالجافا سكربت كيف اتعامل مع ذلك

وهل بالامكان اظهار اسم مستخدم الجهاز اذا كان ADMINISTRATOR او اي اسم آخر


وشكرا

[مهندس مصرى]

لا يمكن عملها بالجافا سكربت لكن تستطيع عملها بال vbscript

<script language="VBScript">
Set network = CreateObject("WScript.Network")
get_username = network.UserName
get_computer = network.ComputerName
MsgBox("UserName = " & get_username & vbCRLF & "ComputerName = " & get_computer)
</script> 

لكنها لن تعمل الا في اصدارات مايكروسوفت فقط مثل الانترنت اكسبلورر لانه تطبيق خاص بمايكروسوفت

[love php]

الف شكر اخي مهندس مصرى

بس سؤال أخير كيف اضع الناتج في حقل باستخدام الكود

<input name="username" type="username" >
<input name="computer" type="computer" >

لقد جربت بهذه الطريقة و لكن لم يعمل معي

<script language="VBScript">
Set network = CreateObject("WScript.Network")
get_username = network.UserName
get_computer = network.ComputerName
MsgBox("UserName = " & get_username & vbCRLF & "ComputerName = " & get_computer)
</script>
<input name="username" type="username" >
<input name="computer" type="computer" >

[مهندس مصرى]

قم بعمل form اولا حتى تستطيع استدعاءها من داخل ال vbscript عن طريق ال id
كالتالي:

<form id="myform">
<input name="username" type="username" >
<input name="computer" type="computer" >
</form> 

ثم في كود ال vbscript قم بتعريف متغير جديد

dim myform
set myform = document.forms('myform') 

وتستطيع التعامل مع قيم الحقول كالتالي:
حقل username

myform.username.value 

وحقل computer

myform.computer.value