Çó delphi webserivice µ÷ÓÃÀý×Ó
Çó delphi webserivice µ÷ÓÃÀý×Ó
·þÎñ¶Ë±àд£ºÐ½¨"WebServices-->SOAP Server Application-->ISAPI/NSAPI Dynamic Link Library","Service name"ÌîдÄãÒªµÄ·þÎñÃû£¬Èç"SendSmsServices"£¬È»ºóÔÚSendSmsServiceIntf.pasÖÐÌí¼Ó½Ó¿Úº¯Êý£º
Delphi(Pascal) code:
{ Invokable interface ISendSmsService }
unit SendSmsServiceIntf;
interface
uses InvokeRegistry, Types, XSBuiltIns;
type
{ Invokable interfaces must derive from IInvokable }
ISendSmsService = interface(IInvokable)
['{2DE80373-26E4-49B6-86E1-DC67D456FB90}']
{ Methods of Invokable interface must not use the default }
{ calling convention; stdcall is recommended }
function sendSms(const sendSms1: widestring): widestring; stdcall;
end;
implementation
initialization
{ Invokable interfaces must be registered }
InvRegistry.RegisterInterface(TypeInfo(ISendSmsService));
end.
ÔÚSendSmsServiceImpl.pasÖÐд¾ßÌåµÄ´¦Àí¹ý³Ì
Delphi(Pascal) code:
{ Invokable implementation File for TSendSmsService which implements ISendSmsService }
unit SendSmsServiceImpl;
interface
uses InvokeRegistry, Types, XSBuiltIns, SendSmsServiceIntf;
type
{ TSendSmsService }
TSendSmsService = c
Ïà¹ØÎÊ´ð£º
ÈçÌâ¡£
¸Ð¾õÈçºÎ£¿½»Á÷Ï¡£
ûÓÐÑо¿¹ý£¬ºÇºÇ
ÓÐɶÑо¿Í·£¿
ÄǸö¶«Î÷£¬ÊǸö¼¦Àߣ¬£¬Ã»ÓÐʲôÒâ˼£¬·¢ÏÖ£¡£¡
ÓÃÀ´×öB/S¼Ü¹¹µÄMISϵͳµÄ»°Ó¦¸Ã¿ÉÒÔÌá¸ß½çÃ濪·¢µÄЧÂÊ°É£¿
ÒòΪ²»ÊìϤDelphi £ ......
ÔÎĵØÖ·£ºhttp://hi.baidu.com/sqldebug/blog/item/8e2749213082c0589922ed61.html
Ö±½ÓÌù¹ýÀ´µÄ£¬ÓеãÂÒ£¬´ó¼Ò´ÕºÏ¿´¡£
Ò»¡¢·þÎñ³ÌÐòºÍ×ÀÃæ³ÌÐòµÄÇø±ð
Windows 2000/XP/2003µÈÖ§³ÖÒ»ÖÖ½Ð×ö¡° ......
ÎÒÏ뽫c#дµÄ¿Ø¼þǶµ½Delphi7µÄFormÖÐÏÔʾ£¬µ«ÊÇʼÖÕÊÇû×ø³É£¬ÎÒͨ¹ýµ¼ÈëtlbÎļþ£¬¿ÉÒÔͨ¹ýc#дµÄ½Ó¿Ú£¬ÊµÏÖÔÚDelphiÖÐÏÔʾһ¸ö´°Ì壬µ«ÊÇÏÔʾµÄÖ»ÊÇÔÚ×ÀÃæÉϸ¡¶¯µÄ´°Ì壬ÎÞ·¨½«ËûµÄ¸¸ÈÝÆ÷Ö¸¶¨ÎªDelphiµÄForm£¬ÎÒÏë ......
Delphi ÏñÍö¹úµÄÄÏËΣ¬ÊÔÎÊÕâÓïÑÔ»¹ÓÐǰ;Âð£¿
Win32¿ª·¢²»ÈçC#£»
ÃæÏñ¶ÔÏñ¿ª·¢²»ÈçJAVA£»
ϵͳ¿ª·¢²»ÈçVC++6.0£»
ÄÜÓÃÐÔ²»ÈçVB6.0£»
²»Ö§³ÖWeb¿ª·¢¡£¡£¡£
³ö¸öDelphi 2010Ãâ·ÑÒ»Äê»áÓÐÈËÓÃÂð£¿
......
ÎÒµ÷ÓÃvcµÄdll£¬´«ËͽṹÌå²ÎÊý¡£vc½ÓÊܺó´ÓÄÚ´æÖп½±´³öÎÒ´«Ë͵ÄÖµ¡£×ª»»Ö®ºóÊÇÂÒÂë
À´´íµØ·½ÁË.
È¥DELPHI
ddd
ÖªµÀ´íÁË
ÓÐû¾ßÌå´úÂë°¡
//ÏòÖն˷¢ËÍÃŽû±¨¾¯ÐÅÏ¢
function alar ......