范冰冰佟大为溶室视频,男女动态xb美女视频

重要提示：本文章是 Microsoft 軟件自動翻譯的結(jié)果，而非專業(yè)譯者翻譯的結(jié)果。 Microsoft 提供專業(yè)人員翻譯的文章、由自動翻譯生成的文章以及來自 Microsoft 社區(qū)的文章翻譯，因此你能夠以自己的語言閱讀所有知識庫文章。需要注意的是，由自動翻譯生成的文章（包括 Microsoft 社區(qū)審閱的文章）可能包含詞匯、句法或語法錯誤。對于因不正確的內(nèi)容翻譯或使用不正確的內(nèi)容翻譯而造成的不準確或錯誤或任何損害，Microsoft 概不負責(zé)。

通用網(wǎng)關(guān)接口 (CGI) 應(yīng)用程序可以在任何可訪問的環(huán)境變量和標(biāo)準輸入或標(biāo)準輸出的編程語言編寫。功能強大的文本處理 Microsoft Visual Basic 編程語言的功能，因為許多 Web 開發(fā)人員想在 Visual Basic 中編寫 CGI 程序。本文闡釋了在 Visual Basic 編寫 CGI 應(yīng)用程序的技術(shù)，并提供了簡單示例，Visual Basic CGI。

詳細信息

注意：Microsoft 提供的編程示例僅用于說明，沒有任何明示或暗示的擔(dān)保。這包括但不限于適銷性或特定用途適用性的暗示擔(dān)保。本文假定您熟悉所演示的編程語言和用于創(chuàng)建和調(diào)試過程的工具。Microsoft 的支持工程師可以幫助解釋某個特定過程的功能，但是他們不會修改這些示例以提供額外的功能或構(gòu)建過程以滿足您的特定要求。

檢索環(huán)境變量

若要檢索環(huán)境變量，請使用那么 Environ$函數(shù)在 Visual Basic 中，如下所示：

VALUE = Environ$(NAME)

請注意，名稱是您要檢索環(huán)境變量。在值中返回其值。

從標(biāo)準輸入中的讀取和寫入到標(biāo)準輸出

使用 Win32 ReadFile函數(shù)來讀取標(biāo)準輸入和寫文件函數(shù)寫入到標(biāo)準輸出。這些功能要求您提供到 STDIN 或標(biāo)準輸出句柄。可以使用GetStdHandle函數(shù)獲取 STDIN 或標(biāo)準輸出句柄。這篇文章，在別名用于GetStdHandle函數(shù)簡化函數(shù)調(diào)用。這些函數(shù)的聲明如下所示：

Public Declare Function stdin Lib "kernel32" Alias "GetStdHandle" _
(Optional ByVal Handletype As Long = STD_INPUT_HANDLE) As Long

Public Declare Function stdout Lib "kernel32" Alias "GetStdHandle" _
(Optional ByVal Handletype As Long = STD_OUTPUT_HANDLE) As Long

Public Declare Function ReadFile Lib "kernel32" _
(ByVal hFile As Long, ByVal lpBuffer As Any, ByVal nNumberOfBytesToRead As Long, _
lpNumberOfBytesRead As Long, Optional ByVal lpOverlapped As Long = 0&) As Long

Public Declare Function WriteFile Lib "kernel32" _
(ByVal hFile As Long, ByVal lpBuffer As Any, ByVal nNumberOfBytesToWrite As Long, _
lpNumberOfBytesWritten As Long, Optional ByVal lpOverlapped As Long = 0&) As Long

傳遞給GetStdHandle函數(shù)的常數(shù)的定義如下：

Public Const STD_INPUT_HANDLE = -10&
Public Const STD_OUTPUT_HANDLE = -11&

請參考 MSDN 文檔的這些函數(shù)中的每個參數(shù)的定義。在以下示例中，由常 CGI 環(huán)境變量的完整列表。這將列出在一起上 Ctrl J.所有常量此外通過提供編譯器和 IntelliSense 驗證，從而消除編程錯誤，但不會阻止您從您自己的字符串輸入。

