Reference a VBScript Variable in ASP

[BP Prgm]

This is my VBScript function:

<script language="JavaScript" type="text/JavaScript">
Dim UN
Set objNet = CreateObject("WScript.NetWork")
Set objUser = GetObject("WinNT://my domain/" & objNet.UserName )
UN = objNet.UserName & " (" & objUser.FullName & ")"
</script>

How can I reference the VBScript Variable UN in my ASP code?
<%=UN%> won't work because VBScript is on the client side and ASP is on the
server side

If I have to post it on one page and read it on another, how do I do that?
I'm somewhat new to ASP...

Thanks!

[Bob Barrows]

BP Prgm wrote:

> This is my VBScript function:
>
> <script language="JavaScript" type="text/JavaScript">
> Dim UN
> Set objNet = CreateObject("WScript.NetWork")
> Set objUser = GetObject("WinNT://my domain/" & objNet.UserName )
> UN = objNet.UserName & " (" & objUser.FullName & ")"
> </script>
>
> How can I reference the VBScript Variable UN in my ASP code?
> <%=UN%> won't work because VBScript is on the client side and ASP is
> on the server side
>
> If I have to post it on one page and read it on another, how do I do
> that? I'm somewhat new to ASP...
>

Well, you could do this:

<form id = frmLogin action="somepage.asp" method="post>
<input type=text style="visibility:hidden" id=txtLogin>
</form>
<script language="JavaScript" type="text/JavaScript">
Dim UN
Set objNet = CreateObject("WScript.NetWork")
Set objUser = GetObject("WinNT://my domain/" & objNet.UserName )
UN = objNet.UserName & " (" & objUser.FullName & ")"
frmLogin.txtLogin.value = UN
frmLogin.submit
</script>

And in somepage.asp:

<%
user = Request.Form("txtLogin")
%>

But, why bother? Use IIS Manager to configure your site to use Windows
Authentication and turn off Anonymous access. Then in ASP, use

user=Request.servervariables("LOGIN_USER")

to get the fully qualified login name of the user.

HTH,
Bob Barrows

[BP Prgm]

I have used that, but I want to get some other items like the user's full
name and computer name. Is there a way I can conversely use ASP variables in
VBScript? That way I can put everything on one page and just use the
user=Request.servervariables("LOGIN_USER") to get the other info with
VBScript.


"Bob Barrows" <reb_01501@yahoo.com> wrote in message
news:Ohu3kqwVDHA.2192@TK2MSFTNGP10.phx.gbl...

> BP Prgm wrote:

> > This is my VBScript function:
> >
> > <script language="JavaScript" type="text/JavaScript">
> > Dim UN
> > Set objNet = CreateObject("WScript.NetWork")
> > Set objUser = GetObject("WinNT://my domain/" & objNet.UserName )
> > UN = objNet.UserName & " (" & objUser.FullName & ")"
> > </script>
> >
> > How can I reference the VBScript Variable UN in my ASP code?
> > <%=UN%> won't work because VBScript is on the client side and ASP is
> > on the server side
> >
> > If I have to post it on one page and read it on another, how do I do
> > that? I'm somewhat new to ASP...
> >

>
> Well, you could do this:
>
> <form id = frmLogin action="somepage.asp" method="post>
> <input type=text style="visibility:hidden" id=txtLogin>
> </form>
> <script language="JavaScript" type="text/JavaScript">
> Dim UN
> Set objNet = CreateObject("WScript.NetWork")
> Set objUser = GetObject("WinNT://my domain/" & objNet.UserName )
> UN = objNet.UserName & " (" & objUser.FullName & ")"
> frmLogin.txtLogin.value = UN
> frmLogin.submit
> </script>
>
> And in somepage.asp:
>
> <%
> user = Request.Form("txtLogin")
> %>
>
> But, why bother? Use IIS Manager to configure your site to use Windows
> Authentication and turn off Anonymous access. Then in ASP, use
>
> user=Request.servervariables("LOGIN_USER")
>
> to get the fully qualified login name of the user.
>
> HTH,
> Bob Barrows
>
>

[Curt_C [MVP]]

can't get computer name....sorry...
You MAY be able to get the full name if you have access to the AD info with
ADSI


--
----------------------------------------------------------
Curt Christianson (Software_AT_Darkfalz.Com)
Owner/Lead Designer, DF-Software
[url]http://www.Darkfalz.com[/url]
---------------------------------------------------------
...Offering free scripts & code snippits for everyone...
---------------------------------------------------------

"BP Prgm" <nospam@please.com> wrote in message
news:ejqeqJxVDHA.424@TK2MSFTNGP11.phx.gbl...

> I have used that, but I want to get some other items like the user's full
> name and computer name. Is there a way I can conversely use ASP variables

in

