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

vbÖÐsqlÓï¾ä£¡ - VB / Êý¾Ý¿â(°üº¬´òÓ¡£¬°²×°£¬±¨±í)

Set cn = New ADODB.Connection
  cn.Open "provider=Microsoft.jet.OLEDB.4.0;data source=" & App.Path & "\member.mdb"
  Set rs = New ADODB.Recordset
  rs.Open "select * from attendance1 where ѧºÅ like '" & Text9.Text & "' and µ½ÇÞÈÕÆÚ like '" & DTPicker1.Value & "'", cn, adOpenKeyset, adLockOptimistic
  If rs.RecordCount > 0 Then
  MsgBox "´ËͬѧÒÔµ½£¡", vbInformation, "Ìáʾ"
  Else
  cn.execute("insert into attendance1(ѧºÅ,µ½ÇÞÈÕÆÚ£¬µ½ÇÞʱ¼ä£©values ('" & Text9.Text & "',#" & Format(Now(), "YYYY-MM-DD") & "#,'" & Format(Now(), "hhµãmm·Ö") & "')"
  MsgBox "Ìí¼ÓÍê±Ï", vbInformation, "Ìáʾ"
accessÊý¾Ý¿â ±í attendance1 ×ֶΠѧºÅ µ½ÇÞÈÕÆÚ(ʱ¼ä/ÈÕÆÚÀàÐÍ) µ½ÇÞʱ¼ä(Îı¾ÀàÐÍ)

Ìí¼ÓÒ»´Îºó£¬ÔÙÌí¼Ó¾Í»áµ¯³ö´ËͬѧÒѵ½£¡Êý¾Ý¿âÖÐÎÞÖØ¸´Êý¾Ý£¡

µ«Êǰѻ»³ÉsqlÊý¾Ý¿â ±íattendance1 ×ֶΠѧºÅ µ½ÇÞÈÕÆÚ(datetimeÀàÐÍ) µ½ÇÞʱ¼ä(Îı¾ÀàÐÍ)
  cn.Open "provider=sqloledb;data source=127.0.0.1;initial catalog=student;user id=sa;password=sa;"
¾ÍÒ»Ö±µ¯³öÌí¼ÓÍê±Ï....ûÓдËͬѧÒÔµ½...Êý¾Ý¿âÖÐ ÓÐÖØ¸´Êý¾Ý£¡
ÕâÊÇΪʲô£¿ÒªÔõô¸Ä²ÅÄÜûÓÐÖØ¸´µÄÊý¾ÝÄØ£¿
¿´°ëÌì¿´²»¶®Ð´µÄÊÇʲô

...ÎÒÔٸĸÄ

ÎÒÒ²ÓÐЩÔΡ£¡£¡£¡£

T


Ïà¹ØÎÊ´ð£º

vb - VB / ·Ç¼¼ÊõÀà

Ôõô°ÑÒÑÖªµÄÊý¾Ý±£´æ³ÉxmlÎļþ£¬ÏÖÔÚÒÑÖªµÄÊý¾ÝÊÇ
<?mso-application progid="Excel.Sheet"?>
<Workbook xmlns="urn:schemas-microsoft-com:office:spreadsheet"
 xmlns:o=& ......

vb - VB / »ù´¡Àà

xmlDoc1.loadXML(h)×ÜÊÇ·µ»Øfalse£¬ÎªÊ²Ã´£¿Ð»Ð»°ïæ»Ø´ðÒ»ÏÂ
hÊÇÊ²Ã´ÄØ¡£¡£¡£¡£¡£¡£¡£¡£¡£

hÊÇxml¸ñʽµÄ×Ö·û´®

ÄãÊÇÏë´ò¿ª¡£XML¸ñʽµÄÎļþ°É£¿

ÎÒÊǰÑh·ÅÔÚxmlDoc1ÀÓÃxmlDoc1.loadXML(h)£¬È»ºóÈ¡xmlDo ......

vb WebBrowser СÎÊÌ⣬Çë½Ì - VB / »ù´¡Àà

vb WebBrowser СÎÊÌ⣬Çë½Ì£º
WebBrowserÀïµÄÍøÖ·Ìø×ªºó£¬ÔõôȡµÃÌø×ªºóµÄÒ³ÃæµÄURLµØÖ·

¶¥Ï¶¥ÏÂ

ÒýÓÃ
BeforeNavigate2
ºÃÏñûÓÐÕâ¸ö°É vb6.0

BeforeNavigate2
Õâ¸ö¿ÉÒÔÓУ¬ºÇºÇ¡£
......

VBÈçºÎ»ñµÃ±ðµÄ³ÌÐòÉϵıí¸ñÄÚÈÝ£¿ - VB / API

ÎÒµÄÒªÇóÊÇ£ºÍ¨¹ýץȡ±ðµÄ³ÌÐòÉϵıí¸ñµÄ¾ä±ú£¬È»ºó¶ÁÈ¡Õâ¸ö±í¸ñµÄÄÚÈÝ¡£
±í¸ñ¾ä±ú£¨ÀàÃû£ºMSFlexGridWndClass£©ÎÒÒÑ×¥µ½£¬½ÓÏÂÀ´ÈçºÎ¶ÁÈ¡±í¸ñµÄÄÚÈݾͲ»»áÁË£¿ÇóÖú¡£

ÄܰѴúÂë·¢À´Ñ§Ï°Ï²»£¿
244326867@qq.com ......

SQL·ÖÒ³ÓëOracle·ÖÒ³µÄÒÉÎÊ£¿ - Java / Web ¿ª·¢

ÕâÀïÏëÁ˽âÏ£¬¹ØÓÚSQL ServerÖзÖÒ³ºÍOracleÖзÖÒ³£»
ƽ³£Ð´Ó¦ÓóÌÐòµÄʱºò£¬±ÈÈçÓõÄÓïÑÔÊÇJava£¬ÓиöÁбíÒ³Ãæ£¬ÐèÒª¶ÔÊý¾Ý·ÖÒ³ÏÔʾ£»
ÕâÀïÒª·ÖÒ³ÄѵÀ²»ÐèÒª½èÖúJava£¬¶øÖ±½ÓsqlÄÜÖªµÀ·ÖÒ³Âð£¬ÆðÂëÒ²Òª´«¸öÒ³Âë½ ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