ASP¼ÓÃÜ
¸øÄãÒ»¸ö΢ÈíµÄ¼ÓÃܺö«¶«£º
Script Encoder ÏÂÔØµØÖ·£º
http://msdn.microsoft.com/scripting/vbscript/download/x86/sce10en.exe
Windows Script Engine 5.0
Windows 95, Windows 98 & Windows NT 4.0 - CHS ÖÐÎİæ ÏÂÔØµØÖ·£º
http://www.microsoft.com/msdownload/vbscript/scripting.asp?msid=32186&plat=x86
&lang=Chinese/Simplified
SCRENC.EXEÕâÊÇÒ»¸öÔËÐÐÔÚDOS PROMAPTµÄÃüÁ¾ß£¬Ëüʹ½Å±¾Éè¼ÆÕß¿ÉÒÔ¶Ô×îÖյĽű¾½øÐбàÂ룬´Ó¶øÊ¹ Web Ö÷»úºÍ Web ¿Í»§²»Äܲ鿴»òÐÞ¸ÄËüÃǵÄÔ´´úÂë¡£²»¹ýÓÐÒ»µãÐèҪעÒâµÄÊǼÓÃܺóµÄ³ÌÐòÒªÇóÓû§µÄÓÎÀÀÆ÷±ØÐëʹÓÃInternet Explorer 5.0ÒÔÉϵİ汾¡£¼ÓÍêÃܺóµÄ½Å±¾±ä³ÉÀàËÆÓÚÈçϵÄÄÚÈÝ£º
½Å±¾¼ÓÃܳÌÐòÖ»¶Ô½Å±¾´úÂë½øÐмÓÃÜ£¬ÎļþµÄÆäËûÄÚÈݲ»¶¯ÇÒÒÔÆÕͨÎı¾ÐÎʽÏÔʾ¡£ÒªÊ¹Óýű¾¼ÓÃܳÌÐò£¬ÒÔͨ³£·½·¨¶ÔÎı¾½øÐпª·¢ºÍµ÷ÊÔ£¬È»ºóʹÓøÃʵÓóÌÐò¶Ô×îÖյĽű¾½øÐмÓÃÜ¡£ ½Å±¾¼ÓÃܳÌÐòÔÚÔ´´úÂëÖÐʹÓñê¼ÇÀ´±êʶ¼ÓÃÜ¿ªÊ¼µÄλÖá£
¶ÔÓÚ Visual Basic Scripting Edition (VBScript)£¬ÈçÏÂʾÀýÏÔʾÁËÈçºÎʹÓñàÂë±ê¼ÇÀ´ÏÔʾÆÕͨÎı¾µÄ°æÈ¨ÐÅÏ¢£º
ʾÀý
ÈçÏÂÊÇʹÓýű¾¼ÓÃܳÌÐòµÄÒ»¸öÀý×ÓÒÔ¼°¶ÔÆä½á¹ûµÄ¼òµ¥½âÊÍ£º
¶ÔÊäÈëÎļþ test.html ½øÐмÓÃÜ£¬Éú³ÉÊä³öÎļþ encode.html£¬Ê¹Óãº
screnc test.html encode.html
¶ÔÊäÈëÎļþ test.htm ½øÐмÓÃÜ£¬²¢ÓñàÂëºóµÄÊä³öÎļþ¸²¸ÇÊäÈëÎļþ£¬Ê¹Óãº
Ïà¹ØÎĵµ£º
¡¡1.¼Ç¼¼¯¹Ø±Õ֮ǰÔٴδò¿ª:
¡¡¡¡------------------------------------
¡¡¡¡sql="select * from test"
¡¡¡¡rs.open sql,conn,1,1
¡¡¡¡if not rs.eof then
¡¡¡¡dim myName
¡¡¡¡myName=rs("name")
¡¡¡¡end if
¡¡¡¡sql="select * from myBook"
¡¡¡¡rs.open sql,conn,1,1
¡¡¡¡------------------------------------ ......
conndb.asp
<%
Session.CodePage=65001
response.Charset="utf-8"
%>
<%
'Êý¾Ý¿âÁ¬½ÓÎļþ
dim conn
dim connstr
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source="+server.mappath("../date/#heihuhuhuajian.mdb")+";Jet OLEDB:Database Pass ......
Ô°æ
upload_5xsoft.inc ÎļþÄÚÈÝ
<SCRIPT RUNAT=SERVER LANGUAGE=VBSCRIPT>
dim Data_5xsoft
Class upload_5xsoft
dim objForm,objFile,Version
Public function Form(strForm)
strForm=lcase(strForm)
if not ......
¿Í»§¶Ë´úÂ룺
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>Ê ......
<% '---µ÷ÓÃWebService »ñÈ¡Exchange2007ÒÑÖªÓû§µÄÓʼþδ¶ÁÊý
'---²ÎÊý˵Ã÷----
'url:webservice µÄ·¾¶
'params:·½·¨²ÎÊý
'method:·½·¨Ãû³Æ
'dataType:·µ»ØµÄÊý¾ÝÀàÐÍ
function webServices(url,params,method,dataType)
set objXML=Server.CreateObject("MSXML2.XMLHTTP")
objXML.open "post& ......