WEB|WAP|网站建设|网站设计|网站制作|网站开发 - TOOLhttp://www.hzzhit.com/blog/兆合信息：专业的网站建设和网站制作公司 - RainbowSoft Studio Z-Blog 1.8 Arwen Build 81206zh-CNCopyright 2008-2009 杭州兆合信息技术有限公司. All Rights Reserved.Tue, 07 Sep 2010 04:54:34 +0800cdonts+newmail对象参数说明及发送email实例a@b.com (shine)http://www.hzzhit.com/blog/tool/cdonts-newmail_6896.htmlSun, 25 Oct 2009 16:08:30 +0800http://www.hzzhit.com/blog/tool/cdonts-newmail_6896.html 

下载地址cdonts.rar

<%
'Last Updated By Recon On 05/14/2001
'On Error Resume Next

'利用CDONTS组件在Win2k上发送邮件
Dim objMail

'普通邮件
'无主体
Set objMail = Server.CreateObject("CDONTS.NEWMAIL")
objMail.From        = "iamchn@263.net"
objMail.To            = "iamchn@21cn.com"
objMail.Subject    = "TEST1"
objMail.Send
Set objMail = Nothing

'普通邮件
'有主体
Set objMail = Server.CreateObject("CDONTS.NEWMAIL")
objMail.From        = "iamchn@263.net"
objMail.To            = "iamchn@21cn.com"
objMail.Subject    = "TEST2"
objMail.Body        = "When i was young, i listened to the radio ..."
objMail.Send
Set objMail = Nothing

'普通邮件
'有多送.有主体
Set objMail = Server.CreateObject("CDONTS.NEWMAIL")
objMail.From        = "iamchn@263.net"
objMail.To            = "iamchn@21cn.com;iamchn@263.net"
objMail.Subject    = "TEST3"
objMail.Body        = "When i was young, i listened to the radio ..."
objMail.Send
Set objMail = Nothing

'普通邮件
'有抄送.有主体.有重要性
Set objMail = Server.CreateObject("CDONTS.NEWMAIL")
objMail.From        = "iamchn@263.net"
objMail.To            = "iamchn@21cn.com"
objMail.Cc            = "iamchn@263.net;recon_chan@sohu.com"
objMail.Subject    = "TEST4"
objMail.Body        = "When i was young, i listened to the radio ..."
objMail.Importance = 2
objMail.Send
Set objMail = Nothing

'普通邮件
'有抄送.有暗送.有主体.有重要性
Set objMail = Server.CreateObject("CDONTS.NEWMAIL")
objMail.From        = "iamchn@263.net"
objMail.To            = "iamchn@21cn.com"
objMail.Cc            = "recon_chan@sohu.com"
objMail.Bcc             = "iamchn@263.net;recon_chan@sina.com"
objMail.Subject    = "TEST5"
objMail.Body        = "When i was young, i listened to the radio ..."
objMail.Importance = 2
objMail.Send
Set objMail = Nothing

'普通邮件
'有主体.有重要性.含附件
Set objMail = Server.CreateObject("CDONTS.NEWMAIL")
objMail.From        = "iamchn@263.net"
objMail.To            = "iamchn@21cn.com"
objMail.Subject    = "TEST6"
objMail.Body        = "When i was young, i listened to the radio ..."
objMail.Importance = 2

objMail.AttachFile "C:\Love.txt"
objMail.Send
Set objMail = Nothing

'HTML邮件
'有主体.有重要性
'注: AttachURL的使用可能有错误
Dim fso, tf
Dim strHTML

Set fso    = Server.CreateObject("SCRIPTING.FILESYSTEMOBJECT")
Set tf    = fso.OpenTextFile("C:\Mail.htm", 1)
strHTML = tf.ReadAll

Write strHTML
Set tf    = Nothing
Set fso    = Nothing

Set objMail = Server.CreateObject("CDONTS.NEWMAIL")
objMail.From        = "iamchn@263.net"
objMail.To            = "iamchn@21cn.com"
objMail.Subject    = "TEST7"
objMail.Body        = strHTML

