<% Set Conn = Server.CreateObject("ADODB.Connection") Conn.Open ConnString Set RS = Server.CreateObject("ADODB.Recordset") SUB listFunc(byVal state) RS.Open "SELECT TOP 10 * FROM func WHERE state = "&state&" ORDER BY entrydate DESC",Conn while not RS.EOF select case RS("rootgrp") case 200 rootname = "SDK 函数" case 400 rootname = "MFC 类库" case else rootname = "其它函数" end select Response.Write "["&rootname&"]" if RS("class") <> "" then Response.Write RS("class")&"::" Response.Write RS("funcname")&"
( 建设者:"&RS("userid")&" )
" RS.MoveNext wend RS.Close END SUB %> VCKBASE函数库-[酷库]
 


/* * * * * * * * * * * * * * * * * 添加的函数必须依照如下格式 * * * * * * * * * * * * * * * * */

函数原型

参数

返回值

备注[该处可以加上自己的使用经验]

使用环境[包括适合WINDOWS的版本、所需头文件、所需链接库]

示例代码段

/* * * * * * * * * * * * * * * * * 格式应用示例 * * * * * * * * * * * * * * * * */

函数原型:

int AfxMessageBox( LPCTSTR lpszText, UINT nType = MB_OK, UINT nIDHelp = 0 );
int AFXAPI AfxMessageBox( UINT nIDPrompt, UINT nType = MB_OK, UINT nIDHelp = (UINT) -1 );

参数:

lpszText
指向包含显示在消息框中的消息的CString对象或以null为结尾的字符串。

nType
消息框类型。
MB_ABORTRETRYIGNORE 包含三个按钮: Abort,Retry,Ignore
MB_OK 只包含OK按钮
MB_OKCANCEL 包含两个个按钮:OK和Cancel

返回值:

没有足够空间显示消息框返回0;否则返回如下值:

IDABORT 选择了Abort按钮。
IDCANCEL 选择了Cancel按钮。
IDIGNORE 选择了Ignore按钮。
IDNO 选择了No按钮。

备注:
nType的默认值为MB_OK,nIDHelp的默认值为0,表示显示一个包含OK按钮,无帮助上下文的消息框。

示例代码:

// 一个只有OK按钮的简单消息框
AfxMessageBox("Simple message box.");

// 从资源中的字符串表中提取字符串显示在消息框上,并带有YES和NO按钮和STOP图标
// 注意: nStringID 是当前资源中字符串有效ID的整型值
AfxMessageBox(nStringID, MB_YESNO|MB_ICONSTOP);


函数搜索 VC知识库首页

酷库系统管理员:jacky2000,isdong,yello2000i,vcuser
版权所有©1998-2001 VC知识库