ªð¦^¦Cªí ¤W¤@¥DÃD µo©«

[µo°Ý] °õ¦æ¶¥¬q¿ù»~ '438': ª«¥ó¤£¤ä´©¦¹ÄݩʩΤèªk

¦^´_ 10# av8d
¦]¬O¤º³¡ºô­¶,µLªk¬°§A´ú¸Õ.
§A¦Û¦æ¸Õ¸Õ¨Ï¥ÎOn Error Resume Next ©¿²¤¿ù»~.¥i§_¦¨¥\.

¦pªG·|¸õ¥Xºô­¶°T®§
¸Õ¸Õ¬Ý
  1. .Document.Focus
  2. Application.SendKeys ("~") '«ö¤U Enter Áä
½Æ»s¥N½X
·P®¦ªº¤ß......(¦b³Â»¶®a±Ú°Q½×°Ï.¥Î¤ß¾Ç²ß·|¦³¶i¨Bªº)
¦ý¸ê·½µL­­,«á´©¦³­­,  ¤@¤Ñ1¤¸ªºÃÙ§U,¤H¤H¦³¯à¤O.

TOP

¥»©«³Ì«á¥Ñ av8d ©ó 2014-8-19 16:30 ½s¿è

¦^´_ 11# GBKEE


    ¨S¦³§@¥Î~

§Ú¦b·Q·|¤£·|¬O¦]¬°
Private Sub CommandButton1_Click()
ªºÃö«Y~

½Ð±Ðª©¥D~³o¬qªº·N«ä  .Document.Focus

TOP

¦^´_ 12# av8d
  1. .Document.Focus
½Æ»s¥N½X
ºô­¶¤å¥ó¥DÅ骺¿ï©w

JavaScript ¹ý©³­åªR ¹q¤l®Ñ(¥þ®Ñ¤U¸ü)
ªº3-17.htmªº­ì©lÀÉ ¥Î¤p§@®a¦sÀÉ(3-17.htm)
  1. <HTML>
  2. <HEAD>
  3. <TITLE>­pºâÅé­«</TITLE>
  4. </HEAD>
  5. <BODY>
  6. <SCRIPT Language="JavaScript">
  7. //¼u¥X¿é¤Jµøµ¡
  8. height=prompt("½Ð°Ý±zªº¨­°ª¡H",170)
  9. if(height) //§PÂ_¬O§_¦³¦^¶Ç¸ê®Æ
  10. {
  11. //©I¥s­pºâÅé­«ªº¨ç¦¡
  12. weight=test(height)
  13. //¼u¥X¼Ð·ÇÅé­«µøµ¡
  14. alert("±zªº¼Ð·ÇÅé­«"+weight+"¤½¤ç")
  15. }
  16. //­pºâÅé­«¨ç¦¡
  17. function test(height)
  18. {
  19. var weight=height-110
  20. //¶Ç¦^¨ç¦¡ªº¹Bºâµ²ªG
  21. return weight
  22. }
  23. </SCRIPT>
½Æ»s¥N½X
3-17.htmªº­ì©lÀÉ, ¦sÀÉ(3-17.htm),°õ¦æ¸Õ¸Õ¬Ý
  1. Option Explicit
  2. Sub EX()
  3.     Dim URL As String
  4.   ' Set_FormDLL
  5.     URL = "D:\3-17.htm"  '
  6.     With CreateObject("InternetExplorer.Application")
  7.         .Navigate URL
  8.         .Visible = True
  9.         
  10.         Application.Wait Time + #12:00:01 AM# 'µ¥­Ô¤@¬í
  11.         Application.SendKeys "{DEL}", True '«ö¤U DEL Áä
  12.         Application.SendKeys "ABC", True   '¿é¤J ABC Áä
  13.         Application.Wait Time + #12:00:01 AM# 'µ¥­Ô¤@¬í
  14.         
  15.         Application.SendKeys ("~") '«ö¤U Enter Áä

  16.         '.Quit
  17.     End With
  18. End Sub
½Æ»s¥N½X
·P®¦ªº¤ß......(¦b³Â»¶®a±Ú°Q½×°Ï.¥Î¤ß¾Ç²ß·|¦³¶i¨Bªº)
¦ý¸ê·½µL­­,«á´©¦³­­,  ¤@¤Ñ1¤¸ªºÃÙ§U,¤H¤H¦³¯à¤O.

TOP

¥»©«³Ì«á¥Ñ av8d ©ó 2014-8-20 09:11 ½s¿è

¦^´_ 13# GBKEE

%
    ÁÂÁª©¥D¦Ê¦£¤§¤¤©âªÅªº¸Ô²Óªºjsp¸Ñµª¡A§¹¦¨¤F90%¡A§Ú·|§V¤Oªº¡I

³Ìªñµo²{¤@­ÓºÃ°Ý
¶i¤J«á¡AÅý¥L¦Û°Ê¾É¤J¤@­Ó¶W³sµ²¡A¦ý¬O¥Lªº¶W³sµ²¤£¬Oºô§}
«o¬O javascript:;