objMail.BodyFormat    = 0
objMail.MailFormat    = 0
objMail.Importance    = 2

objMail.AttachURL "c:\common.css", "common.css"
objMail.AttachURL "c:\logo.gif", "logo.gif"
objMail.Send
Set objMail = Nothing
%>

////////////////
一个过程。另外CDONTS在IIS5下才可以使用的，你还必须配置你的SMTP服务，在INTERNET管理器里面有。
<%
sub sendmail(fromwho,towho,subject,body)
dim cdo
set cdo=server.createobject("cdonts.newmail")
cdo.From=fromwho
cdo.To = towho
cdo.Subject =subject
cdo.Body =body
cdo.MailFormat=0
'说明是以MIME发送
cdo.BodyFormat=0
'可以包含html代码
cdo.Importance=0
'邮件的优先级别0-1-2
'cdo.cc=xx@xx.net 抄送
'cdo.Bcc=xx@sf.net密送
'cdo.AttachFile "" 附件
cdo.Send
Set cdo=Nothing
end sub
sub sendattachmail(fromwho,towho,subject,body,attachfile)
dim cdo
set cdo=server.createobject("cdonts.newmail")
cdo.From=fromwho
cdo.To = towho
cdo.Subject =subject
cdo.Body =body
cdo.MailFormat=0
cdo.BodyFormat=0
cdo.Importance=0
cdo.AttachFile attachfile
cdo.Send
Set cdo=Nothing
end sub
%>
发送带附件的HTML格式邮件例程


　　如何通过 ASP 来发送带附件、格式为 HTML 的邮件？下面提供了一个例程.

<%@ LANGUAGE=VBScript%>
<%
Response.Buffer = True
Response.Expires = 0

'创建对象实例
Set myMail = Server.CreateObject("CDONTS.NewMail")

'以下是将要发送的内容
HTML = "<html>"
HTML = HTML & "<head>"
HTML = HTML & "<title>Sending CDONTS Email Using HTML</title>"
HTML = HTML & "</head>"
HTML = HTML & "<body bgcolor=""FFFFFF"">"
HTML = HTML & "<p><font size=7>"
HTML = HTML & "This is a test mail in html<br>"
HTML = HTML & "Mail content here ...</font></p>"
HTML = HTML & "</body>"
HTML = HTML & "</html>"

'发件人
myMail.From = "somebody@somewhere.com"

'收件人
myMail.To = "nobody@somewhere.com"

'密件抄送
myMail.Bcc = "nobody@somewhere.com"

'抄送
myMail.Cc = "nobody@somewhere.com"

'邮件的重要性
' 0 重要性低 
' 1 重要性一般（默认）
' 2 重要性高 
myMail.Importance = 2

'邮件主题
myMail.Subject = "Test mail in HTML"

'附件（注意 e:\test.txt 指的是服务器上的位置，如果使用相对路径，必须用 Server.MapPath 映射为真实路径）
myMail.AttachFile "e:\test.txt"

'NewMail 对象的文字格式
'0 表示该 Body 可包含超文本置标语言 (HTML)
'1 表示该 Body 只用于纯文本（默认值）
myMail.BodyFormat = 0

'NewMail 对象设置编码
'0 表示将采用 MIME 格式
'1 表示将采用连续的纯文本（默认值）
myMail.MailFormat = 0

'给邮件对象的文本赋值
myMail.Body = HTML

'将邮件发出
myMail.Send

'销毁对象实例，释放内存
Set myMail = Nothing
%>


用Cdonts实现发送Email 

--------------------------------------------------------------------


