📄 employees.htm
字号:
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML xmlns="http://www.w3.org/TR/REC-html40"
XMLNS:o="urn:schemas-microsoft-com:office:office"
XMLNS:x="urn:schemas-microsoft-com:office:excel"
XMLNS:a="urn:schemas-microsoft-com:office:access"
XMLNS:dt="uuid:C2F41010-65B3-11d1-A29F-00AA00C14882" xmlns:o =
"urn:schemas-microsoft-com:office:office" xmlns:x =
"urn:schemas-microsoft-com:office:excel" xmlns:a =
"urn:schemas-microsoft-com:office:access" xmlns:dt =
"uuid:C2F41010-65B3-11d1-A29F-00AA00C14882"><HEAD><TITLE>雇员</TITLE>
<SCRIPT language=vbscript>
<!--
Function ReadVariable(strVariableName)
'these five variables are used in the string manipulation
'code that finds the variable in the cookie.
Dim intLocation
Dim intNameLength
Dim intValueLength
Dim intNextSemicolon
Dim strTemp
'calculate length and location of variable name
intNameLength = Len(strVariableName)
intLocation = Instr(Document.Cookie, strVariableName)
'check for existence of variable name
If intLocation = 0 Then
'variable not found, so it can't be read
ReadVariable = NOT_FOUND
Else
'get a smaller substring to work with
strTemp = Right(Document.Cookie, Len(Document.Cookie) - intLocation + 1)
'check to make sure we found the full string, not just a substring
If Mid(strTemp, intNameLength + 1, 1) <> "=" Then
'oops, only found substring, not good enough
ReadVariable = NOT_FOUND
'note that this will incorrectly give a not found result if and only if
'a search for a variable whose name is a substring of a preceding
'variable is undertaken. For example, this will fail:
'
'search for: MyVar
'cookie contains: MyVariable=2;MyVar=1
Else
'found full string
intNextSemicolon = Instr(strTemp, ";")
'if not found, then we need the last element of the cookie
If intNextSemicolon = 0 Then intNextSemicolon = Len(strTemp) + 1
'check for empty variable (Var1=;)
If intNextSemicolon = (intNameLength + 2) Then
'variable is empty
ReadVariable = ""
Else
'calculate value normally
intValueLength = intNextSemicolon - intNameLength - 2
ReadVariable = Mid(strTemp, intNameLength + 2, intValueLength)
End If
End If
End if
End Function
Sub SetVariable(strVariableName, varVariableValue)
Document.Cookie = strVariableName & "=" & varVariableValue
End Sub
Sub KillVariable(strVariableName)
SetVariable strVariableName, "NULL;expires=Monday, 01-Jan-95 12:00:00 GMT"
End Sub
-->
</SCRIPT>
<SCRIPT event=onload for=window language=vbscript>
<!--
Dim strFilter
strFilter = ReadVariable("filter")
MSODSC.RecordsetDefs.Item(0).ServerFilter = strFilter
-->
</SCRIPT>
<META content="HTML 4.0" name=vs_targetSchema><LINK
href="Employees.files/filelist.xml" rel=File-List type=text/xml>
<META content=Access.Application name=ProgId>
<META content=2226 name=Version>
<META content=2052 name="Language Code">
<META name=VBSForEventHandlers VALUE="TRUE">
<META content="text/html; charset=gb2312" http-equiv=Content-Type>
<META content=10.00.2225 name=DesignerVersion>
<OBJECT classid=CLSID:0002E553-0000-0000-C000-000000000046 id=MSODSC
tabIndex=-1><PARAM NAME="XMLData" VALUE="<xml xmlns:a="urn:schemas-microsoft-com:office:access"> <a:DataSourceControl> <a:OWCVersion>10.0.0.2502 </a:OWCVersion> <a:ConnectionString>Provider=Microsoft.Jet.OLEDB.4.0;Password=&quot;&quot;;User ID=Admin;Data Source=Northwind.mdb;Mode=Share Deny None;Extended Properties=&quot;&quot;;Jet OLEDB:System database=&quot;&quot;;Jet OLEDB:Registry Path=&quot;&quot;;Jet OLEDB:Database Password=&quot;&quot;;Jet OLEDB:Engine Type=0;Jet OLEDB:Database Locking Mode=1;Jet OLEDB:Global Partial Bulk Ops=2;Jet OLEDB:Global Bulk Transactions=1;Jet OLEDB:New Database Password=&quot;&quot;;Jet OLEDB:Create System Database=False;Jet OLEDB:Encrypt Database=False;Jet OLEDB:Don't Copy Locale on Compact=False;Jet OLEDB:Compact Without Replica Repair=False;Jet OLEDB:SFP=False</a:ConnectionString> <a:MaxRecords>10000</a:MaxRecords> <a:GridX>24</a:GridX> <a:GridY>24</a:GridY> <a:OfflineType>2</a:OfflineType> <a:XMLLocation>0</a:XMLLocation> <a:XMLDataTarget></a:XMLDataTarget> <a:ConnectionFile></a:ConnectionFile> <a:ElementExtension> <a:ElementID>EmployeeID</a:ElementID> <a:ControlSource>雇员ID</a:ControlSource> <a:ChildLabel>EmployeeID_Label</a:ChildLabel> </a:ElementExtension> <a:ElementExtension> <a:ElementID>LastName</a:ElementID> <a:ControlSource>姓氏</a:ControlSource> <a:ChildLabel>LastName_Label</a:ChildLabel> </a:ElementExtension> <a:ElementExtension> <a:ElementID>FirstName</a:ElementID> <a:ControlSource>名字</a:ControlSource> <a:ChildLabel>FirstName_Label</a:ChildLabel> </a:ElementExtension> <a:ElementExtension> <a:ElementID>Title</a:ElementID> <a:ControlSource>职务</a:ControlSource> <a:ChildLabel>Title_Label</a:ChildLabel> </a:ElementExtension> <a:ElementExtension> <a:ElementID>BirthDate</a:ElementID> <a:ControlSource>出生日期</a:ControlSource> <a:ChildLabel>BirthDate_Label</a:ChildLabel> <a:Format>Long Date</a:Format> </a:ElementExtension> <a:ElementExtension> <a:ElementID>HireDate</a:ElementID> <a:ControlSource>雇用日期</a:ControlSource> <a:ChildLabel>HireDate_Label</a:ChildLabel> <a:Format>Long Date</a:Format> </a:ElementExtension> <a:ElementExtension> <a:ElementID>Address</a:ElementID> <a:ControlSource>地址</a:ControlSource> <a:ChildLabel>Address_Label</a:ChildLabel> </a:ElementExtension> <a:ElementExtension> <a:ElementID>City</a:ElementID> <a:ControlSource>城市</a:ControlSource> <a:ChildLabel>City_Label</a:ChildLabel> </a:ElementExtension> <a:ElementExtension> <a:ElementID>Region</a:ElementID> <a:ControlSource>地区</a:ControlSource> <a:ChildLabel>Region_Label</a:ChildLabel> </a:ElementExtension> <a:ElementExtension> <a:ElementID>PostalCode</a:ElementID> <a:ControlSource>邮政编码</a:ControlSource> <a:ChildLabel>PostalCode_Label</a:ChildLabel> </a:ElementExtension> <a:ElementExtension> <a:ElementID>Country</a:ElementID> <a:ControlSource>国家</a:ControlSource> <a:ChildLabel>Country_Label</a:ChildLabel> </a:ElementExtension> <a:ElementExtension> <a:ElementID>HomePhone</a:ElementID> <a:ControlSource>家庭电话</a:ControlSource> <a:ChildLabel>HomePhone_Label</a:ChildLabel> </a:ElementExtension> <a:ElementExtension> <a:ElementID>Extension</a:ElementID> <a:ControlSource>分机</a:ControlSource> <a:ChildLabel>Extension_Label</a:ChildLabel> </a:ElementExtension> <a:ElementExtension> <a:ElementID>Notes</a:ElementID> <a:ControlSource>备注</a:ControlSource> <a:ChildLabel>Notes_Label</a:ChildLabel> </a:ElementExtension> <a:ElementExtension> <a:ElementID>ReportsTo</a:ElementID> <a:ControlSource>上级</a:ControlSource> <a:ListRowSource>上级_ListRowsource</a:ListRowSource> <a:ListBoundField>雇员ID</a:ListBoundField> <a:ListDisplayField>姓名</a:ListDisplayField> <a:ChildLabel>ReportsTo_Label</a:ChildLabel> </a:ElementExtension> <a:ElementExtension> <a:ElementID>TitleOfCourtesy</a:ElementID> <a:ControlSource>尊称</a:ControlSource> <a:ChildLabel>TitleOfCourtesy_Label</a:ChildLabel> </a:ElementExtension> <a:ElementExtension> <a:ElementID>Image4</a:ElementID> <a:ControlSource>照片</a:ControlSource> </a:ElementExtension> <a:GroupLevel> <a:RecordSource>雇员</a:RecordSource> <a:DefaultSort></a:DefaultSort> <a:HeaderElementId>HeaderEmployees</a:HeaderElementId> <a:FooterElementId></a:FooterElementId> <a:CaptionElementId></a:CaptionElementId> <a:RecordNavigationElementId>NavigationEmployees</a:RecordNavigationElementId> <a:DataPageSize>1</a:DataPageSize> <a:GroupFilterControl></a:GroupFilterControl> <a:AlternateRowColor>whitesmoke</a:AlternateRowColor> </a:GroupLevel> <a:Datamodel a:version="0816"> <a:SchemaRowsource a:id="上级_ListRowsource" a:type="dscCommandText"> <a:CommandText>SELECT [雇员].[雇员ID], [姓氏] +','+[名字] AS 姓名 FROM 雇员 ORDER BY [雇员].[姓氏], [雇员].[名字]; </a:CommandText> <a:SchemaField a:id="雇员ID" a:datatype="3" a:size="4"/> <a:SchemaField a:id="姓名" a:datatype="202" a:size="255"/> </a:SchemaRowsource> <a:SchemaRowsource a:id="雇员" a:type="dscTable"> <a:SchemaField a:id="雇员ID" a:datatype="3" a:size="0" a:iskey="1"/> <a:SchemaField a:id="姓氏" a:datatype="130" a:size="20"/> <a:SchemaField a:id="名字" a:datatype="130" a:size="10"/> <a:SchemaField a:id="职务" a:datatype="130" a:size="30"/> <a:SchemaField a:id="尊称" a:datatype="130" a:size="25"/> <a:SchemaField a:id="出生日期" a:datatype="7" a:size="0"/> <a:SchemaField a:id="雇用日期" a:datatype="7" a:size="0"/> <a:SchemaField a:id="地址" a:datatype="130" a:size="60"/> <a:SchemaField a:id="城市" a:datatype="130" a:size="15"/> <a:SchemaField a:id="地区" a:datatype="130" a:size="15"/> <a:SchemaField a:id="邮政编码" a:datatype="130" a:size="10"/> <a:SchemaField a:id="国家" a:datatype="130" a:size="15"/> <a:SchemaField a:id="家庭电话" a:datatype="130" a:size="24"/> <a:SchemaField a:id="分机" a:datatype="130" a:size="4"/> <a:SchemaField a:id="照片" a:datatype="130" a:size="255"/> <a:SchemaField a:id="备注" a:datatype="203" a:size="0"/> <a:SchemaField a:id="上级" a:datatype="3" a:size="0"/> </a:SchemaRowsource> <a:RecordsetDef a:id="雇员"> <a:PageField a:id="雇员ID"/> <a:PageField a:id="姓氏"/> <a:PageField a:id="名字"/> <a:PageField a:id="出生日期"/> <a:PageField a:id="雇用日期"/> <a:PageField a:id="地址"/> <a:PageField a:id="城市"/> <a:PageField a:id="地区"/> <a:PageField a:id="邮政编码"/> <a:PageField a:id="国家"/> <a:PageField a:id="家庭电话"/> <a:PageField a:id="分机"/> <a:PageField a:id="备注"/> <a:PageField a:id="上级"/> <a:PageField a:id="尊称"/> <a:PageField a:id="照片"/> <a:PageField a:id="职务"/> </a:RecordsetDef> <a:RecordsetDef a:id="上级_ListRowsource"> <a:PageField a:id="雇员ID"/> <a:PageField a:id="姓名"/> </a:RecordsetDef> </a:Datamodel> </a:DataSourceControl> </xml>"></OBJECT>
<META content="MSHTML 5.00.2920.0" name=GENERATOR>
<STYLE id=MSODAPDEFAULTS type=text/css>.MsoNavRecordCount {
BORDER-BOTTOM: gainsboro 1px solid; BORDER-LEFT: gainsboro 1px solid; BORDER-RIGHT: gainsboro 1px solid; BORDER-TOP: gainsboro 1px solid; CURSOR: default; FONT-FAMILY: Tahoma; FONT-SIZE: 8pt; OVERFLOW: hidden; PADDING-LEFT: 0px; PADDING-TOP: 0px; POSITION: relative; WIDTH: 100%
}
HR {
COLOR: black
}
SELECT {
FONT-FAMILY: Tahoma; FONT-SIZE: 8pt
}
INPUT {
FONT-FAMILY: Tahoma; FONT-SIZE: 8pt
}
BODY {
FONT-FAMILY: Tahoma; FONT-SIZE: 10pt
}
MARQUEE {
FONT-FAMILY: Tahoma; FONT-SIZE: 8pt
}
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -