仓酷云

 找回密码
 立即注册
搜索
热搜: 活动 交友 discuz
查看: 548|回复: 9
打印 上一主题 下一主题

[学习教程] ASP网页编程之利用ASP和Word举行服务器端拼写反省

[复制链接]
老尸 该用户已被删除
跳转到指定楼层
楼主
发表于 2015-1-16 23:15:58 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有帐号?立即注册

x
实现规模效益。与传统的用户拥有硬件软件所有权和使用权以及传统的应用服务商提供一对一的服务模式不同,ASP拥有应用系统所有权,用户拥有使用权,应用系统集中放在ASP的数据中心中,集中管理,分散使用,以一对多的租赁的形式为众多用户提供有品质保证的应用技术服务,实现规模效益。word|服务器本文会商的成绩与以下方面相干:

MicrosoftWord97forWindows

MicrosoftVisualInterDev,version6.0

MicrosoftInternetInformationServerversion4.0


提要
本文形貌了怎样利用MicrosoftWord在Web页面ASP文件中增加拼写反省功效。

具体的步骤
依照以下步骤创建ASP使用程序:

1、在Web服务器地点呆板上,启动MicrosoftVisualInterdev6.0,选择File/NewProject。

2、在“新工程”对话框的名字编纂域中,输出“WebSpell”,然后双击新Web工程图标。

3、在接着呈现的Web工程导游对话框中,输出大概选择你的Web服务器名字。将事情形式默许为Master,点击Next,再点击
“finish”。

4、在VisualInterDev创立工程完成后,翻开工程菜单,选择“增加WebItemHTML页面”,定名为“CheckSpelling”,
然后点击Open。

5、增加的HTML页面默许形态下以计划视图翻开。在页面上拖出一个HTML文本地区,安排一个HTML提交按钮,依据你的喜好
举行结构,在页面上输出一些笔墨,告知用户在文本域中输出必要举行拼写反省的笔墨。

6、选择页面上的一切工具(CTRL+A),然后从VisualInterDev的HTML菜单当选择Form,将工具包裹在表单中。

7、点击以后窗口底部的源码功效页面,切换到源码显现视图。修正HTML开放<FORM>标志的action属性值为
results.asp。

8、翻开Project菜单,选择“增加WebItemActiveServerPage”,定名为“results”,然后点击“Open”。

9、关于新页面,切换到源码视图,在<BODY>标志之间输出上面的代码:

<!--Pageheader-->

<p><center><fontsize=+4color=red>SpellingResults</font></center><hr>

<!--Showuserthetexttheyentered-->

<p>Thetextyouenteredwas:<p>

<fontcolor=blue><%=Request("TEXTAREA1")%></font><p><hr><p>

<!--Beginserver-sidescripttocheckspellingerrors-->

<%

Dontallowothersessionstore-enter:)

dowhile(Application("WordInUse")=1)

loop

Application("WordInUse")=1


GetWordreferencescreatedinglobal.asa.

dimwdApp

setwdApp=Application("WordApp")

dimwdDoc

setwdDoc=Application("WordDoc")


Clearcurrentcontents.

dimwdRange

setwdRange=wdApp.Selection.Range

wdRange.WholeStory

wdRange.Delete

setwdRange=Nothing


Addthetextthewebuserentered.

dimtxt

txt=Request("TEXTAREA1")

wdApp.Selection.TypeTextCStr(txt)


Checkspellingwithoutprompting.

wdDoc.CheckSpelling,,0


Getspellingerrorscollection.

dimwdErrors

setwdErrors=wdDoc.SpellingErrors

%>


<%Handleno-errorcondition.

ifwdErrors.Count=0then

%>

Therewerenospellingerrors.

<%

Otherwisebuildatableofsuggestions.

else

%>

<!--Buildatabletoshowerrors&suggestions-->

<fontcolor=red>Therewere<%=wdErrors.Count%>spellingerror(s).</font><p>

