- ©«¤l
- 140
- ¥DÃD
- 37
- ºëµØ
- 0
- ¿n¤À
- 193
- ÂI¦W
- 0
- §@·~¨t²Î
- Windows XP
- ³nÅ骩¥»
- Office 2007
- ¾\ŪÅv
- 20
- µù¥U®É¶¡
- 2012-3-28
- ³Ì«áµn¿ý
- 2015-7-5
|
»yªk¤º®e¨D¸Ñ
¥»©«³Ì«á¥Ñ luke ©ó 2012-4-27 07:10 ½s¿è
¦U¦ì¤j¤j
¤p§Ì¸I¨ì¤F¤U¦C»yªk, ¦ý¤£²M·¡´yz¤º®e
·Ð½Ð¥ý¶i ¤j¤j«ü¾É¸Ñµª·N«ä
Ipass = Worksheets("PASS").Cells(1, 3).Value
Open Nplc For Binary As #1
Seek #1, startpos
For j = 1 To 8
Put #1, , PassWD(j - 1)
Next |
|