当前位置: 首页 > 图文教程 > 网络编程 > ASP > 关于文摘插件提交表单的开发

ASP
BytesToBstr获取的源码转换为中文的代码
PostHttpPage用asp是实现模拟登录效果的代码
asp下实现UrlEncoding转换编码的代码
GetBody asp实现截取字符串的代码
asp之GetArray提取链接地址,以$Array$分隔的代码
DefiniteUrl asp将相对地址转换为绝对地址的代码
ReplaceSaveRemoteFile 替换、保存远程图片 的代码
ReSaveRemoteFile函数之asp实现查找文件保存替换的代码
FormatRemoteUrl函数之asp实现格式化成当前网站完整的URL-将相对地址转换为绝对地址的代码
ReplaceTrim 函数之asp实现过滤掉字符中所有的tab和回车和换行的代码
CheckFile函数之asp实现检查某一文件是否存在的代码
SaveRemoteFile函数之asp实现保存远程的文件到本地的代码
FpHtmlEnCode 函数之标题过滤特殊符号的代码
GetPaing 函数之asp采集函数中用到的获取分页的代码
ScriptHtml 函数之过滤html标记的asp代码
asp实现检查目录是否存在与建立目录的函数
ShowPage 显示“上一页 下一页”等信息的封装代码
JoinChar 向地址中加入 ? 或 & 用于实现传参
CreateKeyWord asp实现的由给定的字符串生成关键字的代码
Server.Execute方法执行指定的ASP程序

ASP 中的 关于文摘插件提交表单的开发


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-11-03   浏览: 137 ::
收藏到网摘: n/a

       实例:具体功能见“我爱博客(http://www.woiblog.com)”里有相关使用介绍!
  
  1,要实现的功能就是在浏览器加一个右键快捷方式提交所选的网页或图片内容!实例应用在博客程序里,就是在你已登陆的情况下,浏览网页时看到比较好的新闻或图片!你就可以选中内容--》点右键 出现“加入我的网摘”,这时就会弹出一个IE窗口,自动将网页标题加入表单的对应标题内容,及选中内容加入相应内容项,还有引用网址等!
  
  2,现在 我们来看一下这个功能如何实现的!
  
   首先我们用文本编辑器写入:
  Windows Registry Editor Version 5.00
  
  [HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\MenuExt]
  
  [HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\MenuExt\将此页加到我的网摘]
  @="http://www.woiblog.com/UserManage/addblog.asp"
  
  。另存为.REG文件,即写入注册表项添加右键菜单
  
  http://www.woiblog.com/UserManage/addblog.asp为处理页
  源文件如下:
  
  <html>
  <head>
  <meta HTTP-EQUIV="content-type" CONTENT="text/html; charset=utf-8">
  <title></title>
  </head>
  <body lang="zh-CN">
  <form id=form1 action="User_Post_Blog2.asp" method="post">
  <P>
  <input type="hidden" name="title" id=title1>
  <input type="hidden" name="url" id=url1>
  <input type="hidden" name="js" id=js1>
  <TEXTAREA id=content1 style="DISPLAY: none" name="content"></TEXTAREA> </P>
  </form>
  </body>
  </html>
  
  <script language="Javascript">
  
   var oWin = external.menuArguments;
   var oDoc = oWin.document;
   var titlestr;
   var start, end;
   var getzy;
   start = end = -1;
   titlestr = oWin.document.selection.createRange().text;
   for( var i = 0; i < titlestr.length; i++ )
   {
   if( start == -1 )
   if( titlestr.charAt( i ) == '\n' || titlestr.charAt( i ) == '\r' )
   continue;
   else
   start = i;
   else if( titlestr.charAt( i ) == '\n' || titlestr.charAt( i ) == '\r' )
   {
   end = i;
   break;
   }
  
   }
  
   if( start != -1 && end != -1 && start < end )
   form1.title1.value = oDoc.title;
   else
   form1.title1.value = oDoc.title;
  
  
   for( var i = 0; i < oDoc.images.length; i++ )
   {
   oDoc.images( i ).src = oDoc.images( i ).src;
   }
  
   for( var i = 0; i < oDoc.links.length; i++ )
   {
   oDoc.links( i ).href = oDoc.links( i ).href;
   }
  
   form1.url1.value = oDoc.URL ;
   getzy = oDoc.selection.createRange().text;
   form1.js1.value = getzy.substr(0, 250)+"..." ;
   form1.content1.innerText = oWin.document.selection.createRange().htmlText;
  
   form1.submit();
  </script>
  相信很多人都看懂了,上面是一个普通的表单,下面是一个script,关键还在下面
  oDoc.title 网页标题
  oDoc.URL网页地址
   getzy = oDoc.selection.createRange().text; '以文本方式取得所选 的内容
   form1.js1.value = getzy.substr(0, 250)+"..." ; '取得前250个字符,之…结束,作为简介
   form1.content1.innerText = oWin.document.selection.createRange().htmlText;