标题: 网络小霸王词典要出世 [打印本页]
作者: wert123 时间: 2007-6-23 17:09 标题: 网络小霸王词典要出世
在网上找了那么多网上词典，我觉得 http://bj.dict.cn/ 不错，大家可以参考http://bj.dict.cn/tools.html，不过速度没有http://dict.baidu.com/快,但是比dict.baidu更适合我。
谁能以这个（http://dict.cn/mini.php?q=查询的词——网页小，所以加载快）网页为基础，写个代码用，大家帮我写写吧
1 简单dos版：
@echo off & @color f0
set a=
set/p a=请输入要查询的词---
start http://dict.cn/mini.php?q=%a%
2 谁能写个hat版的啊，比如利用textarea里输入个单词后，写如网页，用划词翻译功能，自动弹出小窗口，参考http://bj.dict.cn/tools.html，好像要加入代码
<script src="http://dict.cn/hc/" type="text/javascript"></script>
<script type="text/javascript">
dictInit();
</script>
3 谁能通过改下面注册表的值，加入IE菜单后，选种单词后，点击可出现划词翻译功能效果
HKEY_CURRENT_USER\Software\Microsoft\Internet
Explorer\MenuExt\Dict.CN
[ Last edited by wert123 on 2007-6-23 at 06:19 PM ]
作者: slore 时间: 2007-6-23 18:03
你给的那个地址不是都有麽？
作者: zh159 时间: 2007-6-23 18:05
保存为hta文件
<html>
<title>Dict.cn 海词 - zh159@bbs.cn-dos.net</title>
<HTA:APPLICATION
ID="MyhyliApp"
APPLICATIONNAME="Dict.cn 海词"
BORDER="thin"
BORDERSTYLE=""
VERSION="1.0"
SCROLL="no"
INNERBORDER="no"
CONTEXTMENU="yes"
CAPTION="yes"
MAXIMIZEBUTTON="no"
MINIMIZEBUTTON="yes"
SHOWINTASKBAR="yes"
SINGLEINSTANCE="yes"
SYSMENU="yes"
WINDOWSTATE="normal"
NAVIGABLE="yes"
/>
</head>
<script src="http://dict.cn/hc/" type="text/javascript"></script>
<script language="VBScript">
width=400
height=400
window.resizeTo width, height
ileft=(window.screen.width-width)/2
itop=(window.screen.height-height)/2
window.moveTo ileft,itop
</script>
<style>
input {font: 15px 宋体; width:150; height:50; border:1px solid royalblue;}
</style>
<body style="FILTER: progid:DXImageTransform.Microsoft.Gradient(gradientType=0,startColorStr=#10bfff,endColorStr=#007db2);">
<table style="font: 15px 宋体;">
<tr align="center">
<td><input type="text" value="输入"></td>
</tr>
<tr align="center">
<td>输入完毕后双击输入框右下角选中全部即可</td>
</tr>
</table>
</body>
<script type="text/javascript">
dictInit();
</script>
<html>
<title>Dict.cn 海词 - zh159@bbs.cn-dos.net</title>
<HTA:APPLICATION
ID="MyhyliApp"
APPLICATIONNAME="Dict.cn 海词"
BORDER="thin"
BORDERSTYLE=""
VERSION="1.0"
SCROLL="no"
INNERBORDER="no"
CONTEXTMENU="yes"
CAPTION="yes"
MAXIMIZEBUTTON="no"
MINIMIZEBUTTON="yes"
SHOWINTASKBAR="yes"
SINGLEINSTANCE="yes"
SYSMENU="yes"
WINDOWSTATE="normal"
NAVIGABLE="yes"
/>
</head>
<script src="http://dict.cn/hc/" type="text/javascript"></script>
<script language="VBScript">
width=400
height=400
window.resizeTo width, height
ileft=(window.screen.width-width)/2
itop=(window.screen.height-height)/2
window.moveTo ileft,itop
</script>
<style>
input {font: 15px 宋体; width:150; height:50; border:1px solid royalblue;}
</style>
<body style="FILTER: progid:DXImageTransform.Microsoft.Gradient(gradientType=0,startColorStr=#10bfff,endColorStr=#007db2);">
<table style="font: 15px 宋体;">
<tr align="center">
<td><input type="text" value="输入"></td>
</tr>
<tr align="center">
<td>输入完毕后双击输入框右下角选中全部即可</td>
</tr>
</table>
</body>
<script type="text/javascript">
dictInit();
</script>
<html>
作者: slore 时间: 2007-6-23 18:11
<script src="http://dict.cn/hc/" type="text/javascript"></script>
<script type="text/javascript">
dictInit();
</script>
<body>
<textarea name=input_area id=input_area></textarea>
</body>
这样就够了，上面好长……
作者: zh159 时间: 2007-6-23 18:13
我那个是要把界面做的好看些^_^
作者: wert123 时间: 2007-6-24 20:32
谢谢啊
slore大师
zh159大师
给你们敬礼了