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

ASP实现语音分时问候


<bgsound src="wen.mid" loop="0">
  <% dim weh
  If Time >=#1:00:00 AM# And Time < #6:00:00 PM# Then
   weh = "<bgsound src="1.mid" loop="0">"
  Else If Time >#6:00:00 AM# And Time < #9:00:00 PM#
   weh = "<bgsound src="2.mid" loop="0">"
   Else If Time >#9:00:00 AM# And Time < #12:00:00 PM#
   weh = "<bgsound src="3.mid" loop="0">"
  Else If Time >#12:00:00 AM# And Time < #14:00:00 PM#
   weh = "<bgsound src="4.mid" loop="0">"
  Else If Time >=#14:00:00 AM# And Time < #17:00:00 PM#
   weh = "<bgsound src="4.mid" loop="0">"
  Else If Time >=#17:00:00 AM# And Time < #19:00:00 PM#
   weh = "<bgsound src="5.mid" loop="0">"
  Else If Time >=#19:00:00 AM# And Time < #24:00:00 PM#
   weh = "<bgsound src="6.mid" loop="0">"
  End If
  %>
  <%=wen %>
  
  上面的 X.MID 是的问候语音 


相关文档:

用ASP做一个记事本编缉器

<%@ Language=VBScript %>
<SCRIPT id=DebugDirectives runat=server language=javascript>
// Set these to true to enable debugging or tracing
@set @debug=false
@set @trace=false
</SCRIPT>
<HTML>
<HEAD>
<META name=VI60_defaultClientScript content=VBScript>
< ......

ASP的DES加密解密

ASP的DES加密解密
2007-05-18 09:49
原文:http://hi.baidu.com/myfav/blog/item/3ebc58828edd79a30cf4d290.html
前两天学到对称密码DES算法,然后就自己亲手写了个实现程序出来,好多地方用得着呐。这里是用ASP实现,当然也就是可以移到VB啦。懂得怎样写后写成什么语言都行啦,只要懂得那门语言。如果有朋友想知道具体D ......

asp中判断input标签输入是否为数字

<input name="total" type="text" value="<%=webcounter%>" size="12" onbeforepaste="clipboarddata.setdata('text',clipboarddata.getdata('text').replace(/[^\d]/g,''))"
   onkeydown="subOnKeyDown()"
   onkeyup="value=value.replace(/[^\d]/g,'')"/>
使用后 如果输入为非数字 ......

asp页面自动跳转

最简单的做法是在页面的<head></head>标签中加入以下代码:
<meta http-equiv="Refresh" content="10;url='xxx.asp'">
这样就会在页面打开后10秒钟跳转到xxx.asp了。
也可以用javascript的settimeout来完成,在页面中加入以下代码:
<script language=javascript>
var the_timeout = setTime ......

ASP验证码代码

将以下代码放到一个单独的页面checkcode.asp
<%
Option Explicit
Response.buffer=true
Call Com_CreatValidCode("validateCode")
Sub Com_CreatValidCode(pSN)
' 禁止缓存
Response.Expires = -9999
Response.AddHeader "Pragma","no-cache"
Response.AddHeader "cache-ctrol","no-cache"
Response.ContentTy ......
© 2009 ej38.com All Rights Reserved. 关于E健网联系我们 | 站点地图 | 赣ICP备09004571号