delphi ûÓÐĬÈÏÖµ
query3.SQL.Clear;
query3.SQL.Add('select * from user_info where ·¢ËÍ״̬=0 and ¿ÉÓÃÌìÊý <>0 and ¿ÉÓÃÌìÊý <='+query2.fieldbyname('µçÁ¿ÏÂÏÞÌìÊý').AsString);
query3.Open;
query3.first;
while not query3.Eof do
begin
query4.Close;
query4.SQL.Clear;
query4.SQL.Add('insert into sms_send (company,type,content,desttermid) values (''7999'',''chat'','''+a+e+b+f+c+''','''+trim(query3.fieldbyname('µç»°ºÅÂë').AsString)+''') ');
query4.ExecSQL;
query5.Close;
query5.SQL.Clear;
query5.SQL.Add('update sms_send set ·¢ËÍ״̬='''+query2.fieldbyname('µçÁ¿ÏÂÏÞÌìÊý').AsString+''' where Óû§±àºÅ='+query3.fieldbyname('Óû§±àºÅ').AsString);
query5.ExecSQL;
query3.next;
end;
˵·¢ËÍ״̬ûĬÈÏÖµ ÎÒÔΠʲôÒâ˼°¡ £¿
query2.fieldbyname('µçÁ¿ÏÂÏÞÌìÊý').AsString Õâ¸ö½á¹ûΪ¿Õ°É
ÄãŪ¸öÁÙʱ±äÁ¿,°ÑÕâ¸öÖµ¸³¸øÁÙʱ±äÁ¿,¿´ÓÐûÓÐ×Ö·û
¿´¿´×Ö¶ÎÃû³ÆÊDz»ÊÇд´íÁË
select * from µçÁ¿ÏÂÏÞÉèÖñí where µçÁ¿ÏÂÏÞÌìÊý <'+''''+strtofloat(query2.fieldbyname('µçÁ¿ÏÂÏÞÌìÊý').AsString)+''' order by µçÁ¿ÏÂÏÞÌìÊý desc ¶÷ лл
Ïà¹ØÎÊ´ð£º
½ÓÊÕµ½µÄÎı¾ÄÚÈÝÊÇucs2±àÂë¸ñʽ£¬ÇëÎÊÔõÑùת»»³ÉÖÐÎÄ
°´ÎÒµÄÀí½â£¬UCS-2ÊÇ×Ö·û¼¯£¬¾ßÌåµÄ±àÂëÓÐUTF-8£¬UTF-16 (LE/BE)µÈ¡£
Èç¹ûÄãÓÃDelphi 2009¼°ÒÔÉϰ汾£¬¿ÉÒÔ¿´¿´TEncodingÀà¡£
btw. Äã˵µÄת»»³ÉÖÐÎÄÊÇɶÒâË ......
ÎҵĴúÂëÈçÏÂ,Ôõô×ÜÌáʾÁ¬²»³É¹¦:
type
GUID = record //ÉêÃ÷µ÷ÓÃRAS£¨´´½¨VPNÁ¬½ÓÓ㩺¯ÊýËùÐè½á¹¹Ìå
Data1: integer;
Data2: Shortint;
Data3: Shortint;
......
ÓÃDEDE´ò¿ªÒ»¸öDLL£¬ÕÒµ½ÐèÒªµÄº¯ÊýÁË£¬µ«ÊÇÏÔʾµÄ¶¼ÊÇ»ã±à´úÂ룬¿´²»¶®£¬¿ÒÇë¸ßÊÖפ×ã°ïæ°¡£¡
ÊÇÒ»¸öKEYPRESSÏìÓ¦º¯Êý£¬¹¦ÄÜÊÇÔÚ°´ÏÂenterºóÅжÏÊäÈëµÄ×Ö·û£¬ÎÒÏë°´ÕÕ×Ô¼ºµÄÐèÇóÌø×ª£¬µ«ÊÇ
ÕÒ²»µ½Î»Ö㬸ßÊÖ ......
VC ¿ØÖÆÌ¨³ÌÐò:
#include <iostream>
using namespace std;
int main()
{
const int def_buffer = 1024 * 4;
DWORD t;
BYTE b[def_buffer];
memset(b, 0, sizeof(b));
PBYTE p;
t = GetTickC ......