⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 odbc_upload.asp

📁 aspupload
💻 ASP
字号:
<!-- AspUpload Code samples: odbc_upload.asp -->
<!-- Invoked by odbc.asp -->
<!-- Copyright (c) 2001 Persits Software, Inc. -->
<!-- http://www.persits.com -->

<HTML>
<BODY>

<%
	Set Upload = Server.CreateObject("Persits.Upload")

	' Capture files
	Upload.Save "c:\upload"

	' Obtain file object
	Set File = Upload.Files("THEFILE")

	If Not File Is Nothing Then
		' Build ODBC connection string
		Connect = "Driver={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath(".\aspupload.mdb")

		' If you use SQL Server, the connecton string must look something like this:
		' Connect = "Driver=SQL Server;Server=MYSRV;Database=master;UID=sa;PWD=xxx"

		' Build SQL INSERT statement
		SQL = "INSERT INTO MYIMAGES(image_blob, filename, description, filesize) VALUES(?, '"
		SQL = SQL & File.Filename & "', '"
		SQL = SQL & Replace(Upload.Form("DESCR"), "'", "''") & "', "
		SQL = SQL & File.Size & ")"

		' Save to database
		File.ToDatabase Connect, SQL
		Response.Write "File saved."
	Else
		Response.Write "File not selected."
	End If
%>

</BODY>
</HTML>

⌨️ 快捷键说明

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