● 用VB编写标准CGI程序(3) - 荔园在线 | 深圳大学学生论坛,荔园晨风BBS,深大在线网站

荔园之美，在春之萌芽，在夏之绽放，在秋之收获，在冬之沉淀

发信人: pas (流星), 信区: Visual
标题: 用VB编写标准CGI程序(3)
发信站: 荔园晨风BBS站 (Fri May 11 14:06:30 2001), 转信

　　一　输入输出的处理

　　一个CGI程序被激活以后　它首先要做的事情就是确定系统平台　Web服务器和
客户端浏览器的状态信息以及客户端用户的输入数据。此外　它还必须能够将相关
信息传送给客户端　否则它将一事无成。这些操作都是通过存取环境变量和标准输
入输出来完成的。用VB编写的CGI程序通过调用函数Environ( )来获取相关环境变
量的值。存取标准输入输出就要在程序中使用Win32API函数GetStdHandle( )
ReadFile( )和WriteFile( )　在使用这些函数时首先必须在程序中声明它们　写
声明语句时可以借助于VB提供的API文本查看器。

　　以下的CGI程序说明　在VB-CGI程序中如何处理环境变量和标准输入输出。该
CGI程序非常简单　可将标准输入中的信息不经任何处理就返回给客户端　它可被
任何表单用POST方法激活

　　Declare Function GetStdHandle Lib "kernel32" (ByVal nStdHandle As
Long) As Long

　　 Declare Function ReadFile Lib "kernel32" (ByVal hFile As Long,
lpBuffer As Any,

　　ByVal nNumberOfBytesToRead As Long, lpNumberOfBytesRead As Long,
lpOverlapped As Any) As Long

　　Declare Function WriteFile Lib "kernel32" (ByVal hFile As Long,
ByVal lpBuffer As String,ByVal nNumberOfBytesToWrite As Long,
lpNumberOfBytesWritten As Long,lpOverlapped As Any) As Long

　　Public Const STD_INPUT_HANDLE = -10&

　　Public Const STD_OUTPUT_HANDLE = -11&

　　Public Const FILE_BEGIN = 0&

　　Public hStdIn As Long ' 标准输入文件句柄

　　Public hStdOut As Long ' 标准输出文件句柄

--
※ 来源:·荔园晨风BBS站 bbs.szu.edu.cn·[FROM: 192.168.52.78]

荔园在线首页友情链接：深圳大学深大招生荔园晨风BBS S-Term软件网络书店