aspÁ¬½Ó¼°»ù±¾²Ù×÷Êý¾Ý¿â
СµÜ×î½üѧϰasp,ÇëÎʸ÷λϺÊý¾Ý¿âµÄһЩÎÊÌâ¹þ
ÍøÉÏËÑһϾÍÓкܶà ÿÖÖÊý¾Ý¿âÁ¬½Ó×Ö·û¶¼²»Ò»Ñù ÍøÉÏÕÒ¸ö¿´¿´ ÁíÍâÔÙ¿´¿´¼Ç¼¼¯µÄһЩ֪ʶ ѧѧSQLÓïÑÔ
»ù±¾µÄÊý¾ÝÏÔʾ¡¢¸üС¢É¾³ý¾ÍÄÜʵÏÖÁË
VBScript code:
<%
Dim objConn
'on error resume next
call conn_init()
sub conn_init()
'on error resume next
Set objConn=Server.CreateObject("ADODB.Connection")
objConn.ConnectionString="Provider=Microsoft.Jet.OLEDB.4.0;"&"Data Source="&Server.MapPath("data/database.mdb")
if err.number<>0 then
err.clear
set objconn=nothing
response.write "Êý¾Ý¿âÁ¬½Ó³ö´í£¡"
Response.End
else
objConn.Open
if err then
err.clear
set objconn=nothing
response.write "Êý¾Ý¿âÁ¬½Ó³ö´í£¡"
Response.End
end if
end if
end sub
sub endConnection()
objconn.close
set objconn=nothing
end sub
%>
Ïà¹ØÎÊ´ð£º
ÎÒÕÒÁËÒ»¸öα¾²Ì¬´úÂ룬ÈçÏ£º
index.asp
<!--#include file="config.asp"-->
<ol>
<%
Set rs=server.CreateObject("adodb.recordset") & ......
owc11Âú×ã²»ÁËÒªÇó£¬ÓÐûÓиüºÃµãµÄ£¬aspÄܵ÷ÓõÄ
Ŀǰû·¢ÏÖ£¬°ïÄã¶¥£¡
Ó¦¸ÃûÓÐÁ˰É
×ÔÒÑд¡£¶¥
°ï¶¥£¬¹Ø×¢£¡
ºÃÏñ¾ÍÕâ¸öÁË£¬Ä¿Ç°»¹Ã»¿´µ½ÆäËûµÃÉÏÊÐʹÓᣡ£¡£°ï¶¥£¡
×Ô¼ºÔÙ¶¥Ò»ÏÂ
ºÃÏñÊÇûÓÐ ......
Imports System.ComponentModel
Imports System.Web.UI
Imports System.Web.UI.Design
Imports System.Web.UI.WebControls
Namespace CBDAspNet.WebControls.HTML
''' <summary>
'' ......
¸÷λ´óϺ£º
AspÈçºÎÄÜ×öµ½³¬´óÎļþµÄÉÏ´«¹ÜÀíÄØ£¿ÕâÀﳬ´óÎļþÖ¸µÄÊÇ£º100M ÖÁ 2G Ö®¼äµÄÒ»¸öÎļþ£¬Æ©È磺¼à¿ØÂ¼Ïñ Îļþ
ÎÒÏÖÔÚÓõÄÊÇFtpÉÏ´«£¬ÓÃÁË´ó°ëÄêÁË£¬ÏÖÔÚ·¢ÏÖFTPÀïÃæ·Ç³£»ìÂÒ£¬ºÜ¶àÓû§ÉÏ´«µÄ¶ ......
ÔÚaspÀïÔõôµ÷ÓÃjavaдµÄwebservice·½·¨£¬Óкܶ෽·¨
- <message name="RtPnrIn">
<part name="bstrPnrNO" type="s:string" />
<part name ......