Posted by "Gustav Wiberg" on 09/03/05 20:45
----- Original Message -----
From: "Rory Browne" <rory.browne@gmail.com>
To: "Gustav Wiberg" <gustav@varupiraten.se>
Cc: "PHP General" <php-general@lists.php.net>
Sent: Saturday, September 03, 2005 4:40 PM
Subject: Re: [PHP] Impossible???
What exactly are you trying to do?
That looks like clientside code.
Why exactly are you trying to open a local(clientside) network object?
On 9/1/05, Gustav Wiberg <gustav@varupiraten.se> wrote:
> Hi again!
>
>
> Is this impossible to do in PHP?
>
>
> Dim objNet
> On Error Resume Next
>
> 'In case we fail to create object then display our custom error
>
> Set objNet = CreateObject("WScript.NetWork")
> If Err.Number <> 0 Then 'If error occured then display
> notice
> MsgBox "Don't be Shy." & vbCRLF &_
> "Do not press ""No"" If your browser warns you."
> Document.Location = "UserInfo.html"
> 'Place the Name of the document.
> 'It will display again
> End if
>
> Dim strInfo
> strInfo = "User Name is " & objNet.UserName & vbCRLF & _
> "Computer Name is " & objNet.ComputerName & vbCRLF & _
> "Domain Name is " & objNet.UserDomain
> MsgBox strInfo
>
> Set objNet = Nothing 'Destroy the Object to free the
> Memory
>
>
> /G
> @varupiraten.se
>
> --
> PHP General Mailing List (http://www.php.net/)
> To unsubscribe, visit: http://www.php.net/unsub.php
>
>
--
PHP General Mailing List (http://www.php.net/)
To unsubscribe, visit: http://www.php.net/unsub.php
I'm trying to get the computername... :-)
/G
--
No virus found in this incoming message.
Checked by AVG Anti-Virus.
Version: 7.0.344 / Virus Database: 267.10.18/89 - Release Date: 2005-09-02
[Back to original message]
|