ªþ¤W­ì©lÀÉ
jspºô­¶.rar (600 Bytes)

TOP

¦^´_ 13# GBKEE


    §Ú·QÀ³¸Ó©Mch4 ¨Æ¥ó³B²z¾¹¦³Ãö~§V¤O¾Ç²ß¤¤¡I

TOP

¥»©«³Ì«á¥Ñ av8d ©ó 2014-8-20 11:40 ½s¿è

¦^´_ 13# GBKEE


    §ä¨ì¤F~±b¸¹±K½X¬O±q³o¸Ìµn¤J
¥i¬O±b¸¹±K½X©M½T©w«ö¶sªº¦WºÙ¦³ÂI©Ç©Çªº
ªþ¤W­ì©lÀÉ
jspºô­¶2.rar (2.34 KB)

±b¸¹±K½X³£¥á¤£¤W¥h¡A½T»{«ö¶s§ä¤£¨ìname
--------------------
±b¸¹¦n¹³¬OuserNameTD
±K½X¦n¹³¬OpasswordTD
¦ý¬O§ä¤£¨ì½T©w«ö¶s

TOP

¦^´_ 11# GBKEE


    ¥Ø«e¥u³Ñ³o­Ó°ÝÃD~¦p¦óÅý¶}±Òºô­¶«á~Åýºô­¶¬°³Ì¤W¼h
§Ú«ö·Ó¤j¤j¨Ï¥Î.Document.Focus
¦ý¬OEXCEL«oÁÙ¬O¦b³Ì¤W¼h~µM«á±µ¤U¨Ó«öENTERªº°Ê§@´NµLªkÄ~Äò°õ¦æ.
¦A¦¸ÁÂÁª©¥D.

TOP

¥»©«³Ì«á¥Ñ GBKEE ©ó 2014-8-20 15:46 ½s¿è

¦^´_ 17# av8d
¦p¦óÅý¶}±Òºô­¶«á~Åýºô­¶¬°³Ì¤W¼h

§Aªº°ÝÃD¬O login ¦¨¥\ -> ¶}±Ò¤@·sªºIEªºµøµ¡,µLªk¨ú±o(·sªºIE)ªº¸ê®Æ(¤¸¯À)



¦p ¾÷Ãö¤º³¡¤H¨Æ·~°È¨t²Î-µn¤J §¹¦¨ (µn¤J­n °O¦í¤@¤Ñ ¥H¤W),
  1. With IE
  2.         .Navigate URL 'login
  3.         .Visible = True
  4.         Do While .Busy Or .readyState <> 4:         Loop
  5.         .Document.getElementsByTagName("OPTION")(2).Selected = True '°O¦í¤@¤Ñ
  6.         '©Î¬O
  7.         '.Document.getElementsByTagName("SELECT")(0).Value = "week" '°O¦í¤@­Ó¤ë
  8.    
½Æ»s¥N½X
µ{¦¡½Xª½±µ¶i¤J ¾÷Ãö¤º³¡¤H¨Æ·~°È¨t²ÎªºiIE ,¤£¥²¥Ñµn¤Jºô­¶¶i¤J
¾÷Ãö¤º³¡¤H¨Æ·~°È¨t²ÎªºURL
¥i¦p¹Ï : ¦bIE¥DÅé¤W,«ö¤U¥kÁä, ¿ï¨ú¤º®e,¤º®eªºµøµ¡,·Æ¹«½Æ»sURL
·P®¦ªº¤ß......(¦b³Â»¶®a±Ú°Q½×°Ï.¥Î¤ß¾Ç²ß·|¦³¶i¨Bªº)
¦ý¸ê·½µL­­,«á´©¦³­­,  ¤@¤Ñ1¤¸ªºÃÙ§U,¤H¤H¦³¯à¤O.

TOP

¦^´_ 18# GBKEE


    ÁÂÁª©¤j~
¥Ø«e³Ñ¤U°ß¤@°ÝÃD~
¨C¦¸¶}±Ò«áºô­¶Á`¬O¦bEXCEL¤U¼h~
¾É­P°T®§µøµ¡·|¦s¦bªº°ÝÃD
(¦³¨Ï¥Î.Document.Focus)
¨C­Ó¦ì¤l¤]´ú¸Õ¹L¡A¬ÒµL®Ä

TOP

¦^´_ 19# av8d
³o¬O¤º³¡ºô­¶.À°¤£¤W¦£.
·P®¦ªº¤ß......(¦b³Â»¶®a±Ú°Q½×°Ï.¥Î¤ß¾Ç²ß·|¦³¶i¨Bªº)
¦ý¸ê·½µL­­,«á´©¦³­­,  ¤@¤Ñ1¤¸ªºÃÙ§U,¤H¤H¦³¯à¤O.

TOP

        ÀR«ä¦Û¦b : ¤@­Ó¯Ê¤fªºªM¤l¡A¦pªG´«¤@­Ó¨¤«×¬Ý¥¦¡A¥¦¤´µM¬O¶êªº¡C
ªð¦^¦Cªí ¤W¤@¥DÃD