示例代碼

為簡單起見，省略了錯誤捕獲，在下面的示例 (Hello.bas):

Option Explicit

Public Const STD_INPUT_HANDLE = -10&
Public Const STD_OUTPUT_HANDLE = -11&

Public Const CGI_AUTH_TYPE         As String = "AUTH_TYPE"
Public Const CGI_CONTENT_LENGTH    As String = "CONTENT_LENGTH"
Public Const CGI_CONTENT_TYPE      As String = "CONTENT_TYPE"
Public Const CGI_GATEWAY_INTERFACE As String = "GATEWAY_INTERFACE"
Public Const CGI_HTTP_ACCEPT       As String = "HTTP_ACCEPT"
Public Const CGI_HTTP_REFERER      As String = "HTTP_REFERER"
Public Const CGI_HTTP_USER_AGENT   As String = "HTTP_USER_AGENT"
Public Const CGI_PATH_INFO         As String = "PATH_INFO"
Public Const CGI_PATH_TRANSLATED   As String = "PATH_TRANSLATED"
Public Const CGI_QUERY_STRING      As String = "QUERY_STRING"
Public Const CGI_REMOTE_ADDR       As String = "REMOTE_ADDR"
Public Const CGI_REMOTE_HOST       As String = "REMOTE_HOST"
Public Const CGI_REMOTE_USER       As String = "REMOTE_USER"
Public Const CGI_REQUEST_METHOD    As String = "REQUEST_METHOD"
Public Const CGI_SCRIPT_NAME       As String = "SCRIPT_NAME"
Public Const CGI_SERVER_NAME       As String = "SERVER_NAME"
Public Const CGI_SERVER_PORT       As String = "SERVER_PORT"
Public Const CGI_SERVER_PROTOCOL   As String = "SERVER_PROTOCOL"
Public Const CGI_SERVER_SOFTWARE   As String = "SERVER_SOFTWARE"

Public Declare Function Sleep Lib "kernel32" _
(ByVal dwMilliseconds As Long) As Long

Public Declare Function stdin Lib "kernel32" Alias "GetStdHandle" _
(Optional ByVal Handletype As Long = STD_INPUT_HANDLE) As Long

Public Declare Function stdout Lib "kernel32" Alias "GetStdHandle" _
(Optional ByVal Handletype As Long = STD_OUTPUT_HANDLE) As Long

Public Declare Function ReadFile Lib "kernel32" _
(ByVal hFile As Long, ByVal lpBuffer As Any, ByVal nNumberOfBytesToRead As Long, _
lpNumberOfBytesRead As Long, Optional ByVal lpOverlapped As Long = 0&) As Long

Public Declare Function WriteFile Lib "kernel32" _
(ByVal hFile As Long, ByVal lpBuffer As Any, ByVal nNumberOfBytesToWrite As Long, _
lpNumberOfBytesWritten As Long, Optional ByVal lpOverlapped As Long = 0&) As Long

Sub Main()

    Dim sReadBuffer As String
    Dim sWriteBuffer As String
    Dim lBytesRead As Long
    Dim lBytesWritten As Long
    Dim hStdIn As Long
    Dim hStdOut As Long
    Dim iPos As Integer
    
    ' sleep for one minute so the debugger can attach and set a break
    ' point on line below
    ' Sleep 60000
    
    sReadBuffer = String$(CLng(Environ$(CGI_CONTENT_LENGTH)), 0)
    
    ' Get STDIN handle
    hStdIn = stdin()
    ' Read client's input
    ReadFile hStdIn, sReadBuffer, Len(sReadBuffer), lBytesRead

    ' Find '=' in the name/value pair and parse the buffer
    iPos = InStr(sReadBuffer, "=")
    sReadBuffer = Mid$(sReadBuffer, iPos + 1)
    
    ' Construct and send response to the client
    sWriteBuffer = "HTTP/1.0 200 OK" & vbCrLf & "Content-Type: text/html" & _
                    vbCrLf & vbCrLf & "Hello "
    hStdOut = stdout()
    WriteFile hStdOut, sWriteBuffer, Len(sWriteBuffer) + 1, lBytesWritten
    WriteFile hStdOut, sReadBuffer, Len(sReadBuffer), lBytesWritten