> VBScript? That way I can put everything on one page and just use the
> user=Request.servervariables("LOGIN_USER") to get the other info with
> VBScript.
>
>
> "Bob Barrows" <reb_01501@yahoo.com> wrote in message
> news:Ohu3kqwVDHA.2192@TK2MSFTNGP10.phx.gbl...

> > BP Prgm wrote:

> > > This is my VBScript function:
> > >
> > > <script language="JavaScript" type="text/JavaScript">
> > > Dim UN
> > > Set objNet = CreateObject("WScript.NetWork")
> > > Set objUser = GetObject("WinNT://my domain/" & objNet.UserName )
> > > UN = objNet.UserName & " (" & objUser.FullName & ")"
> > > </script>
> > >
> > > How can I reference the VBScript Variable UN in my ASP code?
> > > <%=UN%> won't work because VBScript is on the client side and ASP is
> > > on the server side
> > >
> > > If I have to post it on one page and read it on another, how do I do
> > > that? I'm somewhat new to ASP...
> > >

> >
> > Well, you could do this:
> >
> > <form id = frmLogin action="somepage.asp" method="post>
> > <input type=text style="visibility:hidden" id=txtLogin>
> > </form>
> > <script language="JavaScript" type="text/JavaScript">
> > Dim UN
> > Set objNet = CreateObject("WScript.NetWork")
> > Set objUser = GetObject("WinNT://my domain/" & objNet.UserName )
> > UN = objNet.UserName & " (" & objUser.FullName & ")"
> > frmLogin.txtLogin.value = UN
> > frmLogin.submit
> > </script>
> >
> > And in somepage.asp:
> >
> > <%
> > user = Request.Form("txtLogin")
> > %>
> >
> > But, why bother? Use IIS Manager to configure your site to use Windows
> > Authentication and turn off Anonymous access. Then in ASP, use
> >
> > user=Request.servervariables("LOGIN_USER")
> >
> > to get the fully qualified login name of the user.
> >
> > HTH,
> > Bob Barrows
> >
> >

>
>

[Bob Barrows]

In our Intranet, I have found that I am SOMETIMES able to get the computer
name via "REMOTE_NAME". Sometimes this servervariable only contains the ip
address of the machine - no idea why.

Bob

Curt_C [MVP] wrote:

> can't get computer name....sorry...
> You MAY be able to get the full name if you have access to the AD
> info with ADSI
>
>
>
> "BP Prgm" <nospam@please.com> wrote in message
> news:ejqeqJxVDHA.424@TK2MSFTNGP11.phx.gbl...

>> I have used that, but I want to get some other items like the user's
>> full name and computer name. Is there a way I can conversely use ASP
>> variables in VBScript? That way I can put everything on one page and
>> just use the user=Request.servervariables("LOGIN_USER") to get the
>> other info with VBScript.
>>
>>
>> "Bob Barrows" <reb_01501@yahoo.com> wrote in message
>> news:Ohu3kqwVDHA.2192@TK2MSFTNGP10.phx.gbl...

>>> BP Prgm wrote:
>>>> This is my VBScript function:
>>>>
>>>> <script language="JavaScript" type="text/JavaScript">
>>>> Dim UN
>>>> Set objNet = CreateObject("WScript.NetWork")
>>>> Set objUser = GetObject("WinNT://my domain/" & objNet.UserName )
>>>> UN = objNet.UserName & " (" & objUser.FullName & ")"
>>>> </script>
>>>>
>>>> How can I reference the VBScript Variable UN in my ASP code?
>>>> <%=UN%> won't work because VBScript is on the client side and ASP
>>>> is on the server side
>>>>
>>>> If I have to post it on one page and read it on another, how do I
>>>> do that? I'm somewhat new to ASP...
>>>>
>>>
>>> Well, you could do this:
>>>
>>> <form id = frmLogin action="somepage.asp" method="post>
>>> <input type=text style="visibility:hidden" id=txtLogin>
>>> </form>
>>> <script language="JavaScript" type="text/JavaScript">
>>> Dim UN
>>> Set objNet = CreateObject("WScript.NetWork")
>>> Set objUser = GetObject("WinNT://my domain/" & objNet.UserName )
>>> UN = objNet.UserName & " (" & objUser.FullName & ")"
>>> frmLogin.txtLogin.value = UN
>>> frmLogin.submit
>>> </script>
>>>
>>> And in somepage.asp:
>>>
>>> <%
>>> user = Request.Form("txtLogin")
>>> %>
>>>
>>> But, why bother? Use IIS Manager to configure your site to use
>>> Windows Authentication and turn off Anonymous access. Then in ASP,
>>> use
>>>
>>> user=Request.servervariables("LOGIN_USER")
>>>
>>> to get the fully qualified login name of the user.
>>>
>>> HTH,
>>> Bob Barrows