新闻文章中插入广告图片内容
[ 2010-04-16 14:48:00 | 作者: admin ]
尽管很多人给出了给每篇文章加上画中画广告的方法，但是这些所谓的方法，都不能真正地实现文字环绕在广告周围的“画中画”效果，只能左对其或者右对齐。现在要讨论的这个方法才能真正实现像新浪网、搜狐网那样的画中画广告效果。
首先说一下错误的div+CSS方法，希望大家别被误导： <div id="outer" style="float:left;">
<div id="inner" style="float:left;margin:0;width:200px;height:200px;"></div>
文字内容
</div>上面只能算作是左对齐的效果。还有很多借助表格或者iframe来实现的，也不外乎如此。
那么，怎么才能真正实现在每篇文章中批量添加画中画广告的效果呢？可以采用截取字段来进行，有两段代码。
第一段是分析文章内容字数，然后插入广告的代码： Dim LeftContent,MidA...
阅读全文…
首先说一下错误的div+CSS方法，希望大家别被误导： <div id="outer" style="float:left;">
<div id="inner" style="float:left;margin:0;width:200px;height:200px;"></div>
文字内容
</div>上面只能算作是左对齐的效果。还有很多借助表格或者iframe来实现的，也不外乎如此。
那么，怎么才能真正实现在每篇文章中批量添加画中画广告的效果呢？可以采用截取字段来进行，有两段代码。
第一段是分析文章内容字数，然后插入广告的代码： Dim LeftContent,MidA...
阅读全文…
导出*.csv的xls时出现乌龙事件
[ 2010-04-16 09:19:16 | 作者: admin ]
本来导出一个csv也是家常便饭的事情，今天花了2个小时就是搞不定，出现“无法下载”的提示。
无论怎么修改header就是不行，本地测试绝对正常，传到服务器上就报错。
直接在服务器上测试发现报500错误，才知道程序有问题，去掉Response.ContentType = "application/ms-excel" 后找到错误原因：自己本地加了函数服务器没有同步更新。
原来做文件输出的时候，浏览器关闭友好提示，500错误就不会出现了，容易对调试程序产生误导。
程序参考
阅读全文…
无论怎么修改header就是不行，本地测试绝对正常，传到服务器上就报错。
直接在服务器上测试发现报500错误，才知道程序有问题，去掉Response.ContentType = "application/ms-excel" 后找到错误原因：自己本地加了函数服务器没有同步更新。
原来做文件输出的时候，浏览器关闭友好提示，500错误就不会出现了，容易对调试程序产生误导。
程序参考
'*************************
'导出excel文件
'*************************
if request.Form("act")="ExportExcel" then
'输出文件头
Response.Buffer = true
...'导出excel文件
'*************************
if request.Form("act")="ExportExcel" then
'输出文件头
Response.Buffer = true
阅读全文…
1
