107 lines
3.6 KiB
HTML
107 lines
3.6 KiB
HTML
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 3.2 Final//EN">
|
|
<HTML>
|
|
<HEAD>
|
|
<META HTTP-EQUIV="Content-Type" Content="text/html; charset=Windows-1252">
|
|
<TITLE>Put</TITLE>
|
|
<SCRIPT LANGUAGE="JavaScript">
|
|
<!--
|
|
TempString = navigator.appVersion
|
|
if (navigator.appName == "Microsoft Internet Explorer"){
|
|
// Check to see if browser is Microsoft
|
|
if (TempString.indexOf ("4.") >= 0){
|
|
// Check to see if it is IE 4
|
|
document.writeln('<link rel="stylesheet" type="text/css" href="/iishelp/common/coua.css">');
|
|
}
|
|
else {
|
|
document.writeln('<link rel="stylesheet" type="text/css" href="/iishelp/common/cocss.css">');
|
|
}
|
|
}
|
|
else if (navigator.appName == "Netscape") {
|
|
// Check to see if browser is Netscape
|
|
document.writeln('<link rel="stylesheet" type="text/css" href="/iishelp/common/coua.css">');
|
|
}
|
|
else
|
|
document.writeln('<link rel="stylesheet" type="text/css" href="/iishelp/common/cocss.css">');
|
|
//-->
|
|
</script>
|
|
<SCRIPT LANGUAGE="VBScript">
|
|
<!--
|
|
Sub Window_OnLoad()
|
|
Dim frmContents
|
|
On Error Resume Next
|
|
If Not Parent Is Nothing Then
|
|
Set frmContents = Parent.Contents
|
|
If Not frmContents Is Nothing Then
|
|
frmContents.Window.TOCSynch_Click
|
|
End If
|
|
End If
|
|
End Sub
|
|
//--></SCRIPT><META NAME="DESCRIPTION" CONTENT="Internet Information Services reference information">
|
|
<META HTTP-EQUIV="PICS-Label" CONTENT='(PICS-1.1 "<http://www.rsac.org/ratingsv01.html>" l comment "RSACi North America Server" by "inet@microsoft.com <mailto:inet@microsoft.com>" r (n 0 s 0 v 0 l 0))'>
|
|
<META NAME="MS.LOCALE" CONTENT="EN-US">
|
|
<META NAME="MS-IT-LOC" Content="Internet Information Services">
|
|
</HEAD>
|
|
|
|
<BODY BGCOLOR="#FFFFFF" TEXT="#000000">
|
|
|
|
<H4><A NAME="_k2_put"></A><SUP></SUP>Put</H4>
|
|
|
|
<P>The ADSI <B>Put</B> method sets the value for a metabase property in the object. Some languages, such as VBScript, also support the <I>object</I>.<I>property</I> syntax as an alternative to the <B>Get</B> and <B>Put</B> methods.</P>
|
|
|
|
<H6>Syntax</H6>
|
|
|
|
<P><I>object</I>.<B>Put</B> <I>property</I>, <I>value</I> </P>
|
|
|
|
<P>or </P>
|
|
|
|
<P><I>object</I>.<I>property</I> = <I>value</I> </P>
|
|
|
|
<P> </P>
|
|
|
|
<H6>Parts</H6>
|
|
|
|
<DL>
|
|
<DT><I>object</I></DT>
|
|
|
|
<DD>Contains an IIS Admin Object, usually as a result of a previous <B>GetObject</B> operation.<BR>
|
|
</DD>
|
|
|
|
<DT><I>property</I></DT>
|
|
|
|
<DD>A property of the object that has been retrieved from the metabase.<BR>
|
|
</DD>
|
|
|
|
<DT><I>value</I></DT>
|
|
|
|
<DD>The value for the property.</DD>
|
|
</DL>
|
|
|
|
<H6>Code Example</H6>
|
|
|
|
<PRE><CODE><%
|
|
Dim IIsObj, vRead, vWrite
|
|
Set IIsObj = GetObject("IIS://<I>LocalHost</I>/W3SVC/1/Root")
|
|
'Get the value from the object.
|
|
vRead = IIsObj.Get("AccessRead")
|
|
'Can also use <I>object.property</I> syntax.
|
|
vWrite = IIsObj.AccessWrite
|
|
' Set the values.
|
|
vRead = True<B> </B>
|
|
vWrite = False
|
|
'Put the values back in the object.
|
|
IIsObj.Put "AccessRead", vRead
|
|
'Use optional <I>object</I>.<I>property</I> syntax.
|
|
IIsObj.AccessWrite = vWrite
|
|
'Save the changes back to the metabase.
|
|
IIsObj.SetInfo
|
|
%>
|
|
</CODE></PRE>
|
|
|
|
<H6>See Also</H6>
|
|
|
|
<P><A HREF="/iishelp/iis/htm/asp/adsi7vcf.htm"><B>GetInfo</B></A>, <A HREF="/iishelp/iis/htm/asp/adsi0elr.htm"><B>SetInfo</B></A>, <A HREF="/iishelp/iis/htm/asp/adsi5ius.htm"><B>Get</B></A>, <A HREF="/iishelp/iis/htm/asp/adsi5ewo.htm"><B>GetEx</B></A>, <A HREF="/iishelp/iis/htm/asp/adsi1np4.htm"><B>PutEx</B></A></P>
|
|
<hr class="iis" size="1">
|
|
<p align="center"><em><a href="../../../common/colegal.htm">© 1997-2001 Microsoft Corporation. All rights reserved.</a></em></p>
|
|
</BODY>
|
|
</HTML>
|