预览模式: 普通 | 列表

Fso操作大全

FSO - FileSystemObject 或 Scripting.FileSystemObject 的缩写,为 IIS 内置组件,用于操作磁盘、文件夹或文本文件。FSO 的对象、方法和属性非常的多,这里用示例的方式列出常用的,如果您要查看更详尽的信息,请点击这里下载 FileSystemObject 参考,注意:《VBScript 语言参考》或《JScript 语言参考》中的:《FileSystemObject 用户指南》和《Scripting 运行时库参考》便是微软给出的 FileSystemObject 完整参考。

FSO 不能操作二进制文件,要操作二进制文件,请使用:ADODB.Stream。

创建文件
dim fso, f
set fso = server.CreateObject("Scripting.FileSystemObject")
set f = fso.CreateTextFile("C:\test.txt", true) '第二个参数表示目标文件存在时是否覆盖
f.Write("写入内容")
f.WriteLine("写入内容并换行")
f.WriteBlankLines(3) '写入三个空白行(相当于在文本编辑器中按三次回车)
f.Close()
set f = nothing
set fso = nothing

打开并读文件
dim fso, f
set fso = server.CreateObject("Scripting.FileSystemObject")
set f = fso.OpenTextFile("C:\test.txt", 1, false) '第二个参数 1 表示只读打开,第三个参数表示目标文件不存在时是否创建
f.Skip(3) '将当前位置向后移三个字符
f.SkipLine() '将当前位置移动到下一行的第一个字符,注意:无参数
response.Write f.Read(3) '从当前位置向后读取三个字符,并将当前位置向后移三个字符
response.Write f.ReadLine() '从当前位置向后读取直到遇到换行符(不读取换行符),并将当前位置移动到下一行的第一个字符,注意:无参数
response.Write f.ReadAll() '从当前位置向后读取,直到文件结束,并将当前位置移动到文件的最后
if f.atEndOfLine then
    response.Write("一行的结尾!")
end if
if f.atEndOfStream then
    response.Write("文件的结尾!")
end if
f.Close()
set f = nothing
set fso = nothing

查看更多...

Tags: fso

分类:技术文章 | 固定链接 | 评论: 0 | 引用: 0 | 查看次数: 3040

dos下的爱情~

喜欢就把这个图片发给你的好友吧!!,呵呵~

查看更多...

Tags: dos

分类:随笔杂记 | 固定链接 | 评论: 0 | 引用: 0 | 查看次数: 3204

Asp生成随机字符串函数

Function getCode(iCount)
Dim arrChar
Dim j,k,strCode
arrChar = "ABCDEFGHIJKLMNOPQRSTUVWXYZ1234567890"
k=Len(arrChar)
Randomize
For i=1 to iCount
j=Int(k * Rnd )+1
strCode = strCode & Mid(arrChar,j,1)
Next
getCode = strCode
End Function

技术才是王道!

Tags: asp

分类:技术文章 | 固定链接 | 评论: 0 | 引用: 0 | 查看次数: 3072

电子商务网站的建设和运用