<%
　　dim cdo
　　set cdo=server.createobject("cdonts.newmail")
　　cdo.From=fromwho   "发件人信箱
　　cdo.To = towho     "收件人信箱
　　cdo.Subject =subject    "主题
　　cdo.Body =body      "邮件正文
　　cdo.MailFormat=0　　"说明是以MIME发送
　　cdo.BodyFormat=0　　"可以包含html代码
　　cdo.Importance=0　　"邮件的优先级别0-1-2
　　cdo.cc=xx@xx.net 　 "抄送
　　cdo.Bcc=xx@sf.net　 "密送
　　cdo.AttachFile attachfile    "附件
　　cdo.Send
　　Set cdo=Nothing
%>
下面我们看一个实例：
dim str 
str=str&"您好!"
str=str&"　　由中国学生网所提供的劣质服务（ASP服务器瘫痪），导致本站连继两天不能访问。"
str=str&"站长向这段时间不能访问本站的朋友深表歉意！本工作室也正在考虑更换网络提供商！<br>"
str=str&"　　本站永久域名：www.chinabs.net　　主要面向B/S技术爱好者。<br>"
str=str&"　　建站的目的是为B/S爱好者提供一个学习交流的平台，同时也为商家建立企业上网平" str=str&"台，企业内部B/S应用提供解决方案。<br>"
str=str&"　　主要内容包括：ASP,ASP.NET,JSP,PHP,C#,Java,JavaScript,XML学习文章，B/S技术" str=str&"交流论坛及一些本工作室开发的一些B/S应用。<br>"
str=str&"　　本站的发展离不开大家的支持！<br>"
str=str&"　　谢谢！<br>"
str=str&" 站长：追风<br>"
str=str&" 深圳比艾思工作室<br>"
filename="test.gif"           "附件文件名
path=Server.MapPath("\jefenet\images\" & filename)     "附件的路径
Set theMail=Server.CreateObject("CDONTS.NewMail")
theMail.From="chinabs@263.net" 　　"发件人信箱
theMail.To ="jeffzb@21cn.com"　　　"收件人信箱
theMail.Subject ="电子邮件功能测试！" 　　"主题
theMail.BodyFormat=0　　　"定义以Html的格式发送邮件
theMail.MailFormat=0 　　 "定义以Mime的格式发邮件
theMail.Body=Str 　　　　 "邮件正文
On Error Resume Next       "如果找不到附件，则跳过
theMail.AttachFile path,filename
theMail.Send
set theMail=nothing

--------------------------------------------

注意:
theMail.AttachFile 第一个参数为服务器实际路径，第二个参数为邮件中显示的文件名

 

]]>TOOLhttp://www.hzzhit.com/blog/tool/cdonts-newmail_6896.html#commenthttp://www.hzzhit.com/blog/http://www.hzzhit.com/blog/feed.asp?cmt=108http://www.hzzhit.com/blog/cmd.asp?act=tb&id=108&key=e0369573Mysql ODBC驱动包 5.1 For WIN32a@b.com (shine)http://www.hzzhit.com/blog/tool/Mysql-ODBC-driver.htmlFri, 17 Jul 2009 12:32:18 +0800http://www.hzzhit.com/blog/tool/Mysql-ODBC-driver.htmlMySql ODBC驱动的使用

我们经常会遇到这样问题，怎样在非web程序或asp程序中使用mysql数据库呢？对于这个问题有两个解决方案: 　　

　　1.使用mysql提供的api函数库。 　　

　　很多有名的mysql客户端工具就是这样实现的，大名鼎鼎的winmysql工具就是这样的。这在大部分的开发工具中都可以实现。比如vc,bcb,delphi,vb等，只要能调用第三方的api就能实现。但对程序员的要求很高，而且要熟悉一套mysql的api函数集，这不是对每个人都很轻松的事。而且这种方法不能用于asp等程序，因为它不支持com对象。 　　

　　2。第二种是使用myodbc驱动程序。 　　

　　你可以到www.mysql.com下载myodbc驱动程序，然后照着下面的做就可以了第一种选择是下载完全安装包，这种包很大，但对于我们来说有用的只有myodbc.dll这个文件，却要下载这么大的文件，不太合适。当然，如果你很菜的话，我建议你选择这种方式，这样容易些，但不符合cfans的作风，是吧。

        本公司已经把该驱动存放在公司服务器，您可以直接下载，请点击这里下载：mysql odbc 5.1下载

