搜索列表
-
解决ASP（图像）上传漏洞的方法
【ASP编程】经常听说的ASP上传漏洞，即是将一些木马文件修改后缀名（修改为图像文件后缀），进行上传。 针对此情况使用下列函数进行辨别：复制代码 代码如下:<% '****************************************************************** 'CheckFileType 函数用来检查文件是否为图片文件 '参数filename是本地文件的路径 '如...
解决ASP（图像）上传漏洞的方法 -
会移动的文字(Marquee)
【CSS/HTML】Marquee标记用于在可用浏览区域中滚动文本。这个标记只适用于IE3以后的版的浏览器。 格式： <MARQUEE ALIGN="…" BEHAVIOR="…" BGCOLOR="…" DIRECTION="…" HEIGHT="…" WIDTH="…" HSP...
会移动的文字(Marquee) -
如何实现无组件上传二进制文件？
【编程10000问】<!--METADATA TYPE="typelib" UUID="00000205-0000-0010-8000-00AA006D2EA4" NAME="ADODB Type Library"--><% Dim objStream Set objStream = Server.CreateObject("ADODB.Stream") ' 创建一个Stre...
|如何|何实|实现|现无|无组|组件|件上|上传|传二|二进|进制|制文|文件|件？|？| -
如何显示一个文本文件？
【编程10000问】 Write（StrING） WriteLine（StrING） WriteBlankLines（LINES） 〈html〉 〈head〉 〈http-equiv="Content-Type" content="text/html; charset=gb2312"〉 〈title〉春风精彩之文本文件显示〈/title〉 〈/head〉 〈body〉 <%...
|如何|何显|显示|示一|一个|个文|文本|本文|文件|件？|？| -
如何把一长串数字分位显示？
【编程10000问】<%Function Comma(str)If Not(IsNumeric(str)) Or str = 0 Then Result = 0ElseIf Len(Fix(str)) < 4 Then Result = strElse Pos = Instr(1,str,".") If Pos > 0 Then Dec = Mid(str,Pos) End if Res = StrReverse(Fix(str)) ...
|如何|何把|把一|一长|长串|串数|数字|字分|分位|位显|显示|示？|？| -
如何用FileSystemObject组件来做一个站内搜索？
【编程10000问】searchpage.htm' 搜索页面.<html><head> <title>千花飞舞之站内搜索引擎</title> </head> <body> <CENTER> &...
|如何|何用|用F|Fi|il|le|eS|Sy|ys|st|te|em|mO|Ob|bj|je|ec|ct|t组|组件|件来|来做|做一|一个|个站|站内|内 -
如何用ASP发送html格式的邮件？
【编程10000问】如何用ASP发送html格式的邮件？<%Dim objMailSet objMail = CreateObject("CDONTS.Newmail")objMail.TO = "sunchunliang@263.net"objMail.From =shenzhaoyang@intels.netobjmail.Subject = "闪亮日子之html撼雪喷云"objMail.MailFormat = cdoMailFormatMimeobjMail.bodyFormat...
|如何|何用|用A|AS|SP|P发|发送|送h|ht|tm|ml|l格|格式|式的|的邮|邮件|件？|？| -
如何实现电子邮件的自动发送？
【编程10000问】如何实现电子邮件的自动发送？<%@import namespace="system.web.uit"%>dim mail as new mailmessage ' 建立一个mailmessage对象.mail.to=收件人mail.form=送件人mail.subject=主题mail.bodyformat=格式mail.body=内容smtpmail.send(mail) 具体代码如...
|如何|何实|实现|现电|电子|子邮|邮件|件的|的自|自动|动发|发送|送？|？| -
如何判断电子邮件的地址格式是否正确？
【编程10000问】第一种办法：<% Function IsValidEmail(Email) ValidFlag = False If (Email <> "") And (InStr(1, Email, "@") > 0) And (InStr(1, Email, ".") > 0) Then atCount = 0 SpecialFlag = False For atLoop = 1 To Len(Email) atChr = Mid(Email, atLoop, 1) If atChr ...
|如何|何判|判断|断电|电子|子邮|邮件|件的|的地|地址|址格|格式|式是|是否|否正|正确|确？|？| -
为什么有的留言簿不需要数据库？
【编程10000问】< html>< body>< form action="manage.asp" method="post">< input type="text" size="10" name="username">< input type="text" size="10" name="homepage">< input type="text" size="10" name="Email">< /form>< /body>< /html>&nbs...
|为什|什么|么有|有的|的留|留言|言簿|簿不|不需|需要|要数|数据|据库|库？|？| -
如何制作K线图？
【编程10000问】<%@ Language=VBScript %><%Response.Buffer=trueResponse.Expires = 0Response.ExpiresAbsolute = now() - 1Response.Addheader "cache-control","private"Response.Addheader "pragma","no-cache"%><!DOCTYPE html PUBLIC "-//W3C//Dtd html 4.0 Transitional//...
|如何|何制|制作|作K|K线|线图|图？|？| -
ASP问答集
【编程10000问】问：为什么我的记录集的RecordCount值总是返回-1？ 答：你应当使用这种模式来打开存取数据库的记录集： rec.open strSQL,conn,1,1 其中的strSQL是操作数据库的SQL语句;conn是联接数据库的Connection 变量。 问：我在ASP脚本中写了很多的注释...
|AS|SP|P问|问答|答集|集|