建设电子商务网站总结起来有五个步骤:找准方向、搭建平台、充实内容、推广网站、实现盈利。

    一、找准方向。据2007年6月CNNIC第20次中国互联网调查显示,中国网民总人数达到1.62亿,网站已经达到131万个,可见互联网发展之迅速,也有越来越多的人开始投身互联网进行创业,而正因为互联网充满很多的机遇,所以找准适合自己的方向才尤为重要,是建立一个垃圾网站迅速做大流量赚取广告费,还是跟着潮流做领先时代的web2.0,web3.0的网站呢,是专心做一个网站,还是批量生产,制造出一堆网站呢?个人觉得选择自己熟悉的行业,集中所有精力,做一个垂直型电子商务网站不失为很好的选择。选择一个自己熟悉的行业,更能发挥自己的专业优势,集中所有精力就要求把多余的网站砍掉,网站多余的栏目砍掉,把有限的精力集中到自己擅长的领域,并最终在这个领域处于领先的地位,应该在座有不少了解站长网图王的,之前他拥有上百个网站,但很知名的没有几个,现在砍掉所有其他网站,站长网就很快在业内确定了很好的领先地位,所以不建议你做一个比阿里巴巴、当当网更大更全更体面的网站,因为你有多大的能耐能超越阿里巴巴呢,所以建议你选择某一个细分的领域,建一个垂直型的网站,也许建好后你就是该行业排名数一数二的网站,因为真正细分到很专业的领域,竞争并不是那么大。最后建议你选择盈利模式很明确的领域,例如b2b、b2c、c2c等,远比追求概念的web2.0来得实在。综上所述,互联网创业,首选建立垂直型电子商务行业网站。

    二、搭建平台。当我们确定了一个适合自己的发展方向后,接下来就是把我们的想法变成现实,搭建开展电子商务必须的网站平台。一般会有两种选择,一种是自己熟悉网站开发技术,或者自己聘请网站开发人员,另外一种就是选择开发好的通用网站系统或者委托专业的网络公司开发网站。两种方式各有优势,但毕竟自己精通技术的比较少,请员工到公司来开发,成本又太高,不是很划算,所以我推荐创业期间可以选择第二种方式。假如我们建立成都房产门户,是直接找房产网站系统专业开发商开发的易想房产网还是委托专业网络公司量身开发呢?一般找专业的公司开个一个仿购房者的房产网站,通过核算,从0规划开发这样庞大的系统,至少要开发2个月以上时间并且3人以上的熟手开发团队来进行,开发下来5万的报价说不定都赚不了什么,而购买开发好的易想房产网,只需要几千元外加制作一套属于自己的界面就可以轻松享有开发团队历时半年开发并将不断加强的功能强劲的房产网站系统。通过开发网站几年的经验告诉我,对于开发网站的客户其实是拥有很大的风险的,网站一次性开发很难达到很完美的层次,只有通过像软件一样不断的升级完善,才能最终出来一个相对完美的系统。所有我觉得搭建网站平台,假如这种模式的网站已经有很成熟的系统,直接选择系统未尝不是很好的途径。选择一个很好的功能强劲的网站系统能够让你的创业事半功倍,少走弯路。例如假如你要做社区可选北京的dz,做资讯可选择成都的风讯,做商城选择shopex,而想做像阿里巴巴、淘宝网、大型商城、购房者房产网等电子商务网站选择成都的易想软件

    三、充实内容。首先,不可否认的是:一个成功的网站不能不注重外观布局。外观就象一个人的衣服,是给别人的第一印象。给人留下一个好的印象,那么他看下去或者说再次光顾的可能性才更大。可是我觉得更主要的还的网站的内容(除非你的网站是纯艺术的,即是拿来观赏的)。一般的的网站都讲究实用,有用才是最重要的。不信大家研究一下世界排名靠前的网站,那个网站的内容不是很充实的,并且在同行网站当中内容是更丰富的。形式美只会给人留下一个好的印象,好的印象固然可以让别人进一步浏览你的网站。可如果从你网站上看到的都是些垃圾,谁还会看下去??谁会对一些自己不感兴趣的东西流连忘返??在使用易想软件的客户当中,有很多网站立足于很小的行业,如微波商务网、酒商务网、广告商务网,厦门购物网、联合一百、区域的房产网等,因为站长对行业的了解,所有通过维护,让网站上的内容在同行业网站当中算是最丰富的,这样就让访客转化成长期客户,很多网站虽然只运营了几个月时间,已经有了每天几百上千个IP流量了,而且是同行网站当中人气最旺的网站,轻松实现了盈利。

    四、推广网站。当网站平台搭建好了,内容充实起来了,我们就要考虑把网站推广出去,大型电子商务网站推广可以从两个大方面做手,一是从网站自身出发,做整站seo页面优化,二是通过形式多样的外部推广。做整站优化要注意到:一、首先让网站尽量多的页面静态化,尽量采用DIV+CSS格式。静态有两种,一种是真静态,一种是伪静态,这两种形式都是搜索引擎所喜欢的,静态网页一方面搜索引擎的机器人很容易抓取到,另外一方面访问的时候也不用打开数据库,加快了网站的访问速度和减轻了服务器的承载量。二、优化网站的连接结构及页面内容。对于搜索引擎而言,链接就是一切,所以你网站的链接结构一定要设计的合理,页面的层次最好不要超过三级,网页内容不要过长,搜索引擎常规收录对网页页面的大小以及字数都有最佳要求的。最好一个网页包含的文字信息在于2万个汉字之内,也就是说是4万字节左右。网页大小也包括在38K左右的大小是被认为是最友好的一种适合大小的规格!。三、设置合理的网页标签和网页的头部文件,能够让一些热门的关键词搜索你排名在前面。通过这样优化下来,假如你网站有一万条信息,每条信息每天可以从搜索引擎带来一个流量,那每天就能轻松带来一万的流量。其他外部的推广,样式就很多了,原则是让能出现我们网站的地方都出现,有交换友情链接,论坛群发,邮件群发,qq群发,策划活动,软文报道,或者更有站长把网址挂在身上,骑着自行车到街上人多的地方宣传效果也不错,只要能想到的我们都可以用上。

    五、实现盈利。作为一个公司的天职是盈利,同样作为一个站长,肩上有着让网站自负盈亏的责任。要想让网站盈利,我觉得首先要尽快研究出网站的盈利模式,例如b2b、b2c、c2c网站或者区域性的房产门户盈利模式就很明确,现在热门的博客网站,视频网站,交流社区人气很容易做,但流量很难转化成现金,最终也只能自己掏腰包养活网站;要想让网站盈利,还要主动出击,线上和线下相结合,靠网上流量带来的点击广告费用,是养活不了网站的,例如我们建立一个四川商务网,想让客户主动通过网站给我们交会员费,那是很难的,即使是阿里巴巴这样强势的品牌也需要几千上万个极具战斗力的营销团队才能推动网站会员的快速发展。