　　第二种是直接下载myodbc.dll文件，只有几百k,但不太容易使用，本人经过很久摸索才找到使用它的方法。首先你将包解开，将myodbc.dll 文件放到windowssystem 或 winntsystem32目录下，这取决于你的系统是win9x还是winnt(win2k)，你应该知道吧。 　　

　　然后打开一纯文本编辑器，如editplus,notpad之类，(取决于你的喜好)将下面一段话保存为一文件，扩展名为.reg,知道了吧，这是注册表文件，不要搞错呀(不包括下面的一长串等号) 　　

　　如果你用的是win2k请将第一行换成 　　

　　Windows Registry Editor Version 5.00 　

　　==========================================================从下行开始 　　

　　Windows Registry Editor Version 4.00 　　

　　[HKEY_LOCAL_MACHINESOFTWAREODBCODBCINST.INImyodbc driver]

　　"UsageCount"=dword:00000002

　　"Driver"="C:\WINNT\System32\myodbc.dll"

　　"Setup"="C:\WINNT\System32\myodbc.dll"

　　"SQLLevel"="1"

　　"FileUsage"="0"

　　"DriverODBCVer"="02.50"

　　"ConnectFunctions"="YYY"

　　"APILevel"="1"

　　"CpTimeout"="120"

　　[HKEY_LOCAL_MACHINESOFTWAREODBCODBCINST.INIODBC Drivers]

　　"myodbc driver"="installed"

==================================================

MySQL到ORACLE程序迁移的注意事项


        有很多应用项目, 刚起步的时候用MYSQL数据库基本上能实现各种功能需求，随着应用用户的增多，数据量的增加，MYSQL渐渐地出现不堪重负的情况：连接很慢甚至宕机，于是就有把数据从MYSQL迁到ORACLE的需求，应用程序也要相应做一些修改。
1． 自动增长的数据类型处理
        MYSQL有自动增长的数据类型，插入记录时不用操作此字段，会自动获得数据值。ORACLE没有自动增长的数据类型，需要建立一个自动增长的序列号，插入记录时要把序列号的下一个值赋于此字段。
CREATE SEQUENCE 序列号的名称 (最好是表名+序列号标记) INCREMENT BY 1 START WITH 1 MAXVALUE 99999 CYCLE NOCACHE;
其中最大的值按字段的长度来定, 如果定义的自动增长的序列号 NUMBER(6) , 最大值为999999
INSERT 语句插入这个字段值为: 序列号的名称.NEXTVAL
2. 单引号的处理
        MYSQL里可以用双引号包起字符串，ORACLE里只可以用单引号包起字符串。在插入和修改字符串前必须做单引号的替换：把所有出现的一个单引号替换成两个单引号。
3. 翻页的SQL语句的处理
        MYSQL处理翻页的SQL语句比较简单，用LIMIT 开始位置, 记录个数；PHP里还可以用SEEK定位到结果集的位置。ORACLE处理翻页的SQL语句就比较繁琐了。每个结果集只有一个ROWNUM字段标明它的位置, 并且只能用ROWNUM<100, 不能用ROWNUM>80。
        以下是经过分析后较好的两种ORACLE翻页SQL语句( ID是唯一关键字的字段名 )：
语句一：
SELECT ID, [FIELD_NAME,...] FROM TABLE_NAME WHERE ID IN ( SELECT ID FROM (SELECT ROWNUM AS NUMROW, ID FROM TABLE_NAME WHERE 条件1 ORDER BY 条件2) WHERE NUMROW > 80 AND NUMROW < 100 ) ORDER BY 条件3;
语句二：
SELECT * FROM (( SELECT ROWNUM AS NUMROW, c.* from (select [FIELD_NAME,...] FROM TABLE_NAME WHERE 条件1 ORDER BY 条件2) c) WHERE NUMROW > 80 AND NUMROW < 100 ) ORDER BY 条件3;
4． 长字符串的处理
        长字符串的处理ORACLE也有它特殊的地方。INSERT和UPDATE时最大可操作的字符串长度小于等于4000个单字节, 如果要插入更长的字符串, 请考虑字段用CLOB类型，方法借用ORACLE里自带的DBMS_LOB程序包。插入修改记录前一定要做进行非空和长度判断，不能为空的字段值和超出长度字段值都应该提出警告,返回上次操作。
