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

2016-01-29 18:55 2 1 收藏

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

【 tulaoshi.com - ASP 】

 

实例:具体功能见“我爱博客(http://www.woiblog.com)”里有相关使用介绍!

(本文来源于图老师网站,更多请访问https://www.tulaoshi.com/asp/)

1,要实现的功能就是在浏览器加一个右键快捷方式提交所选的网页或图片内容!实例应用在博客程序里,就是在你已登陆的情况下,浏览网页时看到比较好的新闻或图片!你就可以选中内容--》点右键 出现“加入我的网摘”,这时就会弹出一个IE窗口,自动将网页标题加入表单的对应标题内容,及选中内容加入相应内容项,还有引用网址等!

2,现在 我们来看一下这个功能如何实现的!

   首先我们用文本编辑器写入:
Windows Registry Editor Version 5.00

[HKEY_CURRENT_USERSoftwareMicrosoftInternet ExplorerMenuExt]

[HKEY_CURRENT_USERSoftwareMicrosoftInternet ExplorerMenuExt将此页加到我的网摘]
@="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;
  }

(本文来源于图老师网站,更多请访问https://www.tulaoshi.com/asp/)

  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;  HTML方式取得所选内容
 form1.submit();   自动提交表单到FORM里的ACTION即:User_Post_Blog2.asp
到这里已经做到了信息的获取!之后就是普通的ASP表单处理了!
像标题的VALUE就用value=<%=request("title")%
其它的照样子搬就是了!

出处:第五网络(http://www.d5web.com)转载请注明

 

来源:https://www.tulaoshi.com/n/20160129/1507800.html

延伸阅读
标签: Web开发
代码如下: % For Each x In Request.Form % Request.Form( %= x % ) = %= Request.Form(x) % BR % Next % 或 % For i = 1 To Request.Form("inputname").Count   Response.Write Request.Form("input...
标签: ASP
  列表 B:使用 request.form 来轻松建立SQL字符串。 <% iStr = "insert into uData " vStr = "values (" nStr = "(" ' 在表单集合中循环,并建立起SQL语句的组成部分 for each x in request.form          ' 建立字段名列表     &n...
标签: Web开发
我的解决办法如下(只针对客户端): 用户点击提交按钮后给按钮添加disabled属性 代码如下: $("input:submit").each(function() { var srcclick = $(this).attr("onclick"); if(typeof(srcclick)=="function"){ $(this).click(function() { if (srcclick()) { setdisabled(this); return true; } return false; });} }); functi...
标签: ASP
列表 B:使用 request.form 来轻松建立SQL字符串。 iStr = "insert into uData " vStr = "values (" nStr = "(" 在表单集合中循环,并建立起SQL语句的组成部分 for each x in request.form           建立字段名列表          nStr = nStr &a...
标签: ASP
列表 D: buildSQLInsert函数的最终版。 function buildSQLInsert( targetTable, omitFields)          iStr = "insert into " & targetTable & " "          vStr = "values ("         &nb...

经验教程

74

收藏

11
微博分享 QQ分享 QQ空间 手机页面 收藏网站 回到头部