1。ASP对Excel的基本操作
1)建立Excel对象
Set objExcelApp=CreateObject(Excel.Application)
objExcelApp.DisplayAlerts=false'不显示警告
objExcelApp.Application.Visible=false‘不显示界面
2)读取已有的Excel文件
strAddr=Server.MapPath(".")
objExcelApp.WorkBooks.Open(strAddr & "TempletTable.xls")
Set objExcelBook=objExc...
<html>
<head><meta http-equiv="Content-Type" content="text/html; charset=gb2312"><title>网页特效代码|JsCode.CN|---网页上模仿桌面右键菜单</title>
</head>
<body>右击鼠标看看 -_-! <style type="text/css"> <!-- body {font-size: 9pt;} table {font-size: 9pt; cursor: default; margin: 0;} tr ...
<!--文件上传
--><!--#include file="config.asp"--><!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"><html><head><meta http-equiv="Content-Type" content="text/html; charset=gb2312"><title>Upload Files</title><style><!--* BODY{background:#ffffff;} .p9{ font-size: 9pt; font-family: 宋体...
1。ASP对Excel的基本操作
1)建立Excel对象
Set objExcelApp=CreateObject(Excel.Application)
objExcelApp.DisplayAlerts=false'不显示警告
objExcelApp.Application.Visible=false‘不显示界面
2)读取已有的Excel文件
strAddr=Server.MapPath(".")
objExcelApp.WorkBooks.Open(strAddr & "TempletTable.xls")
Set objExcelBook=objExcelA...
具体编程如下:<% url_str=c.ServerVariables("REMOTE_ADDR")url=split(url_str,".")if url(0)=127 and url(1)=0 and url(2)=0 and url(3)>0 and url(3)<256 thenelseresponse.Write(url_str)end if%>