Ò׽ؽØÍ¼Èí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö160KB

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  ¶÷  лл 


Ïà¹ØÎÊ´ð£º

DelphiÔõôȡ·µ»ØÄÚÈÝÖеÄÖ¸¶¨²¿·Ö.

·µ»ØµÄÄÚÈÝÊÇÈçÏ´úÂë,ÔõôÄÜÇþµÀ2b?
<p class="text1">1a </p>
<p class="text1">2b </p>
<p class="text1">3c </p>
<p cl ......

delphiÖÐselect µÄ whereºóÃæµÄid=±äÁ¿Ôõôд°¡

ÎҵijÌÐòÖÐÓÐÒ»¶Î¸üÐÂijһÌõ¼Ç¼µÄÓï¾ä£º
var
id:=integer;
begin
id:=strtoint(edit1.text);//edit1.textµÄÖµÒѾ­È¡µÃ;
...
...
...
adoQuery1.sql.add('update ¼Æ»®Çåµ¥±í set ¼Æ»®ÈÕ ......

¹ØÓÚDelphiÁ¬½ÓACCESSÊý¾Ý¿â²éѯÎÊÌâ

¸÷λ´óϺ£¬Ð¡µÜÓõÄÊÇADOÁ¬½ÓACCESSÊý¾Ý¿â£¬ÓÃDBGridÏÔʾ²éѯµÄÊý¾Ý£¬ÎÒ×öµÄÊǸöÊý¾Ý²É¼¯ÏµÍ³£¬¸ù¾Ý²»Í¬µÄµØÖ·°ÑÊý¾Ý·ÅÔÚACCESSÊý¾Ý¿âÖв»Í¬µÄ±íÀïÃæ£¬ÏÖÔÚÎÒÏë²éѯijһ¶Îʱ¼äÄÚËùÓбíÄÚµÄÊý¾Ý£¬²¢ÇÒÔÚDBGridÖÐÏÔʾ³ ......

VC Delphi ÄÚ´æËÙ¶È±È½Ï - VC/MFC / ·Ç¼¼ÊõÀà

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 ......

DELPHIÀïÃæÈçºÎʵÏֲ˵¥µÄ·ÖȨÏÞ¿ØÖÆ

°´²»Í¬µÄÈË£¬²»Í¬µÄȨÏ޷ֱ𿪡£
·½·¨Ì«¶àÁË¡­¡­ÔÚÓû§µÄÐÅÏ¢Öжà¸ö²Ëµ¥ÁÐ±í¡£»òÕß°´È¨ÏÞ±ê¼ÇÔڲ˵¥µÄtagÀïÃæ£¬È»ºóÓû§È¨ÏÞÓëÕâ¸öȨÏÞ×ö¶Ô±È¡£Ì«¶àÁË¡­¡­

Ò»°ã¿ØÖÆaction

ÓýÇÉ«¿ØÖÆ
ÎÒÏÖÔÚÕýºÃÔÚ×öÕⷽà ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