📄 用asp生成excel数据 .htm
字号:
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<!-- saved from url=(0055)http://www.51base.com/article/view_article.asp?id=22582 -->
<HTML lang=zh-cn><HEAD><TITLE>NB联盟</TITLE>
<META content="text/html; charset=gb2312" http-equiv=Content-Type><LINK
href="NB联盟23.files/style.css" rel=stylesheet>
<META content="MSHTML 5.00.2614.3500" name=GENERATOR></HEAD>
<BODY><!-- start page body -->
<TABLE align=center border=0 cellPadding=0 cellSpacing=0 class=td id=position
width=773>
<TBODY>
<TR>
<TD class=shadow colSpan=2 height=20 width=262> <A
href="http://www.51base.com/"><IMG border=0
src="NB联盟23.files/logo1.gif"></A> </TD>
<TD align=right width=505>
<P align=left></P></TD></TR></TBODY></TABLE>
<TABLE align=center border=0 cellPadding=0 cellSpacing=0 id=main width=770>
<TBODY>
<TR>
<TD class=tdlbr vAlign=top>
<TABLE align=center border=0 cellPadding=0 cellSpacing=0 id=welcome
style="TABLE-LAYOUT: fixed" width="98%">
<TBODY>
<TR>
<TD style="TABLE-LAYOUT: fixed; WORD-BREAK: break-all"
vAlign=top><FONT color=red><B>文章标题</B></FONT><FONT color=red><B>:
用ASP生成Excel数据 </B></FONT>
<HR noShade SIZE=1>
<P>Attributes Property<BR>Sets or returns the attributes of files or
folders. Read/write or read-only, depending on the
attribute.<BR><BR>object.Attributes [=
newattributes]<BR><BR>Arguments<BR>object<BR><BR>Required. Always
the name of a File or Folder
object.<BR><BR>newattributes<BR><BR>Optional. If provided,
newattributes is the new value for the attributes of the specified
object.<BR><BR>Settings<BR>The newattributes argument can have any
of the following values or any logical combination of the following
values:<BR><BR>Constant Value Description<BR>Normal 0 Normal file.
No attributes are set.<BR>ReadOnly 1 Read-only file. Attribute is
read/write.<BR>Hidden 2 Hidden file. Attribute is
read/write.<BR>System 4 System file. Attribute is
read/write.<BR>Directory 16 Folder or directory. Attribute is
read-only.<BR>Archive 32 File has changed since last backup.
Attribute is read/write.<BR>Alias 1024 Link or shortcut. Attribute
is read-only.<BR>Compressed 2048 Compressed file. Attribute is
read-only.<BR><BR><BR>Remarks<BR>Attempts to change any of the
read-only attributes (Alias, Compressed, or Directory) are
ignored.<BR><BR>When setting attributes, it is generally a good idea
to first read the current attributes, then change the individual
attributes as desired, and finally write the attributes
back.<BR><BR>The following code illustrates the use of the
Attributes property with a file:<BR><BR>Function
ToggleArchiveBit(filespec)<BR> Dim fso,
f<BR> Set fso =
CreateObject("Scripting.FileSystemObject")<BR> Set f =
fso.GetFile(filespec)<BR> If f.attributes and 32
Then<BR> f.attributes =
f.attributes -
32<BR> ToggleArchiveBit =
"Archive bit is cleared."<BR>
Else<BR> f.attributes =
f.attributes +
32<BR> ToggleArchiveBit =
"Archive bit is set."<BR> End If<BR>End Function</P>
<P></P></TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE><BR>
<TABLE align=center border=0 cellPadding=2 cellSpacing=0 id=footer width=770>
<TBODY>
<TR>
<TD align=middle class=tdt>
<P align=center></P></TD></TR></TBODY></TABLE><BR></BODY></HTML>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -