ASP网页编程之有用技能：使用ASP完成邮箱会见
减少客户内IT专业人才缺乏带来的影响。ASP的客户员工利用浏览器进入相关的应用软件，简单易用，无需专业技术支持。会见|技能您在会见网站时是不是会在有些页面上见到这类功效---您在能够会见此网站的同时，还能够检察您收费邮箱中是不是有新邮件。这个功效是否是让您以为很心动、很奥秘呢？上面，我就用ASP来举个例子让您晓得是怎样完成这一功效的。起首你能够往一些供应收费邮件服务的站点，请求一个账号然后登录。在翻开邮箱时，请您注重地点栏中的内容。如今以371为例，你会发明其内容一般是：http://www.371.net/prog/login?user=fighter&pass=mypassword。
个中"fighter"是您的账号，"mypassword"是您的暗码。这时候我们能够从这里失掉3个信息。第1条是我们失掉了处置文件的url及文件名:"http://www.371.net/prog/login"；第2条是纪录您账号的变量名:user；第3条是纪录您暗码的变量名:pass。我们晓得这些信息后，便可动手写html文件和asp文件了。
/*Html源文件内容以下：*/<HTML><HEAD><METANAME="GENERATOR"Content="MicrosoftVisualStudio6.0"></HEAD><title>CityClub首页</title><styletype="text/css"><!--td{font-size:9pt}body{font-size:9pt}select{font-size:9pt}A{text-decoration:none;color:#003366;font-size:9pt}A:hover{text-decoration:underline;color:#FF0000;font-size:9pt}--></style><scriptlanguage="javascript">functioncheck(tt){if(window.document.form1.selectmail.selectedIndex==0){alert("请选择您的邮箱服务器！")window.document.form1.selectmail.focus()returnfalse}if(tt.account.value==""){alert("帐号不克不及为空！请填写。")tt.account.focus()returnfalse}if(tt.account.value.length<3){alert("帐号长度不克不及小于3位！请填写。")tt.account.focus()returnfalse}if(tt.password.value==""){alert("暗码不克不及为空！请填写。")tt.password.focus()returnfalse}if(tt.password.value.length<3){alert("暗码长度不克不及小于3位！请填写。")tt.password.focus()returnfalse}elsereturntrue}</script><BODYtopmargin=12><tableborder=0bgcolor=d3d3d3><td><formaction="PostOffice.asp"method=postname=form1target="_blank"><!--此处用target="_blank"，是为了弹出新窗口来检察您的邮箱--><selectstyle="font-size:9pt;background-color:add8e6"name="selectmail"><optionname="mailsite"value="CityClub便平易近邮局"selected>CityClub便平易近邮局</option><optionname=MailSitevalue=990.net/prog/login?;user;pass;>990</option><optionname=MailSitevalue=www.371.net/prog/login?;user;pass;>371</option><optionname=MailSitevalue=www.188.net/prog/login?;user;pass;>188</option><optionname=MailSitevalue=web.163.net/cgi/login?;user;pass;>163</option><optionname=MailSitevalue=freemail.263.net/cgi/login?;user;pass;>263</option><optionname=MailSitevalue=mail.777.net.cn/v2.0/html/mailbox.php3?;user;pass;>777</option><optionname=MailSitevalue=www.126.com/cgi/login?;email;password;>126</option><optionname=MailSitevalue=www.2911.net/cgi-bin/login?;username;password;>2911</option><optionname=MailSitevalue=hotmail.yn.cninfo.net/prog/login?;user;pass;>云南169</option><optionname=MailSitevalue=freemail.china.com/prog/login?;user;pass;>china</option><optionname=MailSitevalue=freemail.hongkong.com/prog/login?;user;pass;>喷鼻港收费电邮</option><optionname=MailSitevalue=freemail.netease.com/prog/login?;user;pass;>Netease</option><optionname=MailSitevalue=lc3.law5.hotmail.com/cgi-bin/dologin?;login;passwd;>hotmail</option><optionname=MailSitevalue=www.netaddress.com/tpl/Door/login?;UserID;passwd;>use.net</option><optionname=MailSitevalue=www.88998.com/cgi-win/login?;username;password;>88998.com</option><optionname=MailSitevalue=www.mail.com/mailcom/login.jhtml?;mn;pw;>@mail.com</option></select><br>帐号:<inputtype=textname=accountsize=12style="font-size:9pt"><br>暗码:<inputtype=passwordname=passwordsize=12style="font-size:9pt"><br></td><tr><tdalign=center><inputtype=submitvalue="收信"style="font-size:9pt"><inputtype=resetvalue="重填"style="font-size:9pt"></td></form></td></table></BODY></HTML>/*Html源文件内容停止*/
/*PostOffice.asp源文件内容以下：*/<%@Language=VBScript%><%Response.Buffer=true----------------------------------------------------Author:Peter.yuCreatedDate:2000/3/13FileName:PostOffice.aspAllRightsReserved.一切权回CityClub----------------------------------------------------%><HTML><HEAD><METANAME="GENERATOR"Content="MicrosoftVisualStudio6.0"></HEAD><title>CityClub便平易近邮局（AllRightsReserved一切权回CityClub）</title><BODY><%dimstr(3)str1=trim(Request.Form("selectmail"))/*猎取的邮件服务器及用户账号和暗码信息*/fori=1to3/*将以上猎取的信息举行支解，并付与给数组变量*/p=instr(1,str1,";")str(i-1)=mid(str1,1,p-1)str1=mid(str1,p+1)nextifinstr(1,str(0),"http://")=0thenwebSiteUrl="http://"&str(0)elsewebSiteURL=str(0)/*邮件服务器地点及指定处置的文件名*/endifusernam=str(1)/*账号变量名*/password=str(2)/*暗码变动名*//*兼并字符，失掉诸如"http://www.371.net/prog/login?user=fighter&pass=mypassword的字符"*/mailUrl=webSiteUrl&usernam&"="&trim(Request.Form("account"))mailUrl=mailUrl&chr(38)&password&"="&trim(Request.Form("password"))Response.RedirectmailUrl/*翻开邮箱*/%></BODY></HTML>/*PostOffice.asp源文件内容停止*/
不是很难吧。实在这个不是很难的，关头在于您能多多察看，找出个中的纪律。如许我们就能够使用这些纪律做良多良多成心义风趣的事了。在实现ERP等高端的ASP应用时，用户需要提供核心的经营资料，需要ASP商有很高的信用度。楼上说交互性不好，太牵强了吧。在微软提供的一套框架中，利用asp做网站，开发效率高，使用人数少，减少不必要的开销。交互性是互动方式，是有开发人员决定的。 如何更好的使自己的东西看上去很不错等等。其实这些都不是问题的实质，我们可以在实践中不断提升自己，不断充实自己。 尽管MS自己讲C#内核中更多的象VC，但实际上我还是认为它和Java更象一些吧。首先它是面向对象的编程语言，而不是一种脚本，所以它具有面向对象编程语言的一切特性，比如封装性、继承性、多态性等等，这就解决了刚才谈到的ASP的那些弱点。 最近在学asp，不要问我为什么不直接学.net，因为公司网站是asp做的所以有这个需要，卖了本书asp入门到精通，对里面的六大内置对象老是记不住，还有很多属性和方法看的头晕。 我可以结合自己的经验大致给你说一说，希望对你有所帮助，少走些弯路。 那么，ASP.Net有哪些改进呢？ 还有如何才能在最短的时间内学完?我每天可以有效学习2小时，双休日4小时。 多看多学多思。多看一些关于ASP的书籍，一方面可以扩展知识面一方面可以鉴借别人是如何掌握、运用ASP的;多学善于关注别人，向同学老师多多学习，不论知识的大小;多思则是要将学到的知识灵活运用。 下面简单介绍一下我学习ASP的方法,希望对想学习ASP的朋友有所帮助...
页:
[1]