<TABLEborder=1cellPadding=1cellSpacing=1width=75%>

<TR>

  <TD><b><fontsize=+1>Word</font></b></TD>

  <TD><b><fontsize=+1>Suggestions</font></b></TD></TR>

<%

  foreachwdErrorinwdErrors

    Writethewordinquestion.

    Response.Write("<TR><TD>")

    Response.Write(wdError.Text)

    Response.Write("</TD><TD>")


    Getspellingsuggestionsforit.

    dimwdSuggestions

    setwdSuggestions=wdApp.GetSpellingSuggestions(wdError.Text)

  

    ifwdSuggestions.Count0then

      acomma-separatedlistofsuggestions.

      dimstrSuggestions

      strSuggestions=","

      foreachwdSuggestioninwdSuggestions

      strSuggestions=strSuggestions&wdSuggestion.Name&","

      next


      Removeextracomma&space.

      strSuggestions=Right(strSuggestions,len(strSuggestions)-2)


      Writeoutsuggestions.

      Response.Write(strSuggestions)

    else

      Response.Write("None.")

    endif

    setwdSuggestions=Nothing

    Response.Write("</TD></TR>")
</p>减少客户内IT专业人才缺乏带来的影响。ASP的客户员工利用浏览器进入相关的应用软件,简单易用,无需专业技术支持。
简单生活 该用户已被删除
沙发
发表于 2015-1-20 08:45:08 | 只看该作者
运用经典的例子。并且自己可以用他来实现一些简单的系统。如果可以对他进行进一步的修改,找出你觉得可以提高性能的地方,加上自己的设计,那就更上一个层次了,也就会真正地感到有所收获。
爱飞 该用户已被删除
板凳
发表于 2015-1-24 16:37:37 | 只看该作者
你可以通过继承已有的对象最大限度保护你以前的投资。并且C#和C++、Java一样提供了完善的调试/纠错体系。
飘飘悠悠 该用户已被删除
地板
发表于 2015-1-29 15:16:07 | 只看该作者
跟学别的语言一样,先掌握变量,流程控制语句(就是ifwhileselect)等,函数/过程,数组
分手快乐 该用户已被删除
5#
发表于 2015-1-30 23:21:22 | 只看该作者
它可通过内置的组件实现更强大的功能,如使用A-DO可以轻松地访问数据库。
金色的骷髅 该用户已被删除
6#
发表于 2015-2-6 16:46:04 | 只看该作者
多看多学多思。多看一些关于ASP的书籍,一方面可以扩展知识面一方面可以鉴借别人是如何掌握、运用ASP的;多学善于关注别人,向同学老师多多学习,不论知识的大小;多思则是要将学到的知识灵活运用。
深爱那片海 该用户已被删除
7#
发表于 2015-2-17 09:42:07 | 只看该作者
学习ASP其实应该上升到如何学习程序设计这种境界,其实学习程序设计又是接受一种编程思想。比如ASP如何学习,你也许在以前的学习中碰到过。以下我仔细给你说几点:
莫相离 该用户已被删除
8#
发表于 2015-3-5 19:02:11 | 只看该作者
Server:这个表示的服务器,操作服务器的一些东西使用这个,如Server.Mappath转换服务器路径,Server.CreateObject实例化一个组件
灵魂腐蚀 该用户已被删除
9#
发表于 2015-3-12 11:26:04 | 只看该作者
如何学好ASP,以前也有人问过,把回答给你转过来看看能否对你有帮助:
变相怪杰 该用户已被删除
10#
发表于 2015-3-19 21:27:40 | 只看该作者
跟学别的语言一样,先掌握变量,流程控制语句(就是ifwhileselect)等,函数/过程,数组
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|Archiver|手机版|仓酷云 鄂ICP备14007578号-2

GMT+8, 2024-12-23 00:39

Powered by Discuz! X3.2

© 2001-2013 Comsenz Inc.

快速回复 返回顶部 返回列表