Tags: 电子商务

分类:业界文摘 | 固定链接 | 评论: 0 | 引用: 0 | 查看次数: 3332

Web2.0网页设计常用色彩

颜色的变化跟人类的智慧一样,是无穷的,每个阶段都会有流行的色彩,有属于一个时代的颜 色!WEB2.0是一个概念,它宣扬,定位了一些东西,以用户为中心,群体智慧,分享等等,等等.同时顺应这些需求,一些顶尖的设计师和开发者赋予并领导 了一些色彩流行趋势.我凭感觉做了部分归纳和收集,心理没大有底,把能想到的列出来希望跟大家一起探讨>>再做补充吧!

淡淡的浅色系及延伸应用

此类颜色似乎最早被应用在一些文档处理软件比如word,和操作系统里(比如MacOSX)用于分类归档,标记,或者突出显示使用.此类颜色给人的感觉很环保,不伤眼睛,而且对比度恰到好处,既可以有效区分,又不会显的太过突兀.

google,Yahoo更为成熟的运用了这些颜色.MSN在新版网站中也设置了Simple White主题选择,并且新的LIVE系列产品更是对那种淡淡的兰色与1PX线条情有独忠~另外一些新兴的WEB-base办公软件也大量选用了此类颜 色!事实证明,这些颜色的运用取得了大部分用户的认可并领导了趋势!

查看更多...

Tags: web2.0

分类:技术文章 | 固定链接 | 评论: 0 | 引用: 0 | 查看次数: 3683

QQ个性签名(随时更新中)


網友網友,網得老子一無所有.
網戀網戀,網得老子總是失戀.
網吧網吧,網得老子一身傷疤.
網絡網絡,網得老子精神墜落.
網遊網遊,網得老子天天夢遊.

分类:随笔杂记 | 固定链接 | 评论: 0 | 引用: 0 | 查看次数: 2985

本人出售部分msn.cn邮箱账号!

以上仅列出少部分,其它还有很多,更多好账号请联系本人!!!
QQ:13327215
MSN:Mister@live.com

查看更多...

Tags: msn

分类:随笔杂记 | 固定链接 | 评论: 0 | 引用: 0 | 查看次数: 3026

百度关键字提取器V1.0

软件名称:百度关键字提取器V1.0
用法,输入关键字,点“分析第一层”,待出现结果后点“分析第二层”,分析完毕“整理关键字”,然后即可“保存关键字”为文本文档!
接下来你要做的就是利用这些关键字,结合asp或者php等程序,生成网页。。。

