odbcexport.asp

来自「aspupload」· ASP 代码 · 共 42 行

ASP
42 行
字号 
<!-- AspUpload Code samples: odbcexport.asp -->
<!-- Demonstrates exporting files from a database via ODBC -->
<!-- Copyright (c) 2001 Persits Software, Inc. -->
<!-- http://www.persits.com -->

<HTML>
<BODY>

<%
	' Build ODBC connection string
	Connect = "Driver={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath(".\aspupload.mdb")
	
	' For SQL Server use a string simlar to this:
	' Connect = "Driver=SQL Server;Server=MYSERVER;UID=sa;PWD=xxxxx"
	Set rs = Server.CreateObject("adodb.recordset")

	Set Upload = Server.CreateObject("Persits.Upload")
	
	' Open MYIMAGES table
	rs.Open "MYIMAGES", Connect, 2, 3

	' Scroll through records
	Count = 0
	While Not rs.EOF
		Filename = Trim(rs("filename"))
		
		SQL = "select image_blob from myimages where id=" & rs("id")
		Upload.FromDatabase Connect, SQL, "c:\upload\" & Filename

		Response.Write "File exported: c:\upload\" & Filename & "<BR>"
		Count = Count + 1

		rs.MoveNext
	Wend

	Response.Write "<P>" & Count & " files exported."

%>

</BODY>
</HTML>

odbcexport.asp - 源码说明

本页面展示了「aspupload」中的 odbcexport.asp 源码文件，采用 ASP 编程语言编写，共 42 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫开发者社区收录了大量与ASP相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?