国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 編程 > JavaScript > 正文

簡單幾行JS Code實現IE郵件轉發新浪微博

2019-11-20 22:34:36
字體:
來源:轉載
供稿:網友
最近剛開通新浪圍脖,突發奇想,想做個瀏覽器插件實現文字新聞等的轉發圍脖的插件。本以為應該用C++寫個插件的(c#那么大個殼有時真的讓人頭疼),但是google了一下,手氣真的不錯,搜到了,幾篇關于IE插件的開發。用的Javascript,和添加注冊表就可以完全搞定。插件用javascript寫那就不用多說,瀏覽器本身就支持的,不用額外安裝。添加注冊表手動可以添加,但是麻煩所以寫了一個批處理搞定。

1:添加注冊表:HKEY_CURRENT_USER/Software/Microsoft/Internet Explorer/MenuExt/<Menu Text> 設置默認值為html文件路徑,添加值Contexts為)0xf3.

2:code  :  在MSDN http://msdn.microsoft.com/en-us/library/aa753589(v=VS.85).aspx中有所講解。MSDN原文:Set the default value of the key to the URL of the page that contains the script you want the context menu entry to execute. This script can obtain the parent window object, the screen where the context menu item was executed, from the menuArguments property of the external object.

大概就是說我們可以用window.external.menuArguments這個對象獲取到內部的信息,如window,document這些常用的對象。所以我們就可以馬上開工了,三下五去二不幾分鐘就搞定(代碼很簡單就直接Code了):

復制代碼 代碼如下:

<SCRIPT LANGUAGE = "JavaScript">
var oWindow = window.external.menuArguments;
var oDocument = oWindow.document;
var oSelect = oDocument.selection;

var oSelectRange = oSelect.createRange();
var sNewText = oSelectRange.text;//.substring(0,140);

var title=sNewText.length == 0?oDocument.title:sNewText;
if (title.length>0){
oWindow.open("http://service.weibo.com/share/share.php?title="+encodeURIComponent(title)+"&url="+encodeURIComponent(oDocument.URL)+"&source="+encodeURIComponent("破

狼")+"&appkey=1027675428&sourceUrl="+encodeURIComponent(oDocument.URL));
}
</SCRIPT>


看一個效果:



缺點:在這里只是簡單獲取的下文本值的內容,還沒有找到獲取選中html或者對象的方式,正在查找,如果有知道的請不吝賜教。我打算是可以解析出視頻,圖片等,發送。

下載【直接點擊批處理運行,重啟IE

參考文獻:

http://msdn.microsoft.com/en-us/library/aa753589(v=VS.85).aspx
http://blogs.msdn.com/b/oldnewthing/archive/2004/05/24/140283.aspx

發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板: 漠河县| 绍兴县| 苏尼特右旗| 夏津县| 北碚区| 长宁区| 旅游| 鄂伦春自治旗| 红桥区| 巴东县| 荆州市| 扎鲁特旗| 阿鲁科尔沁旗| 林甸县| 阿克陶县| 桐乡市| 多伦县| 库伦旗| 开江县| 松原市| 改则县| 龙游县| 秭归县| 沙湾县| 马鞍山市| 岳阳县| 商南县| 塔河县| 厦门市| 雷州市| 玉树县| 普兰店市| 元阳县| 丹凤县| 辉县市| 肃宁县| 丹江口市| 阿瓦提县| 莒南县| 水城县| 丰宁|