5. 日期字段的处理
        MYSQL日期字段分DATE和TIME两种，ORACLE日期字段只有DATE，包含年月日时分秒信息，用当前数据库的系统时间为SYSDATE, 精确到秒，或者用字符串转换成日期型函数TO_DATE(‘2001-08-01’,’YYYY-MM-DD’)年-月-日 24小时:分钟:秒 的格式YYYY-MM-DD HH24:MI:SS TO_DATE()还有很多种日期格式, 可以参看ORACLE DOC.日期型字段转换成字符串函数TO_CHAR(‘2001-08-01’,’YYYY-MM-DD HH24:MI:SS’)
        日期字段的数学运算公式有很大的不同。MYSQL找到离当前时间7天用 DATE_FIELD_NAME > SUBDATE（NOW（），INTERVAL 7 DAY）ORACLE找到离当前时间7天用 DATE_FIELD_NAME >SYSDATE - 7;
6. 空字符的处理
        MYSQL的非空字段也有空的内容，ORACLE里定义了非空字段就不容许有空的内容。按MYSQL的NOT NULL来定义ORACLE表结构, 导数据的时候会产生错误。因此导数据时要对空字符进行判断，如果为NULL或空字符，需要把它改成一个空格的字符串。
7. 字符串的模糊比较
        MYSQL里用 字段名 like '%字符串%',ORACLE里也可以用 字段名 like '%字符串%' 但这种方法不能使用索引, 速度不快，用字符串比较函数 instr(字段名,'字符串')>0 会得到更精确的查找结果。
8. 程序和函数里，操作数据库的工作完成后请注意结果集和指针的释放。

]]>TOOLhttp://www.hzzhit.com/blog/tool/Mysql-ODBC-driver.html#commenthttp://www.hzzhit.com/blog/http://www.hzzhit.com/blog/feed.asp?cmt=84http://www.hzzhit.com/blog/cmd.asp?act=tb&id=84&key=96457709Xenu-死链接检测工具a@b.com (shine)http://www.hzzhit.com/blog/tool/Xenu.htmlFri, 27 Mar 2009 17:41:48 +0800http://www.hzzhit.com/blog/tool/Xenu.htmlXenu 是一款深受业界好评，并被广泛使用的死链接检测工具。

时常检测网站并排除死链接，对网站的 SEO 非常重要，因为大量死链接存在会降低用户和搜索引擎对网站的信任。

我们推荐的死链接检测工具 Xenu 主要具有以下特征：

  • 需要下载安装，不到1M大小，用户界面非常简洁，操作简单。
  • 检测彻底：能够检测到图片、框架、插件、背景、样式表、脚本和 java 程序中的链接。
  • 报告形式合理多样，死链接一目了然。
  • 提供出现死链接的网页，方便扫除导出链接错误。
  • 能够侦测重定向URL
  • 可以选择是否侦测站外链接。
  • 对于小型简单网站，可以用来制作HTML格式网站地图。

 

死链接检测工具 Xenu 下载地址：http://home.snafu.de/tilman/XENU.ZIP

不懂英文者使用指南：

  1. 下载，并安装。
  2. 打开后，出现 Tips and Tricks 窗口，点击 Close 按钮。
  3. 点击左上第二行第一个按钮。
  4. 出现一个对话框，在对话框第一行，写入自己的URL。如：http://www.hzzhit.com
    按底部的“OK”，就完成了。
  5. 报告结果中，出现红色的部分即是死链接。
]]>TOOLhttp://www.hzzhit.com/blog/tool/Xenu.html#commenthttp://www.hzzhit.com/blog/http://www.hzzhit.com/blog/feed.asp?cmt=25http://www.hzzhit.com/blog/cmd.asp?act=tb&id=25&key=7871a76c新网站收录入口(百度收录入口,google收录入口,雅虎收录入口,Live Search收录入口..)a@b.com (shine)http://www.hzzhit.com/blog/tool/wangzhantijiao.htmlSun, 22 Feb 2009 20:13:47 +0800http://www.hzzhit.com/blog/tool/wangzhantijiao.html     建好网站，当然要让搜索引擎收录后，才能让更多的人来访问，因此，说一下比较老的话题，其实网站推广的第一步，就是让搜索引擎收录，这也是使用独立顶级域名和空间建网站的原因之一。

      所谓搜索引擎登录，以前是需要提供一下网站内容，现在比较简单了，只需要简单的把网站提交给搜索引擎即可。只要你站的内容不断更新，而且有意义，搜索机噐人就会定期不定期的造访您的网站。


