易截截图软件、单文件、免安装、纯绿色、仅160KB

ASP:Crazy蛙!模版操作类(最简单的模板类、仅提供交流)

文件名:Awa_temp.Class.asp
 <%
'Crazy蛙!模板操作类
'作者Crazy~蛙! QQ:379969387 欢迎交流
'版本V1.0;
Class AwaTemp
Public aa
Private FSO,StrTemp,FileData,GetDatas,StrHtmlName,htmlwrite,StrLabel,StrLValues
'===========================================
'构造函数_初始化FSO组件
'===========================================
Private Sub Class_Initialize()
  Set FSO=Server.CreateObject("Scripting.FileSystemObject")
End Sub
'===========================================
'构析函数_销毁FSO组件
'===========================================
Private Sub Class_terminate()
  Set FSO=nothing
End Sub
'===========================================
'类属性
'===========================================
'版本信息
Public Property Get Version
    Version="Crazy~蛙! 模板操作类!V1.0版本;"
End Property
'获取模板地址以及名称
Public Property Let Temp(ByVal Values)
  StrTemp=Values
End Property
'获取生成文件的文件名
Public Property Let HtmlName(ByVal Values)
  StrHtmlName=Values
End Property
'获取标签
Public Property Let Label(ByVal Values)
  StrLabel=Values
End Property
'获取将标签替换的值
Public Property Let LValues(ByVal Values)
  StrLValues=Values
End Property
'===========================================
'类方法
'===========================================
'检查模板设置以及是否存在
Private Function Check()
   If StrTemp="" Then
      Check="<span style='color:red;'>错误:未设置模板文件存储位置!</span>"
   Else
      If FSO.FileExists(StrTemp)=false Then
      Check="<span style='color:red;'>错误:指定模板不存在!</span>"
   Else
      Check=true
   End If
   End If 
End Function
'读取模板页
Public Sub ReadTemp()
   If Check()<>true Then
      Response.Write Check()
&nb


相关文档:

如何用ASP操作XML(三)

DO自动产生的XML包含了schema信息,它描述这个XML里允许有什么节点和属性以及采用何种数据类型,而且数据节点也增加了名称空间。
schema信息在需要数据验证的地方或进行更复杂的处理或许很有用,但是,大多数情况下,我们使用的是瘦客户机,我们不需要schema信息。我们可以
利用XSLT来分离出我们想要的信息,去掉多余的信 ......

Flash与ASP进行连接数据库操作

1、flash发送数据到asp
loadVariables ("url" ,"target" [, variables])
2、asp得到数据,并处理后,将数据发送到flash
如:Response.Write("login=true&des=success")
3、flash处理从asp收到的数据
如:_root.gotoAndPlay(eval("login")) ......

asp播放器代码大全

1.avi格式
<object id="video" width="400" height="200" border="0" classid="clsid:CFCDAA03-8BE4-11cf-B84B-0020AFBBCCFA">
<param name="ShowDisplay" value="0">
<param name="ShowControls" value="1">
<param name="AutoStart" value="1">
<param name="AutoRewind" value="0"> ......

ASP和HTML表单 (ASP and HTML Forms)

在 ASP 中,有两个很常用的集合,一个是 Request.QueryString,另一个是 Request.Form。这两个集合可以获取 HTML 表单(HTML Forms) 提交的信息。
有关 HTML 表单,请参见 HTML 教程中的 HTML表单 一章。
Request.QueryString
HTML 表单中的 method 有两种,一种是 get,另外一种是 post。当 HTML 表单的 metho ......

使用ASP验证email邮箱地址

<%
'true=是邮件;false=不是;
Function validate(ByVal str)
Dim temp,reg
Set reg = new regexp
reg.ignorecase=true
reg.global=true
reg.pattern = "^\w+([-+.]\w+)*@\w+([-.]\w+)*\.\w+([-.]\w+)*$"
validate = reg.test(Trim(str))
Set reg = Nothing
End Function
'************************ ......
© 2009 ej38.com All Rights Reserved. 关于E健网联系我们 | 站点地图 | 赣ICP备09004571号