2025-04-27 07:49:33 -04:00

83 lines
3.1 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>Lock</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="_lock"></A><SUP></SUP>Lock</H4>
<P>The <B>Lock</B> method blocks other clients from modifying the variables stored in the <B>Application</B> object, ensuring that only one client at a time can alter or access the <B>Application</B> variables. If you do not call the <A HREF="/iishelp/iis/htm/asp/vbob51gr.htm"><B>Unlock</B></A> method explicitly, the server unlocks the locked <B>Application</B> object when the .asp file ends or times out.</P>
<H6>Syntax</H6>
<P><B>Application.Lock</B></P>
<P><B>&nbsp;</B></P>
<H6>Example</H6>
<PRE><CODE>&lt;%
Application.Lock
Application("NumVisits") = Application("NumVisits") + 1
Application("datLastVisited") = Now()
Application.Unlock
%&gt;
This application page has been visited
&lt;%= Application("NumVisits") %&gt; times!
</CODE></PRE>
<P>In the preceding example the <B>Lock </B>method prevents more than one client from accessing the variable <CODE>NumVisits</CODE> at a time. If the application had not been locked, two clients could try to increment the variable <CODE>NumVisits</CODE> simultaneously.</P>
<H6>Applies To</H6>
<P><A HREF="/iishelp/iis/htm/asp/vbob8zw4.htm"><B>Application Object</B></A></P>
<H6>See Also</H6>
<P><A HREF="/iishelp/iis/htm/asp/vbob51gr.htm"><B>Unlock</B></A></P>
<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>