新站登录快速入口：

百度新站提交
Google新站提交
yahoo新站提交
Live Search新站提交
有道新站提交
中搜新站提交
TOM新站提交

]]>TOOLhttp://www.hzzhit.com/blog/tool/wangzhantijiao.html#commenthttp://www.hzzhit.com/blog/http://www.hzzhit.com/blog/feed.asp?cmt=14http://www.hzzhit.com/blog/cmd.asp?act=tb&id=14&key=b5a489ca网站制作会用到的一些辅助工具a@b.com (shine)http://www.hzzhit.com/blog/tool/6.htmlSun, 15 Feb 2009 20:16:56 +0800http://www.hzzhit.com/blog/tool/6.html平时制作网站时总结收集的一些辅助工具，希望大家能用到。。。。
1.itfontMaker——字体制作 http://pentacom.jp/soft/ex/font/edit.html
2.钱币生成器　http://www.onlinewahn.de/generator/m-make
3.图片仓库：　http://pic.sdodo.com
3.1.图片缩放裁切工具　http://pic.sdodo.com/tool/picadjust
3.2.大头贴DIY工具　http://pic.sdodo.com/tool/hphoto
3.3.给图片加字工具　http://pic.sdodo.com/tool/addword
3.4.邮箱地址小图标工具　http://pic.sdodo.com/tool/mailpic
3.5.给图片加小标签　http://pic.sdodo.com/tool/piclabel 
4.在线FLASH动画制作　http://www.dfilm.com/index_movie_start.html
5.图片生成网页图标　http://www.chami.com/html-kit/services/favicon
6.由蝌蚪网络提供的Gmail注册入口　http://cnc.kedooo.net/gmail 
7.最全的邮件/QQ/MSN/BLOG图片生成器　http://www.eoool.com
8.收藏夹图标生成器　http://www.html-kit.com/e/favicon.cgi
9.在线域名LOGO生成　http://phorum.com.tw/Generator.aspx
10.免费3D banner在线制做网站　http://www.3dtextmaker.com/cgi-bin/3dtext.pl
11.输入图片就能查看字体　http://www.myfonts.com/WhatTheFont
12.sitemap网站地图制作工具　http://www.seo.net.cn/sitemap4
13.检测空间商好坏的方法　http://uptime.netcraft.com/up
14.查看该域名IP主机下的其他域名　http://whois.webhosting.info
15.生成email图片　http://www.nhacks.com/email/index.php
16.世界网络里面有很多不错的测试　http://www.linkwan.com/gb/broadmeter
17.几个大城市的地图搜索　http://map.zhongsou.com
18.图片标签快速生成工具　http://www.eoool.com
19.查询在google所有服务器中的PR值 http://www.iwebtool.com/pagerank_checker?domain=www.05371.com
20.免费加入140个搜索引擎　http://freehosting.hostrave.com/p/ledbetter/submitware/index.php 
21.在线生成多种样式的LOGO　http://sherlocco.com/create.asp
22.街道路牌签名生成器　http://www.streetsigngenerator.com
 

]]>TOOLhttp://www.hzzhit.com/blog/tool/6.html#commenthttp://www.hzzhit.com/blog/http://www.hzzhit.com/blog/feed.asp?cmt=6http://www.hzzhit.com/blog/cmd.asp?act=tb&id=6&key=773fdd84