网络币
2008-06-08 00:15:52
******************用JAVASCRIPT在客户端编程,是很有乐趣的***********************
用javascript从access数据库提取文件
一、原理
1、用javascript在客户端通过ADODB.Connection建立与access数据库的连接,通过ADODB.Recordset打开数据库。
2、在客户端利用Scripting.FileSystemObject组件检测要解包的文件夹是否存在,如果不存在,就创建文件夹。
3、Adodb.Stream组件在客户端将数据流生成文件。 二、实现
CODE:Copy to clipboard]数据库:
表名:FL
FileName:文件名
FileData:二进制文件内容
FilePath:文件路径
以下是我写的客户端解包程序代码,大家把下面的代码保存为hta格式的文件即可!
注:高版本的IE浏览器内不可以直接调用Adodb.Stream组件。
CODE:Copy to clipboard]<HTML>
<HEAD>
<TITLE> IISVS_文件解包工具 </TITLE>
<meta name="description" content="作者:翟振凯,小琦"> <SCRIPT LANGUAGE="JavaScript">
<!--
function get_files(filename,filePath) {//核心代码
var o=new Date();
var fso = new ActiveXObject("Scripting.FileSystemObject"); //生成查询和更新用的sql语句。
var sqlSelCnt = "SELECT * FROMFL] "; //建立连接,并生成相关字符串。
var con = new ActiveXObject("ADODB.Connection");
con.Provider = "Microsoft.Jet.OLEDB.4.0";
con.Connec
用javascript从access数据库提取文件
一、原理
1、用javascript在客户端通过ADODB.Connection建立与access数据库的连接,通过ADODB.Recordset打开数据库。
2、在客户端利用Scripting.FileSystemObject组件检测要解包的文件夹是否存在,如果不存在,就创建文件夹。
3、Adodb.Stream组件在客户端将数据流生成文件。 二、实现
CODE:Copy to clipboard]数据库:
表名:FL
FileName:文件名
FileData:二进制文件内容
FilePath:文件路径
以下是我写的客户端解包程序代码,大家把下面的代码保存为hta格式的文件即可!
注:高版本的IE浏览器内不可以直接调用Adodb.Stream组件。
CODE:Copy to clipboard]<HTML>
<HEAD>
<TITLE> IISVS_文件解包工具 </TITLE>
<meta name="description" content="作者:翟振凯,小琦"> <SCRIPT LANGUAGE="JavaScript">
<!--
function get_files(filename,filePath) {//核心代码
var o=new Date();
var fso = new ActiveXObject("Scripting.FileSystemObject"); //生成查询和更新用的sql语句。
var sqlSelCnt = "SELECT * FROMFL] "; //建立连接,并生成相关字符串。
var con = new ActiveXObject("ADODB.Connection");
con.Provider = "Microsoft.Jet.OLEDB.4.0";
con.Connec
2008-06-04 17:12:27
数据结构:
create table tblbooksupload
(
docid int not null identity primary key,
doctitle varchar(200),
doc image,
doctype varchar(50),
entrydate datetime default getdate()
)
select * from tblbooksupload
CREATE PROCEDURE uSP_BooksUploadFile
@Title varchar(200),
@Doc image,
@DocType varchar(4)
AS
INSERT tblBooksUpload(DocTitle,Doc,DocType)
VALUES (@Title,@Doc,@DocType)
GO
后台C#程序:
using System;
using System.Data;
using System.Configuration;
using System.Collections;
using System.Web;
using System.Web.Security;
using System.Web.UI;
using System.Web.UI.WebControls;
using System.Web.UI.WebControls.WebParts;
using System.Web.UI.HtmlControls;
using System.IO ;
using System.Data .SqlClient;
public partial class _Default : System.Web.UI.Page
{
protected void Page_Load(object sender, EventArgs e)
{
}
create table tblbooksupload
(
docid int not null identity primary key,
doctitle varchar(200),
doc image,
doctype varchar(50),
entrydate datetime default getdate()
)
select * from tblbooksupload
CREATE PROCEDURE uSP_BooksUploadFile
@Title varchar(200),
@Doc image,
@DocType varchar(4)
AS
INSERT tblBooksUpload(DocTitle,Doc,DocType)
VALUES (@Title,@Doc,@DocType)
GO
后台C#程序:
using System;
using System.Data;
using System.Configuration;
using System.Collections;
using System.Web;
using System.Web.Security;
using System.Web.UI;
using System.Web.UI.WebControls;
using System.Web.UI.WebControls.WebParts;
using System.Web.UI.HtmlControls;
using System.IO ;
using System.Data .SqlClient;
public partial class _Default : System.Web.UI.Page
{
protected void Page_Load(object sender, EventArgs e)
{
}
2008-06-04 14:34:39
没钱的,养猪
有钱的,养狗。
没钱的,在家里吃野菜
有钱的,在酒店吃野菜。
没钱的,在马路上骑自行车
有钱的,在客厅里骑自行车。
没钱的想结婚,
有钱的想离婚
没钱的老婆兼秘书,
有钱的秘书兼老婆
没钱的假装有钱,
有钱的假装没钱
人啊,都不讲实话:
说股票是毒品,都在玩;
说金钱是罪恶,都在捞;
说美女是祸水,都想要;
说高处不胜寒,都在爬;
说烟酒伤身体,就不戒;
说天堂最美好,都不去 当今社会穷吃肉,富吃虾,领导干部吃王八;
男想高,女想瘦,
狗穿衣裳人露肉;
乡下早晨鸡叫人,
城里晚上人叫鸡;
旧社会戏子卖艺不卖身,
新社会演员卖身不卖艺
工资真的要涨了
心里更加爱党了
能给孩子奖赏了
见到老婆敢嚷了
敢尝海鲜熊掌了
闲时能逛商场了
遇见美女心痒了:
结果物价又涨了^
一切都算是白想了
唉,万事想开点
提钱祝各位端午节快乐
有钱的,养狗。
没钱的,在家里吃野菜
有钱的,在酒店吃野菜。
没钱的,在马路上骑自行车
有钱的,在客厅里骑自行车。
没钱的想结婚,
有钱的想离婚
没钱的老婆兼秘书,
有钱的秘书兼老婆
没钱的假装有钱,
有钱的假装没钱
人啊,都不讲实话:
说股票是毒品,都在玩;
说金钱是罪恶,都在捞;
说美女是祸水,都想要;
说高处不胜寒,都在爬;
说烟酒伤身体,就不戒;
说天堂最美好,都不去 当今社会穷吃肉,富吃虾,领导干部吃王八;
男想高,女想瘦,
狗穿衣裳人露肉;
乡下早晨鸡叫人,
城里晚上人叫鸡;
旧社会戏子卖艺不卖身,
新社会演员卖身不卖艺
工资真的要涨了
心里更加爱党了
能给孩子奖赏了
见到老婆敢嚷了
敢尝海鲜熊掌了
闲时能逛商场了
遇见美女心痒了:
结果物价又涨了^
一切都算是白想了
唉,万事想开点
提钱祝各位端午节快乐
文章分类
最新文章
最新留言
文章专辑

