需求：读取一个excel文件 把excel文件都显示在页面
其实这个很简单 就一个文件上传 然后读取excel 获取数据 循环显示
重点是显示的数据不完整
第一行没有
代码是这样写的
      Set eConn = Server.CreateObject("ADODB.Connection")
      Driver = "Driver={Microsoft Excel Driver (*.xls)};"
      DBPath = "DBQ=" & Server.MapPath(fname)
      '调用Open 方法打开数据库
      eConn.Open Driver & DBPath [更多...]

有网友问到 ASP 中 UTF-8 转 GB2312 的问题
使用的是网上流行的　UTF2GB(UTFStr) 函数。
代码甚是复杂，但其实目的是为了实现 JScript 里 decodeURIComponent 功能。
既然 JScript 有 decodeURIComponent，而且 ASP 又可以使用 JScript 为什么现成的内置函数不用呢？如：
<script language="JScript" runat="Server"> 
function decodeURL(s) { return decodeURIComponent(s) }  
</script>  [更多...]

       朋友的网站老是被一些发帖机乱发帖子，很是痛苦，换过几个验证码程序都还是被乱发，动网的ASP验证码程序可以说很强，但还是逃避不了被乱发的命运。几经测试，使用这个验证码程序暂时可以有效防止那些发垃圾资料的机器。推荐使用此随机验证码程序，比较优秀。(PS:这个验证码程序可以防住大部分信息机器人，但还有个别还是可以偶尔发进来，虽然不能100%防住所有发贴机，但有这样的效果我已经很满意了。)
       完全免费的传统ASP的VBScript 。 
       安全码是完全随机的。 
       动态图像处理。 
       没有图像文件的要求。 
       没有组件需要。 
       创建一个跨浏览器兼容的动态随机captcha图像。  [更多...]

        使用asp的jpeg组件，我们可以做出各种样式的漂亮的验证码，只是苦于目前大多数服务器的JPEG组件版本太低，无法消除文字而造成的毛边，除非用非透明模式去绘制字体，但这样又无法达到仿制discuz论坛验证码的目的，因此，暂且先不管这么多了，文字有毛边锯齿就先随着它，这并不能成为当前验证码的缺憾。该验证码非常简单明了，就算你是新手，在你查看过代码注释后，绝对也可以修改自如，可以很容易的修改成文字验证码、加法或其它算法的验证码等等。 [更多...]

Function QuickSort(vData, Low, Hi)
 If Not IsArray(vData) Then Exit Function
 Dim lTmpLow
 Dim lTmpHi
 Dim lTmpMid
 Dim vTempVal
 Dim vTmpHold [更多...]

Dim aData
aData = Array(3,2,4,1,6,0)

Call ResponseArray(aData, "原来顺序")
Call ResponseArray(SelectSort(aData), "选择排序")
Call ResponseArray(QuickSort(aData), "快速排序")
Call ResponseArray(InsertSort(aData), "插入排序")
Call ResponseArray(BubbleSort(aData), "冒泡排序")

[更多...]

Function MoveR(Rstr)
 Dim i,SpStr
 SpStr = Split(Rstr,",")
 For i = 0 To Ubound(Spstr)
  If I = 0 then
   MoveR = MoveR & SpStr(i) & ","
  Else
   If instr(MoveR,SpStr(i))=0 and i=Ubound(Spstr) Then [更多...]

Function Sort(ary)
   Dim KeepChecking,I,FirstValue,SecondValue
   IF Not IsArray(ary) Then Exit Function
   KeepChecking = True
   Do Until KeepChecking = False
     KeepChecking = False
     For I = 0 To UBound(ary)
       IF I = UBound(ary) Then Exit For [更多...]

dim stream
set stream = Server.CreateObject("ADODB.Stream")
stream.mode = 3 '1－读，2－写，3－读写
stream.type = 1 '1－二进制，2－文本
stream.Open
dataStream.position = index
dataStream.CopyTo stream, count '将另一 Stream 对象 dataStream 从 index 到 index+count 的数据拷贝到 stream
stream.SaveToFile filePath, 2 '将 stream 数据保存为文件，第二个参数：1－不允许覆盖，2－覆盖写入
stream.Close
set stream = nothing [更多...]

        FSO - FileSystemObject 或 Scripting.FileSystemObject 的缩写，为 IIS 内置组件，用于操作磁盘、文件夹或文本文件。FSO 的对象、方法和属性非常的多，这里用示例的方式列出常用的，注意：《VBScript 语言参考》或《JScript 语言参考》中的：《FileSystemObject 用户指南》和《Scripting 运行时库参考》便是微软给出的 FileSystemObject 完整参考。FSO 不能操作二进制文件，要操作二进制文件，请使用：ADODB.Stream。

[更多...]

由于项目需要,须在ASP服务器1上,将每个产品的内容和图片发送到另外一个ASP服务器2
若无图片,产品数据可在服务器1上面用
XmlHttp.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
这样在服务器2上面可以正常接收到产品数据.但如果产品有图片则需要以multipart/form-data编码POST到服务器2上面.
下面对以multipart/form-data编码POST到服务器作一些说明。 [更多...]

ASP获取POST网页内容的函数。
函数中参数的说明：
RefererUrl：来源页面地址
PostUrl：Form提交页面地址
PostData：提交的数据。（如：username=username&password=password如此类推）
Coding：网页的编码格式 [更多...]