ASP VB.NET 客户端上传文件到服务器端
Dim strPath As String = Server.MapPath("~\文件夹")
'判断保存文件路径是否存在 不存在则创建
If Not Directory.Exists(strPath) Then
Directory.CreateDirectory(strPath)
End If
Dim PATH As String = Server.MapPath((FileUpload1.FileName))
'如果文件存在 则上传
If (FileUpload1.HasFile) Then
FileUpload1.PostedFile.SaveAs(PATH)
End If
'一:先把EXCEL导入dateView
'二:然后将dateView里的数据导入到数据库里面
'EXCEL 的连接串
Dim sConnectionString As String = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=" + PATH + ";" & _
"Extended Properties=Excel 8.0;"
'建立EXCEL的连接
Dim objConn As New OleDbConnection(sConnectionString)
objConn.Open()
Dim objCmdSelect As OleDbCommand = New OleDbCommand("SELECT
相关文档:
在我开发BS结构程序中,由于经常需要在ORACLE中处理一些容量较大的文本数据,所以经过反复测试终于用ASP成功解
决了大文本数据在ORACLE下存取问题。
一、运行环境:
1、Microsoft Windows 2000 Server + IIS 5.0
2、Oracle8i中文标准版
二、建立数据表:
CREATE TABLE SYSTEM.TEST(
B ......
<%
dim db
set db=Server.CreateObject("Adodb.Connection")
db.Open "Driver={Microsoft Access Driver (*.mdb)};Dbq=" & Server.Mappath("../mdb/count.mdb")
dim strSql,rs,visitNum
strSql="Select visitNum from counter "
SET rs=db.Execute(strSql)
if session("agai ......
最简单的做法是在页面的<head></head>标签中加入以下代码:
<meta http-equiv="Refresh" content="10;url='xxx.asp'">
这样就会在页面打开后10秒钟跳转到xxx.asp了。
也可以用javascript的settimeout来完成,在页面中加入以下代码:
<script language=javascript>
var the_timeout = setTime ......
今天在用utf-8编码用在新的网站上,不想问题还真多,所以找了些文章,帖子,看了看,等下有用的就贴下面了。
今天,我开始把 CODEPAGE="936" 改成 CODEPAGE="65001"
把charset=gb2312改成 charset=utf-8
可是还是乱码,只要是脚本用的地方还是乱码,现在终于找到问题了,就是当脚本输出时候,要以utf-8编码输出。
就是 ......
对于Recordset分页时出现负数的现象,相信会有很多人遇到过这个问题,有时百度、GOOGLE也不得其解,现在由我来总结一下。
出现负数,主要和游标类型有关系。(为举例方便,假设已经有一个conn.asp链接数据库的文件并且已经include)现在举一个例子,代码如下:
'===================================================== ......