End Sub

HTML 表單以測試 CGI (Test.htm)

<HTML>
<HEAD>
<TITLE>Testing VB CGI</TITLE>
</HEAD>
<BODY>
<FORM action="/cgi-bin/hello.exe" method="POST">
<INPUT TYPE="TEXT" NAME="Name"> Name<BR>
<INPUT TYPE="SUBMIT">
</FORM>
</BODY>
</HTML>

若要生成簡單的 CGI Hello.exe 文件的步驟如下：

標(biāo)準的.exe 項目創(chuàng)建一個新項目。
從項目中刪除窗體。
將模塊添加到該項目并將其命名為 HELLO。
設(shè)為啟動對象（在項目屬性中）的 Sub Main。
復(fù)制上面的 Visual Basic 代碼并將其粘貼到模塊。
使 Hello.exe。

注釋：

該代碼示例演示如何處理 HTTP POST 請求。若要處理一個 GET 請求，CGI 應(yīng)用程序需要檢索 QUERY_STRING 環(huán)境變量。QUERY_STRING 變量包含和格式由分隔的名稱/值對"名稱 = Joe 和顏色 = Red。"請注意，使用 URL 編碼，所有的空格將被轉(zhuǎn)換為+，如！的所有特殊字符會轉(zhuǎn)換為其十六進制 ASCII 值。換句話說，將字符串"Hello，世界！"表示為"Hello，+ 全球 21%。"Visual Basic CGI 應(yīng)用程序必須實現(xiàn)所有分析的代碼。
服務(wù)啟動時的 CGI 應(yīng)用程序，因為它可能不能訪問網(wǎng)絡(luò)共享。
請注意 CGI 運行作為一個服務(wù)，它與服務(wù)器進行通信。因此，視覺界面窗體、控件和消息框是完全沒有意義。事實上，消息框?qū)?dǎo)致一個 CGI 應(yīng)用程序停止響應(yīng)。
以便不會顯示默認的錯誤消息框應(yīng)該在 Visual Basic 中的 CGI 代碼進行錯誤處理。可以在服務(wù)器上的錯誤消息記錄，也可以將它們寫到用戶的瀏覽器。
Visual C 調(diào)試器可以調(diào)試在 Visual Basic 編寫的應(yīng)用程序。因此，您可以使用 CGI 調(diào)試下面提到的技術(shù)。調(diào)試與 Visual C Visual Basic 應(yīng)用程序，選擇將編譯為本機代碼，，然后選擇創(chuàng)建符號調(diào)試信息并無優(yōu)化。完成并生成.exe 時，Visual C 可以附加到運行 CGI 應(yīng)用程序用 Visual Basic 編寫的。
若要測試 CGI 應(yīng)用程序，請將其復(fù)制到 IIS 虛擬目錄的執(zhí)行權(quán)限。
請注意，運行時錯誤或?qū)υ捒蛑械?Visual Basic 代碼可能導(dǎo)致 CGI 應(yīng)用程序停止響應(yīng)。如果 CGI 應(yīng)用程序停止響應(yīng)，則可以在 Visual Studio 調(diào)試器中運行。的其他信息，請單擊下面的文章編號，以查看 Microsoft 知識庫中相應(yīng)的文章：

本站僅提供存儲服務(wù)，所有內(nèi)容均由用戶發(fā)布，如發(fā)現(xiàn)有害或侵權(quán)內(nèi)容，請點擊舉報。

中文字幕理论片,69视频免费在线观看,亚洲成人app,国产1级毛片,刘涛最大尺度戏视频,欧美亚洲美女视频,2021韩国美女仙女屋vip视频

詳細信息

檢索環(huán)境變量

從標(biāo)準輸入中的讀取和寫入到標(biāo)準輸出

示例代碼