搜索列表
-
如何实现全文检索?
【编程10000问】<%@ LANGUAGE="VBscript" %> <html> <head> <meta NAME="GENERATOR" Content="Microsoft FrontPage 3.0"> <meta HTTP-EQUIV="Content-Type" content="text/html; charset=gb_2312-80"> <title>星河影动之全文检索...
|如何|何实|实现|现全|全文|文检|检索|索?|?| -
如何编写翻页函数?
【编程10000问】page.inc<% Sub ShowPageBar(TotalPage,CurPage,strUrl) ' 参数TotalPage:全部页数;CurPage:当前页数;strUrl:翻页使用的连接地址. DIM strPage CurPage=GetValidPageNO(TotalPage,CurPage) Response.Write "<TABLE WIDTH=''100%''>" Response.Write "<tr><...
|如何|何编|编写|写翻|翻页|页函|函数|数?|?| -
如何用组件实现自动发送电子邮件?
【编程10000问】如何用组件实现自动发送电子邮件?JMailUploadAutoForm.asp<html><body><font face="verdana, arial" size="2"><b><form method="post" action="JmailUploadAutoFormProcess.asp" ENCTYPE="multipart/form-data"><p>撼雪喷云之动发送电子邮件</p...
|如何|何用|用组|组件|件实|实现|现自|自动|动发|发送|送电|电子|子邮|邮件|件?|?| -
如何用POP3接收电子邮件?
【编程10000问】<% Set pop3 = Server.CreateObject( "JMail.POP3" ) pop3.Connect "username", "password", "pop3mail.intels.net" ' POP3的连接用户名,密码,POP3地址. Response.Write( "你现在有" & pop3.count & " 封邮件。<br><br>" ) if pop3....
|如何|何用|用P|PO|OP|P3|3接|接收|收电|电子|子邮|邮件|件?|?| -
如何用ASP发送带附件的邮件?
【编程10000问】如何用ASP发送带附件的邮件?<% Option Explicit Dim objMail Set objMail = Server.CreateObject("CDONTS.NewMail") objMail.From = "liyanbing@163.net " objMail.Subject = "闪亮日子之星河影动" objMail.AttachFile("s:\flashdays\images\win.jpg") ...
|如何|何用|用A|AS|SP|P发|发送|送带|带附|附件|件的|的邮|邮件|件?|?| -
如何用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问】如何使用表单发送电子邮件?formToEmail.htm' 表单.<FORM METHOD="POST" ACTION="formToEmail.asp"> <P> 收件人: <INPUT SIZE=30 NAME="recipient" MAXLENGTH=200> <P> 发件人: <INPUT SIZE=30 NAME="sender" MAXLENG...
|如何|何使|使用|用表|表单|单发|发送|送电|电子|子邮|邮件|件?|?| -
如何实现电子邮件的自动发送?
【编程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问】如何用变量实现群聊和悄悄话?<%if Request.Form("xt")="on" then ' 判断是否悄悄话.Application.Lock' 是悄悄话,继续往下处理.application(session("username"))=temppos&application(session("username"))' 只有发言人和发言对象才能看到此发言,实现悄悄话. application(Request.f...
|如何|何用|用变|变量|量实|实现|现群|群聊|聊和|和悄|悄悄|悄话|话?|?| -
如何判断用户是否非正常离开聊天室?
【编程10000问】如何判断用户是否非正常离开聊天室? total = application("AllPeople")' 聊天总人数. aryHuman = split(total,";") for i = lbound(aryHuman) to ubound(aryHuman) - 1 if application("user" & i) = "online" then if int(timer)...
|如何|何判|判断|断用|用户|户是|是否|否非|非正|正常|常离|离开|开聊|聊天|天室|室?|?| -
如何判断发言是否为空?
【编程10000问】if len(usersays)<>0 then session("whoto")=request.form("whoto") session("action")=request.form("action") if instr(usersays,chr(39))>0 then usersays=replace(usersays,chr(39),"\"&chr(39)) end if if instr(usersays,chr(34))>0 then us...
|如何|何判|判断|断发|发言|言是|是否|否为|为空|空?|?|