dubey/WindowsXP
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity
WindowsXP/inetsrv/iis/img/help/iisnts/htm/asp/comp0003.htm
Tanishq Dubey cb60ae51e5
Initial Commit
2025-04-27 07:49:33 -04:00

475 lines
21 KiB
HTML
Raw Blame History

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 3.2 Final//EN">
<HTML>
<HEAD>
<META HTTP-EQUIV="Content-Type" Content="text/html; charset=Windows-1252">
<TITLE>Logging Utility Properties</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">
<H2><A NAME="_logging_utility_properties"></A>MyInfo Component Properties</H2>
<P>Each property of a <B>MyInfo </B>object returns a string. If a <B>MyInfo </B>property has no value set, the property returns an empty string.</P>
<P>The <B>MyInfo </B>object can have properties in addition to the ones documented here. You can create new <B>MyInfo </B>properties by simply assigning a string value to them. For example:</P>
<PRE><CODE>&lt;%
MyInfoObject.DogName = "Snoopy"
MyInfoObject.DogBreed = "Beagle"
%&gt;
</CODE></PRE>
<P>The above code creates the new properties <CODE>DogName</CODE> and <CODE>DogBreed</CODE>. These new properties are stored persistently along with the other <B>MyInfo</B> properties in a single text file called MyInfo.xml.&nbsp; For Windows95 and Windows98, MyInfo.xml is stored in the root directory.&nbsp; For Windows 2000 and later, MyInfo.xml is stored in the %SystemDrive%\system32\inetsrv\Data folder. If you move the MyInfo.xml file to another server, custom properties will not be implemented.</P>
<P>Only create new <B>MyInfo</B> properties for values that remain consistent throughout a site. </P>
<PRE></PRE>
<H6>Syntax</H6>
<P><I>Var <B>=</B> MyInfoObject</I><B>.</B><I>Property</I></P>
<P><I>MyInfoObject</I><B>.</B><I>Property</I><B> = </B><I>NewVar</I></P>
<P><I>&nbsp;</I></P>
<P>The MyInfo component has the following properties:</P>
<TABLE border=0 cellpadding=5 cols=2 frame=box rules=all>
<TR VALIGN="top">
<TD width=47%><B>PageType</B></TD>
<TD width=53%>Returns a number corresponding to the value in the "This site is ..." pop-up menu. These are the pop-up menu options with their corresponding numerical values:<BR>
1 = About My Company<BR>
2 = About My Life<BR>
3 = About My School<BR>
4 = About My Organization<BR>
5 = About My Community</TD>
</TR>
<TR VALIGN="top">
<TD width=47%><B>PersonalName</B></TD>
<TD width=53%>Returns the owner's name.</TD>
</TR>
<TR VALIGN="top">
<TD width=47%><B>PersonalAddress</B></TD>
<TD width=53%>Returns the owner's address.</TD>
</TR>
<TR VALIGN="top">
<TD width=47%><B>PersonalPhone</B></TD>
<TD width=53%>Returns the owner's phone number.</TD>
</TR>
<TR VALIGN="top">
<TD width=47%><B>PersonalMail</B></TD>
<TD width=53%>Returns the owner's e-mail address.</TD>
</TR>
<TR VALIGN="top">
<TD width=47%><B>PersonalWords</B></TD>
<TD width=53%>Returns additional text associated with the owner.</TD>
</TR>
<TR VALIGN="top">
<TD width=47%><B>CompanyName</B></TD>
<TD width=53%>Returns the name of the owner's company.</TD>
</TR>
<TR VALIGN="top">
<TD width=47%><B>CompanyAddress</B></TD>
<TD width=53%>Returns the address of the owner's company.</TD>
</TR>
<TR VALIGN="top">
<TD width=47%><B>CompanyPhone</B></TD>
<TD width=53%>Returns the phone number of the owner's company.</TD>
</TR>
<TR VALIGN="top">
<TD width=47%><B>CompanyDepartment</B> </TD>
<TD width=53%>Returns the owner's department name.</TD>
</TR>
<TR VALIGN="top">
<TD width=47%><B>CompanyWords</B></TD>
<TD width=53%>Returns additional text associated with the owner's company.</TD>
</TR>
<TR VALIGN="top">
<TD width=47%><B>HomeOccupation</B></TD>
<TD width=53%>Returns the owner's occupation.</TD>
</TR>
<TR VALIGN="top">
<TD width=47%><B>HomePeople</B></TD>
<TD width=53%>Returns text listing the people the owner lives with.</TD>
</TR>
<TR VALIGN="top">
<TD width=47%><B>HomeWords</B></TD>
<TD width=53%>Returns additional text associated with the owner.</TD>
</TR>
<TR VALIGN="top">
<TD width=47%><B>SchoolName</B> </TD>
<TD width=53%>Returns the name of the owner's school.</TD>
</TR>
<TR VALIGN="top">
<TD width=47%><B>SchoolAddress</B> </TD>
<TD width=53%>Returns the address of the owner's school.</TD>
</TR>
<TR VALIGN="top">
<TD width=47%><B>SchoolPhone</B> </TD>
<TD width=53%>Returns the phone number of the owner's school.</TD>
</TR>
<TR VALIGN="top">
<TD width=47%><B>SchoolDepartment</B></TD>
<TD width=53%>Returns the owner's department or class.</TD>
</TR>
<TR VALIGN="top">
<TD width=47%><B>SchoolWords</B> </TD>
<TD width=53%>Returns text associated with the owner's school.</TD>
</TR>
<TR VALIGN="top">
<TD width=47%><B>OrganizationName</B></TD>
<TD width=53%>Returns the name of the organization featured on the site.</TD>
</TR>
<TR VALIGN="top">
<TD width=47%><B>OrganizationAddress</B> </TD>
<TD width=53%>Returns the address of the organization.</TD>
</TR>
<TR VALIGN="top">
<TD width=47%><B>OrganizationPhone</B> </TD>
<TD width=53%>Returns the phone number of the organization.</TD>
</TR>
<TR VALIGN="top">
<TD width=47%><B>OrganizationWords</B> </TD>
<TD width=53%>Returns text describing the organization.</TD>
</TR>
<TR VALIGN="top">
<TD width=47%><B>CommunityName</B> </TD>
<TD width=53%>Returns the name of the community featured on the site.</TD>
</TR>
<TR VALIGN="top">
<TD width=47%><B>CommunityLocation</B> </TD>
<TD width=53%>Returns the location of the community.</TD>
</TR>
<TR VALIGN="top">
<TD width=47%><B>CommunityPopulation</B> </TD>
<TD width=53%>Returns the population of the community.</TD>
</TR>
<TR VALIGN="top">
<TD width=47%><B>CommunityWords</B></TD>
<TD width=53%>Returns text describing the community.</TD>
</TR>
<TR VALIGN="top">
<TD width=47%><B>URL(</B><I>n</I><B>)</B></TD>
<TD width=53%>Returns the nth user-defined URL. Corresponds to the nth link description in <B>URLWords</B>.</TD>
</TR>
<TR VALIGN="top">
<TD width=47%><B>URLWords(</B><I>n</I><B>)</B></TD>
<TD width=53%>Returns a string containing the nth user-defined description of a link. Corresponds to the nth URL in <B>URL</B>.</TD>
</TR>
<TR VALIGN="top">
<TD width=47%><B>Style</B></TD>
<TD width=53%>Returns the relative URL (starting with '/') of a style sheet.</TD>
</TR>
<TR VALIGN="top">
<TD width=47%><B>Background</B></TD>
<TD width=53%>Returns the background for the site.</TD>
</TR>
<TR VALIGN="top">
<TD width=47%><B>Title</B></TD>
<TD width=53%>Returns the user-defined title for the home page.</TD>
</TR>
<TR VALIGN="top">
<TD width=47%><B>Guestbook</B></TD>
<TD width=53%>Returns <20>1 if the guest book should be available on the site. Otherwise, returns 0. The default value is "".</TD>
</TR>
<TR VALIGN="top">
<TD width=47%><B>Messages</B></TD>
<TD width=53%>Returns <20>1 if the private message form should be available on the site. Otherwise, returns 0. The default value is "".</TD>
</TR>
</TABLE><BR>
<H6>Example</H6>
<P>This example gets all the MyInfo properties if they exist, and allows the user to set them.&nbsp; This is a very large example, but may be used as a tool.</P>
<P>--- MyInfo.asp ---</P>
<PRE><CODE>&lt;HTML&gt;
&lt;HEAD&gt;&lt;TITLE&gt;&lt;/TITLE&gt;&lt;/HEAD&gt;
&lt;BODY&gt;
&lt;% 'Get all the inputs from the Form
If Not "" = Request.Form("PageFile") Then MyInfoObject.PageFile = Request.Form("PageFile")
If Not "" = Request.Form("PersonalName") Then MyInfoObject.PersonalName = Request.Form("PersonalName")
If Not "" = Request.Form("PersonalAddress") Then MyInfoObject.PersonalAddress = Request.Form("PersonalAddress")
If Not "" = Request.Form("PersonalPhone") Then MyInfoObject.PersonalPhone = Request.Form("PersonalPhone")
If Not "" = Request.Form("PersonalMail") Then MyInfoObject.PersonalMail = Request.Form("PersonalMail")
If Not "" = Request.Form("PersonalWords") Then MyInfoObject.PersonalWords = Request.Form("PersonalWords")
If Not "" = Request.Form("CompanyName") Then MyInfoObject.CompanyName = Request.Form("CompanyName")
If Not "" = Request.Form("CompanyAddress") Then MyInfoObject.CompanyAddress = Request.Form("CompanyAddress")
If Not "" = Request.Form("CompanyPhone") Then MyInfoObject.CompanyPhone = Request.Form("CompanyPhone")
If Not "" = Request.Form("CompanyDepartment") Then MyInfoObject.CompanyDepartment = Request.Form("CompanyDepartment")
If Not "" = Request.Form("CompanyWords") Then MyInfoObject.CompanyWords = Request.Form("CompanyWords")
If Not "" = Request.Form("HomeOccupation") Then MyInfoObject.HomeOccupation = Request.Form("HomeOccupation")
If Not "" = Request.Form("HomePeople") Then MyInfoObject.HomePeople = Request.Form("HomePeople")
If Not "" = Request.Form("HomeWords") Then MyInfoObject.HomeWords = Request.Form("HomeWords")
If Not "" = Request.Form("SchoolName") Then MyInfoObject.SchoolName = Request.Form("SchoolName")
If Not "" = Request.Form("SchoolAddress") Then MyInfoObject.SchoolAddress = Request.Form("SchoolAddress")
If Not "" = Request.Form("SchoolPhone") Then MyInfoObject.SchoolPhone = Request.Form("SchoolPhone")
If Not "" = Request.Form("SchoolDepartment") Then MyInfoObject.SchoolDepartment = Request.Form("SchoolDepartment")
If Not "" = Request.Form("SchoolWords") Then MyInfoObject.SchoolWords = Request.Form("SchoolWords")
If Not "" = Request.Form("OrganizationName") Then MyInfoObject.OrganizationName = Request.Form("OrganizationName")
If Not "" = Request.Form("OrganizationAddress") Then MyInfoObject.OrganizationAddress = Request.Form("OrganizationAddress")
If Not "" = Request.Form("OrganizationPhone") Then MyInfoObject.OrganizationPhone = Request.Form("OrganizationPhone")
If Not "" = Request.Form("OrganizationWords") Then MyInfoObject.OrganizationWords = Request.Form("OrganizationWords")
If Not "" = Request.Form("CommunityName") Then MyInfoObject.CommunityName = Request.Form("CommunityName")
If Not "" = Request.Form("CommunityLocation") Then MyInfoObject.CommunityLocation = Request.Form("CommunityLocation")
If Not "" = Request.Form("CommunityPopulation") Then MyInfoObject.CommunityPopulation = Request.Form("CommunityPopulation")
If Not "" = Request.Form("CommunityWords") Then MyInfoObject.CommunityWords = Request.Form("CommunityWords")
If Not "" = Request.Form("Style") Then MyInfoObject.Style = Request.Form("Style")
If Not "" = Request.Form("Background") Then MyInfoObject.Background = Request.Form("Background")
If Not "" = Request.Form("Title") Then MyInfoObject.Title = Request.Form("Title")
If Not "" = Request.Form("Guestbook") Then MyInfoObject.Guestbook = Request.Form("Guestbook")
If Not "" = Request.Form("Messages") Then MyInfoObject.Messages = Request.Form("Messages")
' MyInfoObject.URL and URLWords are not exactly arrays.
If Not "" = Request.Form("URL") Then
If Instr(Request.Form("URL"), ";") Then
aURL = Split(Request.Form("URL"), ";")
For i = 0 to UBound(aURL)
MyInfoObject.URL(i) = aURL(i)
Next
MyInfoObject.TotalURL = i
Else
MyInfoObject.URL(1) = Request.Form("URL")
MyInfoObject.TotalURL = 1
End If
End If
If Not "" = Request.Form("URLWords") Then
If Instr(Request.Form("URLWords"), ";") Then
aURLWords = Split(Request.Form("URLWords"), ";")
For i = 0 to UBound(aURLWords)
MyInfoObject.URLWords(i) = aURLWords(i)
Next
MyInfoObject.TotalURLWords = i
Else
MyInfoObject.URLWords(1) = Request.Form("URLWords")
MyInfoObject.TotalURL = 1
End If
End If
' Now, get the inputs from the user with a FORM
%&gt;
&lt;H3&gt;Set Your MyInfo Data&lt;/H3&gt;
&lt;H4&gt;This data will be saved in %SystemDrive%\system32\inetsrv\Data\MyInfo.xml&lt;/H4&gt;
&lt;FORM NAME="GetAndSetMyInfo" METHOD="POST" ACTION="MyInfo.asp"&gt;
&lt;TABLE&gt;&lt;TR&gt;
&lt;TD&gt;PageFile&lt;/TD&gt;
&lt;TD&gt;&lt;select NAME="PageFile"&gt;
&lt;option value=1 &lt;% If 1=MyInfoObject.PageFile Then Response.Write "SELECTED"%&gt;&gt;About My Company&lt;/option&gt;
&lt;option value=2 &lt;% If 2=MyInfoObject.PageFile Then Response.Write "SELECTED"%&gt;&gt;About My Life&lt;/option&gt;
&lt;option value=3 &lt;% If 3=MyInfoObject.PageFile Then Response.Write "SELECTED"%&gt;&gt;About My School&lt;/option&gt;
&lt;option value=4 &lt;% If 4=MyInfoObject.PageFile Then Response.Write "SELECTED"%&gt;&gt;About My Organization&lt;/option&gt;
&lt;option value=5 &lt;% If 5=MyInfoObject.PageFile Then Response.Write "SELECTED"%&gt;&gt;About My Community&lt;/option&gt;
&lt;/select&gt;&lt;/TD&gt;
&lt;/TR&gt;&lt;TR&gt;
&lt;TD&gt;PersonalName&lt;/TD&gt;
&lt;TD&gt;&lt;input type="TEXT" NAME="PersonalName" value="&lt;%=MyInfoObject.PersonalName%&gt;" size=35&gt;&lt;/TD&gt;
&lt;/TR&gt;&lt;TR&gt;
&lt;TD&gt;PersonalAddress&lt;/TD&gt;
&lt;TD&gt;&lt;input type="TEXT" NAME="PersonalAddress" value="&lt;%=MyInfoObject.PersonalAddress%&gt;" size=35&gt;&lt;/TD&gt;
&lt;/TR&gt;&lt;TR&gt;
&lt;TD&gt;PersonalPhone&lt;/TD&gt;
&lt;TD&gt;&lt;input type="TEXT" NAME="PersonalPhone" value="&lt;%=MyInfoObject.PersonalPhone%&gt;" size=35&gt;&lt;/TD&gt;
&lt;/TR&gt;&lt;TR&gt;
&lt;TD&gt;PersonalMail&lt;/TD&gt;
&lt;TD&gt;&lt;input type="TEXT" NAME="PersonalMail" value="&lt;%=MyInfoObject.PersonalMail%&gt;" size=35&gt;&lt;/TD&gt;
&lt;/TR&gt;&lt;TR&gt;
&lt;TD&gt;PersonalWords&lt;/TD&gt;
&lt;TD&gt;&lt;input type="TEXT" NAME="PersonalWords" value="&lt;%=MyInfoObject.PersonalWords%&gt;" size=35&gt;&lt;/TD&gt;
&lt;/TR&gt;&lt;TR&gt;
&lt;TD&gt;CompanyName&lt;/TD&gt;
&lt;TD&gt;&lt;input type="TEXT" NAME="CompanyName" value="&lt;%=MyInfoObject.CompanyName%&gt;" size=35&gt;&lt;/TD&gt;
&lt;/TR&gt;&lt;TR&gt;
&lt;TD&gt;CompanyAddress&lt;/TD&gt;
&lt;TD&gt;&lt;input type="TEXT" NAME="CompanyAddress" value="&lt;%=MyInfoObject.CompanyAddress%&gt;" size=35&gt;&lt;/TD&gt;
&lt;/TR&gt;&lt;TR&gt;
&lt;TD&gt;CompanyPhone&lt;/TD&gt;
&lt;TD&gt;&lt;input type="TEXT" NAME="CompanyPhone" value="&lt;%=MyInfoObject.CompanyPhone%&gt;" size=35&gt;&lt;/TD&gt;
&lt;/TR&gt;&lt;TR&gt;
&lt;TD&gt;CompanyDepartment&lt;/TD&gt;
&lt;TD&gt;&lt;input type="TEXT" NAME="CompanyDepartment" value="&lt;%=MyInfoObject.CompanyDepartment%&gt;" size=35&gt;&lt;/TD&gt;
&lt;/TR&gt;&lt;TR&gt;
&lt;TD&gt;CompanyWords&lt;/TD&gt;
&lt;TD&gt;&lt;input type="TEXT" NAME="CompanyWords" value="&lt;%=MyInfoObject.CompanyWords%&gt;" size=35&gt;&lt;/TD&gt;
&lt;/TR&gt;&lt;TR&gt;
&lt;TD&gt;HomeOccupation&lt;/TD&gt;
&lt;TD&gt;&lt;input type="TEXT" NAME="HomeOccupation" value="&lt;%=MyInfoObject.HomeOccupation%&gt;" size=35&gt;&lt;/TD&gt;
&lt;/TR&gt;&lt;TR&gt;
&lt;TD&gt;HomePeople&lt;/TD&gt;
&lt;TD&gt;&lt;input type="TEXT" NAME="HomePeople" value="&lt;%=MyInfoObject.HomePeople%&gt;" size=35&gt;&lt;/TD&gt;
&lt;/TR&gt;&lt;TR&gt;
&lt;TD&gt;HomeWords&lt;/TD&gt;
&lt;TD&gt;&lt;input type="TEXT" NAME="HomeWords" value="&lt;%=MyInfoObject.HomeWords%&gt;" size=35&gt;&lt;/TD&gt;
&lt;/TR&gt;&lt;TR&gt;
&lt;TD&gt;SchoolName&lt;/TD&gt;
&lt;TD&gt;&lt;input type="TEXT" NAME="SchoolName" value="&lt;%=MyInfoObject.SchoolName%&gt;" size=35&gt;&lt;/TD&gt;
&lt;/TR&gt;&lt;TR&gt;
&lt;TD&gt;SchoolAddress&lt;/TD&gt;
&lt;TD&gt;&lt;input type="TEXT" NAME="SchoolAddress" value="&lt;%=MyInfoObject.SchoolAddress%&gt;" size=35&gt;&lt;/TD&gt;
&lt;/TR&gt;&lt;TR&gt;
&lt;TD&gt;SchoolPhone&lt;/TD&gt;
&lt;TD&gt;&lt;input type="TEXT" NAME="SchoolPhone" value="&lt;%=MyInfoObject.SchoolPhone%&gt;" size=35&gt;&lt;/TD&gt;
&lt;/TR&gt;&lt;TR&gt;
&lt;TD&gt;SchoolDepartment&lt;/TD&gt;
&lt;TD&gt;&lt;input type="TEXT" NAME="SchoolDepartment" value="&lt;%=MyInfoObject.SchoolDepartment%&gt;" size=35&gt;&lt;/TD&gt;
&lt;/TR&gt;&lt;TR&gt;
&lt;TD&gt;SchoolWords&lt;/TD&gt;
&lt;TD&gt;&lt;input type="TEXT" NAME="SchoolWords" value="&lt;%=MyInfoObject.SchoolWords%&gt;" size=35&gt;&lt;/TD&gt;
&lt;/TR&gt;&lt;TR&gt;
&lt;TD&gt;OrganizationName&lt;/TD&gt;
&lt;TD&gt;&lt;input type="TEXT" NAME="OrganizationName" value="&lt;%=MyInfoObject.OrganizationName%&gt;" size=35&gt;&lt;/TD&gt;
&lt;/TR&gt;&lt;TR&gt;
&lt;TD&gt;OrganizationAddress&lt;/TD&gt;
&lt;TD&gt;&lt;input type="TEXT" NAME="OrganizationAddress" value="&lt;%=MyInfoObject.OrganizationAddress%&gt;" size=35&gt;&lt;/TD&gt;
&lt;/TR&gt;&lt;TR&gt;
&lt;TD&gt;OrganizationPhone&lt;/TD&gt;
&lt;TD&gt;&lt;input type="TEXT" NAME="OrganizationPhone" value="&lt;%=MyInfoObject.OrganizationPhone%&gt;" size=35&gt;&lt;/TD&gt;
&lt;/TR&gt;&lt;TR&gt;
&lt;TD&gt;OrganizationWords&lt;/TD&gt;
&lt;TD&gt;&lt;input type="TEXT" NAME="OrganizationWords" value="&lt;%=MyInfoObject.OrganizationWords%&gt;" size=35&gt;&lt;/TD&gt;
&lt;/TR&gt;&lt;TR&gt;
&lt;TD&gt;CommunityName&lt;/TD&gt;
&lt;TD&gt;&lt;input type="TEXT" NAME="CommunityName" value="&lt;%=MyInfoObject.CommunityName%&gt;" size=35&gt;&lt;/TD&gt;
&lt;/TR&gt;&lt;TR&gt;
&lt;TD&gt;CommunityLocation&lt;/TD&gt;
&lt;TD&gt;&lt;input type="TEXT" NAME="CommunityLocation" value="&lt;%=MyInfoObject.CommunityLocation%&gt;" size=35&gt;&lt;/TD&gt;
&lt;/TR&gt;&lt;TR&gt;
&lt;TD&gt;CommunityPopulation&lt;/TD&gt;
&lt;TD&gt;&lt;input type="TEXT" NAME="CommunityPopulation" value="&lt;%=MyInfoObject.CommunityPopulation%&gt;" size=35&gt;&lt;/TD&gt;
&lt;/TR&gt;&lt;TR&gt;
&lt;TD&gt;CommunityWords&lt;/TD&gt;
&lt;TD&gt;&lt;input type="TEXT" NAME="CommunityWords" value="&lt;%=MyInfoObject.CommunityWords%&gt;" size=35&gt;&lt;/TD&gt;
&lt;/TR&gt;&lt;TR&gt;
&lt;TD&gt;Style&lt;/TD&gt;
&lt;TD&gt;&lt;input type="TEXT" NAME="Style" value="&lt;%=MyInfoObject.Style%&gt;" size=35&gt;&lt;/TD&gt;
&lt;/TR&gt;&lt;TR&gt;
&lt;TD&gt;Background&lt;/TD&gt;
&lt;TD&gt;&lt;input type="TEXT" NAME="Background" value="&lt;%=MyInfoObject.Background%&gt;" size=35&gt;&lt;/TD&gt;
&lt;/TR&gt;&lt;TR&gt;
&lt;TD&gt;Title&lt;/TD&gt;
&lt;TD&gt;&lt;input type="TEXT" NAME="Title" value="&lt;%=MyInfoObject.Title%&gt;" size=35&gt;&lt;/TD&gt;
&lt;/TR&gt;&lt;TR&gt;
&lt;TD&gt;Guestbook&lt;/TD&gt;
&lt;TD&gt;&lt;select NAME="Guestbook"&gt;
&lt;option value=-1 &lt;% If -1=MyInfoObject.Guestbook Then Response.Write "SELECTED"%&gt;&gt;Make Available&lt;/option&gt;
&lt;option value=0 &lt;% If 0=MyInfoObject.Guestbook Then Response.Write "SELECTED"%&gt;&gt;Do Not Make Available&lt;/option&gt;
&lt;/select&gt;&lt;/TD&gt;
&lt;/TR&gt;&lt;TR&gt;
&lt;TD&gt;Messages&lt;/TD&gt;
&lt;TD&gt;&lt;select NAME="Messages"&gt;
&lt;option value=-1 &lt;% If -1=MyInfoObject.Messages Then Response.Write "SELECTED"%&gt;&gt;Make Available&lt;/option&gt;
&lt;option value=0 &lt;% If 0=MyInfoObject.Messages Then Response.Write "SELECTED"%&gt;&gt;Do Not Make Available&lt;/option&gt;
&lt;/select&gt;&lt;/TD&gt;
&lt;/TR&gt;&lt;TR&gt;
&lt;%
strURL = ""
If Not 0 = MyInfoObject.TotalURL Then
For i = 0 to (MyInfoObject.TotalURL-1)
strURL = strURL &amp; MyInfoObject.URL(i)
If Not (MyInfoObject.TotalURL-1) = i Then strURL = strURL &amp; ";"
Next
End If
strURLWords = ""
If Not 0 = MyInfoObject.TotalURLWords Then
For i = 0 to (MyInfoObject.TotalURLWords-1)
strURLWords = strURLWords &amp; MyInfoObject.URLWords(i)
If Not (MyInfoObject.TotalURLWords-1) = i Then strURLWords = strURLWords &amp; ";"
Next
End If
%&gt;
&lt;TD&gt;URL seperated by ;&lt;/TD&gt;
&lt;TD&gt;&lt;input type="TEXT" NAME="URL" value="&lt;%=strURL%&gt;" size=35&gt;&lt;/TD&gt;
&lt;/TR&gt;&lt;TR&gt;
&lt;TD&gt;URLWords seperated by ;&lt;/TD&gt;
&lt;TD&gt;&lt;input type="TEXT" NAME="URLWords" value="&lt;%=strURLWords%&gt;" size=35&gt;&lt;/TD&gt;
&lt;/TR&gt;
&lt;/TABLE&gt;&lt;BR&gt;
&lt;INPUT TYPE="SUBMIT" VALUE="Submit"&gt;
&lt;/FORM&gt;
&lt;/BODY&gt;
&lt;/HTML&gt;</CODE></PRE>
<hr class="iis" size="1">
<p align="center"><em><a href="../../../common/colegal.htm">&copy; 1997-2001 Microsoft Corporation. All rights reserved.</a></em></p>
</BODY>
</HTML>
Reference in New Issue View Git Blame Copy Permalink