1、扩展存储过程的引入
USE master
GO
EXEC sp_addextendedproc ‘xp_hello’, ‘c:/xp_hello.dll’
SRVRETCODE xp_hello(SRV_PROC* pSrvProc)
{
srv_sendmsg(pSrvProc, SRV_MSG_ERROR, XP_HELLO_ERROR, SRV_INFO, 1,
NULL, 0, (DBUSMALLINT) __LINE__,
"Usage: exec xp_hello <@param1 output>",
SRV_NULLTERM);
srv_senddone(pSrvProc, (SRV_DONE_ERROR | SRV_DONE_MORE), 0, 0);
}
{******************************************************************************}{ @UnitName : OdsApi7 }{ @Project : Algorism }{ @Copyright : 1989 – 1999 Microsoft Corporation. }{ @Translator : 杨连山, yangls@263.net }{ @CreateDate : 2005-6-22 14:37:53 }{ @LastUpdate : 2005-6-22 14:37:53 by 杨连山 }{ }{ @Description : ODS(Open Data Services)开放数据服务接口单元文件, 转换自VC7下的}{ srv.h头文件. }{ }{ @Comment : 转换者: 杨连山 }{ 1、您可以免费使用和分发本单元文件, 但不能作为商业应用之全部或部分.}{ 2、在使用中如造成任何损失, 本转换者概不负责. }{ 3、转换者不保证本单元转换全部正确, 如您发现或修正后, 有义务反馈 }{ 最新版给转换者. 发到 yangls@263.net }{ 4、请保留以上说明信息 }{ }{ @History : 2005-06-22 杨连山转换 }{ }{******************************************************************************}unit OdsApi7;
interface
{$DEFINE DYNAMIC_LINK}
{$IFDEF DYNAMIC_LINK} {$STACKFRAMES ON} {$WARNINGS OFF}{$ENDIF}
uses Windows;
// ODS uses pack(4) on all CPU types{$ALIGN ON}{$MINENUMSIZE 4}
突然之间失去了语言。那才是真正的寂寞,