查看更多...

Tags: 百度

分类:我的作品 | 固定链接 | 评论: 0 | 引用: 0 | 查看次数: 3667

VB无法添加WebBrowse控件

VB无法添加WebBrowse控件提示:文件未找到C:\windows\system32\ieframe.dll\1
VB重新安装过了。IEFRAME文件也有!就是添加不了!有谁知道告诉我谢谢!
 
因为你安装了IE7.0解决方法如下:

安装IE7之后导致VB6IE控件无法加载的解决方法


现象:Windows XP SP2安装了IE7之后,打开VB6包含有IE控件的旧工程,显示IEframe.dll加载失败,无法使用IE控件

解决:搜索注册表中包含有“ieframe.dll\1”的字串,删除其中的“\1”部分,问题解决。

附件:双击直接修改的注册表文件内容

文件名:VB-IE7-FIX.reg

文件内容:
Windows Registry Editor Version 5.00

[HKEY_CLASSES_ROOT\TypeLib\{EAB22AC0-30C1-11CF-A7EB-0000C05BAE0B}]

[HKEY_CLASSES_ROOT\TypeLib\{EAB22AC0-30C1-11CF-A7EB-0000C05BAE0B}\1.1]
@="Microsoft Internet Controls"

[HKEY_CLASSES_ROOT\TypeLib\{EAB22AC0-30C1-11CF-A7EB-0000C05BAE0B}\1.1\0]

[HKEY_CLASSES_ROOT\TypeLib\{EAB22AC0-30C1-11CF-A7EB-0000C05BAE0B}\1.1\0\win32]
@="C:\\WINDOWS\\system32\\ieframe.dll"

Tags: vb

分类:技术文章 | 固定链接 | 评论: 0 | 引用: 0 | 查看次数: 3540

fso中判断文件夹是否存在
set fso = server.createobject("scripting.filesystemobject")
if fso.FolderExists(server.mappath("../folderName"))=false then
REsponse.write("此文件夹不存在")
end if


fso中判断文件是否存在
set fso = server.createobject("scripting.filesystemobject")
if fso.fileexists(server.mappath("../folderName/fileName.htm")) = true then
Response.write("文件存在")
end if


fso中写文件
dim fileName,fileContent
fileName = replace(date(),"-","")
randomize
fileName = fileName & cstr(int(rnd(10)*100000)) & ".htm"
HtmlName = fileName 'HtmlName为数据库中的文件名
set fso = server.CreateObject("scripting.filesystemobject")
if fso.FolderExists(server.MapPath("./Files"))=false then '检查要生成的HTML文件夹是否存在
fso.CreateFolder(server.MapPath("../Files"))
end if
fileName = server.MapPath("../Files") & "/" & fileName
set MyFile = fso.opentextfile(fileName,2,true)
fileContent = "....(content)"
MyFile.write(fileContent)
MyFile.Close()
set MyFile = nothing


fso中删除文件
set fso = server.createobject("script.filesystemobject")
fileName = ..
fso.deletefile(fileName)
set fso = nothing

Tags: fso

分类:技术文章 | 固定链接 | 评论: 0 | 引用: 0 | 查看次数: 7406

asp之数学函数

asp之数学函数
常用的数学函数:

函数 语法 功能
Abs Abs(num) 返回一个数的绝对值
Sqr Squ(num) 返回一个数的平方根
Sin Sin(num) 返回角度的正弦值
Cos Cos(num) 返回角度的余弦值
Tan Tan(num) 返回角度的正切值
Atn Atn(num) 返回角度的反正切值
Log Log(num) 返回一个数的对数值
Int Int(num) 取整函数,返回小于等于number的第一个整数
FormatNumber FormatNumber(num1,num2) 转化为指定小数位数(num2)的数字
Rnd Rnd() 返回一个0到1的随机数
Ubound Ubound(数组名称,维数) 返回数组的最大下标数,如数组只有一维,可省略维数

Tags: asp

分类:技术文章 | 固定链接 | 评论: 0 | 引用: 0 | 查看次数: 2706

 广告位

↑返回顶部↑