|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
Access是一种桌面数据库,只适合数据量少的应用,在处理少量数据和单机访问的数据库时是很好的,效率也很高。但是它的同时访问客户端不能多于4个。access数据库有一定的极限,如果数据达到100M左右,很容易造成服务器iis假死,或者消耗掉服务器的内存导致服务器崩溃。smtp|发送邮件<!--发送代码-->
<%
ConstcdoSendUsingMethod="http://schemas.microsoft.com/cdo/configuration/sendusing"
ConstcdoSendUsingPort=2
ConstcdoSMTPServer="http://schemas.microsoft.com/cdo/configuration/smtpserver"
ConstcdoSMTPServerPort="http://schemas.microsoft.com/cdo/configuration/smtpserverport"
ConstcdoSMTPConnectionTimeout="http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout"
ConstcdoSMTPAuthenticate="http://schemas.microsoft.com/cdo/configuration/smtpauthenticate"
ConstcdoBasic=1
ConstcdoSendUserName="http://schemas.microsoft.com/cdo/configuration/sendusername"
ConstcdoSendPassword="http://schemas.microsoft.com/cdo/configuration/sendpassword"
DimobjConfigAsCDO.Configuration
DimobjMessageAsCDO.Message
DimFieldsAsADODB.Fields
SetobjConfig=Server.CreateObject("CDO.Configuration")
SetFields=objConfig.Fields
WithFields
.Item(cdoSendUsingMethod)=cdoSendUsingPort
.Item(cdoSMTPServer)="SMTP服务器"改成可用的内部邮件服务器域名
.Item(cdoSMTPServerPort)=25
.Item(cdoSMTPConnectionTimeout)=10
.Item(cdoSMTPAuthenticate)=cdoBasic
.Item(cdoSendUserName)="用户名"以上服务器的用户名
.Item(cdoSendPassword)="暗码"暗码
.Update
EndWith
SetobjMessage=Server.CreateObject("CDO.Message")
SetobjMessage.Configuration=objConfig
WithobjMessage
.To=Trim(Request.Form("m_user"))改成吸收者的邮件地点
.From="发件人的地点(要和下面的邮件体系不异)"改成发送人的邮件地点
.Subject=Trim(Request.Form("m_zhuzi"))题目
.TextBody=Trim(Request.Form("m_neirong"))注释
.AddAttachment"C:ScriptsOutput.txt"邮件附件
.Send
EndWith
SetFields=Nothing
SetobjMessage=Nothing
SetobjConfig=Nothing
%>
<!--发送代码-->只要你想学,就没什么优缺点,上面那位大哥已经把网上的评论说了,但我认为想学哪个都一样,不然它就不可能在当今时代数字艺术方面存活到今天 |
|