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

vb ÔõôÅжϴ¢´æµÄÒ»¶ÎÎÄ×ÖÖÐÓÐijЩ×Ö

Àý×ÓÈçÏ£º
Êý¾Ý¿âfault_reason_nameÕâ¸ö×ֶδ¢´æÁË ¡°Çë²éѯҪ´òÓ¡³É¼¨µ¥µÄѧÉú¡±
È»ºó¶¨ÒåÁËÒ»¸ö±äÁ¿bx µ±±äÁ¿ÖµµÃµ½¡°´òÓ¡³É¼¨µ¥¡±Õ⼸¸ö×Öʱ
ÔõôÅжÏfault_reason_nameÕâ¸ö×Ö¶ÎÀïÃæÒ²ÓÐÕ⼸¸ö×Ö

Èç¹û¿ÉÒԵϰ »¹ÓбäÁ¿ÖµµÈÓÚ¡°Çë²éѯ³É¼¨µ¥¡±Õ⼸¸ö×Ö
È»ºófault_reason_name×Ö¶ÎÀïÒ²ÄÜÅжϳöÓÐÕ⼸¸ö×ÖÀ´
лл¸÷λ°ï¸öæ Ê®·Ö¸Ðл
µÚ¶þÖÖÖÐ ¡°Çë²éѯ¡± ¡°³É¼¨µ¥¡± ±ØÐëÒªÔÚÒ»ÆðµÄ ²»ÄÜ·Ö¿ª

like "*xxx*"
instr
len(replace(source, find, "")) <> len(source)

  Â¥ÉÏÌṩµÄ¼¸ÖÖ·½Ê½¶¼¿ÉÒÔ

²»ºÃÒâ˼³õѧÕß ÇëÏêϸµãºÃÂð лл

source = "Çë²éѯҪ´òÓ¡³É¼¨µ¥µÄѧÉú"
if len(replace(source, "´òÓ¡³É¼¨µ¥", "")) <> len(source) then
    msgbox "ÓÐ"
else
    msgbox "ûÓÐ"
end if
source = "´òÓ¡³É¼¨µ¥µÄѧÉú"
if len(replace(source, "´òÓ¡³É¼¨µ¥", "")) <> len(source) then
    msgbox "ÓÐ"
else
    msgbox "ûÓÐ"
end if

лл caozhy  »¹ÓÐÒ»ÎÊÌâÇë½ÌÏÂ
source = "Çë²éѯҪ´òÓ¡³É¼¨µ¥µÄѧÉú"
if len(replace(source, "´òÓ¡³É¼¨µ¥", "")) <> len(source) then
    msgbox "ÓÐ"
else
    msgbox "ûÓÐ"
end if

»¹µÃÅжÏËûûÓгýÁË¡°´òÓ¡³É¼¨


Ïà¹ØÎÊ´ð£º

VB »ñÈ¡ÍøÒ³Ô´´úÂë

Ò»¸ö²éѯijÐÅÏ¢µÄASPÍøÒ³£¬Ìá½»²ÉÓõÄÊÇpost·½·¨£¬²éÕÒ½á¹ûµÄÍøÒ³±ØÐëÓÒ¼üµã»÷¡°²é¿´Ô´Îļþ¡±²ÅÄÜ¿´µ½ÕæÕý²éѯ½á¹ûÍøÒ³µÄÔ´´úÂ룬ÓÃä¯ÀÀÆ÷²Ëµ¥¿´µ½µÄÊDzéѯǰµÄÔ´´úÂë
ÓÃVBÓÐʲô°ì·¨¿ÉÒÔ»ñÈ¡µ½Õâ¸ö²éѯºóµÄÔ´´ú ......

VBÈçºÎ×èֹij³ÌÐòÔËÐС££¿

±ÈÈç½ø³Ì¼ÓÔØÐµijÌÐò¡£

ÔÚÆäÔËÐÐ֮ǰ×èÖ¹¡£

È»ºóÔÊÐíºó·ÅÐС£


±ÈÈç³ÌÐòÖ÷Îļþ·¾¶ÊÇc:\test\test.exe£¬½¨Á¢ÄÚÈÝÈÎÒâµÄÎļþc:\test\test.exe.manifest¡£

¾ÍÊDz»ÖªµÀ³ÌÐòÎļþ·¾¶¡£

ÉèÖ ......

vbÖÐsqlÓï¾äÒýºÅÎÊÌâ

"insert into user1(name,age) values('" & Text1.Text & "','" & Text2.Text & "' )"
ÎÊÌ⣺¶ÔsqlÓï¾äÖе¥¡¢Ë«ÒýºÅÄ£ºý¡£¼ÈÈ» Text1.Text¾Í±íʾ ......

vbµÄ³É¹¦Ö®Â· - À©³ä»°Ìâ / ¹²ÏíÈí¼þ£¨×ßÏòº£Í⣩

ÔÚvbÕâ±à³ÌÀïËÆºõÓкܶàµÄ¶«Î÷ÊÇÏàÁªÏµµÄ£¬ÎªÊ²Ã´ÓÐЩÈ˶ÔvbµÄ±à³ÌÃþ²»µ½Í·ÄÔ°¡£¡²¢ÇÒÓÐЩʺÜÈÝÒ׵쬵«ÊÇÈ´°ÑËüÃǵĴúÂë±ä³É¸´ÔÓ£¬Ò²È¥ÏëһЩ²»ÄÜʵÏֵĶ«Î÷°¡£¡




û·ÖÁË£¬Â¥Ö÷¶àÀ´µã·Ö£¡

À´½Óµã·Ö

......

vbÄÜ·ñ°Ñwinsock¿Ø¼þ·â×°µ½dllÖÐ

vb½«winsock¿Ø¼þ·â×°µ½dllÎÊÌâ ÓÐʲôºÃµÄ˼·£¿ Èç¹ûÓÃSocket APIÄØ£¿
ÀýÈ磬ÏñÏÂÃæÕâÑù·â×°Winsock¿Ø¼þ£¬ÐеÄͨ£¿
´´½¨ActiveX dll£¬Ìí¼Ó´°ÌåfrmClient£¬¼ÓÈëWinSock¿Ø¼þwskClient¡£
Àà´úÂ룺
Option Expli ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