以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 放一个直接访问数据库二进制字段并打开文档的例子,欢迎完善 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=75004) |
-- 作者:bahamute -- 发布时间:2015/9/24 12:02:00 -- 放一个直接访问数据库二进制字段并打开文档的例子,欢迎完善 终于成功,sql数据库,欢迎大家完善。 Dim cmd As SQLCommand = new SQLCommand() cmd.C.o.n.n.e.c.t.i.o.n.N.a.m.e = "salaryMS" Dim dt As DataTable cmd.CommandText = "s.e.l.e.c.t 文件 from {文件模板} where 文件名 = \'考勤导入模板\'" Dim xlsByte() As Byte dt=cmd.ExecuteReader() Dim dr As DataRow = dt.DataRows(0) xlsByte = dr("文件") Dim fl As String = ProjectPath & "考勤导入模板.xls" Dim fs As New IO.FileStream(fl,IO.FileMode.Create,IO.FileAccess.Write) Dim bw As New IO.BinaryWriter(fs) bw.Write(xlsByte) bw.Close() fs.Close() Dim Proc As New Process \'打开文件 Proc.File = fl Proc.Start()
[此贴子已经被作者于2015/9/24 15:46:59编辑过]
|
-- 作者:大红袍 -- 发布时间:2015/9/24 12:11:00 -- mark
|
-- 作者:2 -- 发布时间:2015/9/24 12:24:00 -- |