用ASP将SQL搜索出来的内容导出为TXT的代码

<!--#include file="inc/conn.asp"--> 
<% 
dim rs,sql,filename,fso,myfile,x

Set fso = server.CreateObject("scripting.filesystemobject") 
filename = Server.MapPath("download.txt") 
if fso.FileExists(filename) then 
fso.DeleteFile(filename) 
end if 
'--创建txt文件 
set myfile = fso.CreateTextFile(filename,true)

Set rs = Server.CreateObject("ADODB.Recordset") 
sql = "select * from userfile" 
rs.Open sql,conn,1,1 
if rs.EOF and rs.BOF then 
response.write "无数据" 
else 
dim strLine,responsestr 
strLine="" 
'--将表的列名先写入txt 
For each x in rs.fields 
strLine = strLine & x.name & chr(9) 
Next 
myfile.writeline strLine 
Do while Not rs.EOF 
strLine="" 
for each x in rs.Fields 
strLine = strLine & x.value & chr(9) 
next 
'--将表的数据写入txt 
myfile.writeline strLine 
rs.MoveNext 
loop 
end if 
rs.Close 
set rs = nothing 
Response.ContentType="application/x-msdownload" 
Response.Redirect "download.txt" 
%>

赞 (0)

相关推荐

  • 用ASP将SQL搜索出来的内容导出为TXT的代码

    <!--#include file="inc/conn.asp"-->  <%  dim rs,sql,filename,fso,myfile,x Set fso = server.CreateObject("scripting.filesystemobject")  filename = Server.MapPath("download.txt")  if fso.FileExists(filename) then  fso.

  • ASP中 SQL语句 使用方法第1/3页

    ASP中使用SQL语句教程  五花八门的SQL产品多得要命,或许你早顾不得其它甩开袖子就动手干了.但你要同时采用ASP和SQL的话就可能会头晕.MySQL.SQL Server和mSQL都是绝佳的SQL工具,可惜,在ASP的环境下你却用不着它们来创建实用的SQL语句.不过,你可以利用自己掌握的Access知识以及相应的Access技能,再加上我们的提示和技巧,相信一定能成功地在你的ASP网页中加入SQL. 1. SELECT 语句 在SQL的世界里,最最基础的操作就是SELECT 语句了.在数据

  • asp的SQL语句中and和or同时使用的注意事项

    今天在调试程序的时候,需要用到and or,如果不掌握技巧输出的结构与我们想象的差距有点大,这里分享一下,希望大家以后多多支持我们 asp的SQL语句中and 和or是不是不可以同时使用呢? 答案是肯定的,下面来看下方法: 1.非常负责任的告诉你,是可以同时使用的.但要看业务要求 2.使用的场景举例: 查询表中2000年和2002年出生的男同学 select * from 学生表 where 性别='男' and (出生年份=2000 or 出生年份=2002) 3.其实or可以用SQL中的In

  • ASP和SQL Server如何构建网页防火墙

    ASP是Web上的客户机/服务器结构的中间层,虽然它使用脚本语言(Java Script,VB Script等)编写,程序代码在服务器上运行,在客户端仅可看到由ASP输出的动态HTML文件,但ASP仍具有某些漏洞,采取一定手段也可以看到ASP程序的源码.这时,通过ASP与SQL Server相结合,我们可以设计出简单.高效.可靠的应用程序. 为网页设置防火墙的主要目的是根据网页内容对不同来访者提供不同的服务,利用Java Script或VB Script,我们很容易做到这一点.但网页的源码在客户

  • 用ASP和SQL实现基于Web的事件日历

    本文介绍如何建立基于Web的日历,同时为不熟悉Active Server Pages(ASP).SQL和ADO的开发者提供建立Web站点的过程介绍,也为有经验的开发者提供了Web站点可伸缩性方面的技巧. 随着网络应用的发展,基于Web的日历越来越受到人们的重视,对于显示诸如最后期限或日程安排之类的重要事件,或显示谁在什么时候休假,基于Web的日历都是有用的.本文描述了如何使用IIS和SQL Server内的ASP建立一个非常简单的基于Web的日历,并允许你与其他人共享你的日程表或管理一组人员的日

  • 用Asp备份与恢复SQL Server 数据库

    一个用asp备份与恢复SQL Server数据库的例子代码,希望对一些朋友有用.(注意:数据库使用中可能无法恢复)  复制代码 代码如下: <HTML> <HEAD><TITLE>SQL Server 数据库的备份与恢复</TITLE> <meta http-equiv="Content-Type" content="text/html; charset=gb2312"></HEAD><B

  • ASP调用SQL SERVER存储程序

    ASP调用SQL SERVER存储程序  出处   http://www.bmj2000.com/vb/techniccolumn/subDetail.asp?MainId=2&BoardId=asp&ItemId=%CA%FD%BE%DD%BF%E2%B2%D9%D7%F7&RecId=2216 调用数据库存储过程 <%     Set Dataconn = Server.CreateObject("ADODB.Connection")      '建立

  • asp获取远程网页的指定内容的实现代码

    代码如下: 复制代码 代码如下: <% '用ASP获取远程目标网页指定内容,代码由广州网站建设http://www.jb51.net提供 On Error Resume Next Server.ScriptTimeOut=9999999 Function getHTTPPage(Path) t = GetBody(Path) getHTTPPage=BytesToBstr(t,"GB2312") End function Function Newstring(wstr,strng

  • asp连接SQL和Access数据代码(asp里的随机函数)

    asp连接sql 第一种写法: 复制代码 代码如下: MM_conn_STRING = "Driver={SQL Server};server=(local);uid=sa;pwd=;database=infs;" Set conn = Server.Createobject("ADODB.Connection") conn.open MM_conn_STRING SET RS=SERVER.CreateObject("ADOBD.recordset&qu

  • Sql Server 如何去掉内容里面的Html标签

    Sql Server 如何去掉内容里面的Html标签

    分享一个方法,去掉内容里的Html标签,测试数据: DECLARE @str NVARCHAR(max)=' <!DOCTYPE html> <html> <head> </head> <body> <div>哈哈哈</div> </body> </html> ' 方法如下: CREATE FUNCTION [dbo].[removehtml] (@str NVARCHAR(MAX)) RETURN

随机推荐