ÔÚ·ÃÎÊASPÍøÕ¾Ò³ÃæÊ±µ÷ÓÃÁíÒ»¸öÍøÕ¾Ò³ÃæÄÚÈÝ
Èç¹ûÔÚÒ»¸öÍøÕ¾µÄÒ³ÃæÖÐÏëµ÷ÓÃÆäËûÍøÕ¾Ò³ÃæÄÚÈÝ£¬Ö±½ÓÓÃһϴúÂë¾Íok£¬http://www.wanyusoft.com/index.asp Õâ¸ö·¾¶¾ÍÊÇËùÒªµ÷ÓõÄÒ³ÃæÂ·¾¶¡£
<%
response.write(getHTTPPage("http://www.wanyusoft.com/index.asp"))
function getHTTPPage(url)
dim http
set http=createobject("MSXML2.XMLHTTP")
Http.open "GET",url,false
Http.send()
if Http.readystate<>4 then
exit function
end if
getHTTPPage=bytes2BSTR(Http.responseBody)
set http=nothing
if err.number<>0 then err.Clear
end function
Function bytes2BSTR(vIn)
dim wanyusoft_strReturn
dim i,ThisCharCode,NextCharCode
wanyusoft_strReturn = ""
For i = 1 To LenB(vIn)
ThisCharCode = AscB(MidB(vIn,i,1))
If ThisCharCode < &H80 Then
wanyusoft_strReturn = wanyusoft_strReturn & Chr(ThisCharCode)
Else
NextCharCode = AscB(MidB(vIn,i+1,1))
wanyusoft_strReturn = wanyusoft_strReturn & Chr(CLng(ThisCharCode) * &H100 + CInt(NextCharCode))
i = i + 1
End If
Next
bytes2BSTR = wanyusoft_strReturn
End Function
%>
Ïà¹ØÎĵµ£º
<%@ Page Language="C#" %> <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<script runat="server"> </script>
<html xmlns="http://www.w3.org/1999/xhtml" > <head runat="server">
<title ......
ÎÊÌ⣺
aspÈçºÎµ÷Óô洢¹ý³ÌʵÏÖ·ÖÒ³£¡
´æ´¢¹ý³ÌÈçÏ£º
CREATE PROCEDURE GetRecordfromPage
@tblName varchar(255), -- ±íÃû
@fldName varchar(255), &nb ......
Top-CMSÖ÷ÒªÌØµã£º
1.ϵͳ²ÉÓÃASP+COM¼¼Êõ¿ª·¢£¬Ò»·½Ãæ×î´ó³Ì¶È±£ÕÏϵͳ°²È«ÐÔ£¬ÁíÒ»·½Ã漫´óµÄÌá¸ßϵͳÔËÐÐЧÂÊ¡£
2.ϵͳÍêÈ«»ùÓÚB/Sģʽ¹¹½¨£¬Ö»ÒªÔÚ·þÎñÆ÷Éϰ²×°Á˱¾ÏµÍ³£¬¿Í»§»ú²»ÐèÒª°²×°ÆäËûÈí¼þ£¬Ö±½ÓʹÓÃIE±ã¿Éä¯ÀÀ¡£
3.ϵͳ±¾Éí¼¯³ÉÖîÈ繫¸æ¡¢×¨Ìâ¡¢ÔÚÏßµ÷²é¡¢Óû ......
Ò»°ãÎÒÃÇ×ö³ÌÐò£¬±ÈÈçÓÃVC,¿ª·¢½çÃæÊǸöÍ·Í´µÄÎÊÌâ¡£¿ª·¢Ð§ÂÊÌ«µÍ£¬¶øÇÒ×ö³öÀ´µÄЧ¹ûҲ̫²îÁË¡£¿´ÆðÀ´Ì«²»ÃÀ¹ÛרҵÁË¡£ÁíÒ»·½ÃæHMTL×ö½çÃæÊÇÓÖ·½±ãÓÖÃÀ¹Û£¬ÇÒ»¹ÌìÉúÖ§³Öscript½Å±¾¡£·Ç³£Ç¿´ó°¡¡£ÎÒÃÇÒ»°ãʹÓÃhtmlµÄʱºò¶¼ÊÇ×öµÄB/S½á¹¹µÄÈí¼þ£¬ÐèÒªÒ»¸öWEB·þÎñÆ÷¡£ ......
ʵÏÖÁ˼òµ¥µÄÊý¾Ý¿âÁ¬½Ó£¬µÃµ½¼Ç¼¼¯£¬µÃµ½¶þάÊý×飬ִÐÐij¸öÓï¾ä£¬ÆäʵÕâ¸öÀà¿ÉÒÔ¼ÌÐøÀ©³ä£¬±ÈÈçÏȶÁÈ¡±äÁ¿£¬µÃµ½Ö´ÐдÎÊý£¬¼òµ¥·ÖÒ³µÈµÈ¡£¡££¬Æª·ùÓÐÏÞ£¬×Ô¼ºÀ©³ä
'----------------------------------------------
'Êý¾Ý¿â²Ù×÷
'----------------------------------------------
'¼ò»¯µÄÊý¾ÝÀà
Class dbconn
pub ......