vbÈçºÎÏòÒþ²ØµÄÎļþдÄÚÈÝ£¿
ʹÓÃOpen xxx For BinaryÊÇ¿ÉÒÔÖ±½ÓÏòÒþ²ØÎļþдÄÚÈݵ쬵«ÊÇOpen xxx For OutputÈ´²»ÐУ¬ÓÐʲô°ì·¨£¿ ÏȽ«ÎļþÊôÐÔÉèΪ·ÇÒþ²ØÔÙдÈëµÄ·½·¨¾Í²»±ØÁË¡£
CreateFile WriteFile CloseFile End_rbody_60049331//--> ¸Ã»Ø¸´ÓÚ2009-09-25 10:48:22±»¹ÜÀíԱɾ³ý ¶ÔÎÒÓÐÓÃ[0] ¶ª¸ö°åש[0] ÒýÓà ¾Ù±¨ ¹ÜÀí TOP Hacker3710 (Hacker3710) µÈ¡¡¼¶£º #4Â¥ µÃ·Ö£º0»Ø¸´ÓÚ£º2009-09-25 05:45:40 ·¹ýѧϰ£¡ GetObject("", "Scripting.FileSystemObject").CreateTextFile("a.txt", True).Write "a" лл£¬2Â¥µÄÒѽâ¾öÎÊÌ⣬1Â¥µÄÎÒÑо¿¿´¿´ÒýÓà GetObject("", "Scripting.FileSystemObject").CreateTextFile("a.txt", True).Write "a" Õâ¸öÓеãÎÊÌ⣬ÎÞ·¨ÏñÒþ²ØÎļþдÄÚÈݵģ¬ÒªÊÇ¿ÉÒÔÖ±½Ó´´½¨Òþ²ØÎļþ¾ÍºÃÁË£¬ÎÒÊÇÓÃapiº¯ÊýÏÈ´´½¨Òþ²ØÎļþÈ»ºóдÈëÄÚÈݵġ£²»¹ýÄãµÄ´úÂë×ÛºÏ2Â¥µÄ¿ÉÒÔÐ޸ijÉÕâÑù£¬Ã²Ëƺܼò½à VB code: GetObject("", "Scripting.FileSystemObject").OpenTextFile("c:\1.txt", 8, True).WriteLine "a"
Ïà¹ØÎÊ´ð£º
login.aspx.vb: Public ReadOnly Property nameT() As String Get Return TextBox1.Text &nb ......
TF1.text = " <_2_ZCHGZBH> " & MSFlexGrid1.TextMatrix(k, 1) & " </_2_ZCHGZBH> " ´ó¼ÒºÃ£¬ÎÒÓÃÉÏÃæÒ»¸ö¶«Î÷¸³Öµ TF1.text = & ......
±ÈÈç˵ҪÔÚ1±íÖеĵÚÈýÁеڶþÐе¥ÔªÖÐÊäÈë¡°Ò»¶þÈý¡±Ò»Òª´ÖÌåËÎÌå12ºÅ×Ö£¬¶þ ²»Òª´ÖÌå 15ºÅ×Ö ÈýбÌå5ºÅ×Ö ´úÂëÓ¦¸ÃÔõô´ò£¿ LZÖ¸µÄÊǸöʲô±í¸ñ¿Ø¼þÄØ£¬Ã²ËÆÖ»ÄÜÉèÖÃÕû¸ö±íµÄ×ÖÌ壬»òÕßij¼¸Ðлò¼¸ÁУ¬Ã»Óе¥¶ÀÉèÖ ......
¸÷λ´óϺ£º ÎÒÓÐÒ»¸öVBµ÷ÓÃË®¾§±¨±íµÄϵͳ£¬±¨±íÊÇ×÷Ϊһ¸öDesignǶÔÚVBÀïµÄ£¬½ñÌì·¢ÏÖ´òÓ¡µÚÒ»Õű¨±íÕý³££¬Í¬ÑùµÄÊý¾Ý£¬ÔÚµã´òÓ¡ÔÙµ÷ÓÃÒ»´Î¾Í»á±¨ Memory FullµÄ´íÎ󣬵«ÊÇ ......
Private Sub Check1_Click() If Check1.Value = 1 Then DTP1.Enabled = True Else DTP1.Enabled = False End If End Sub Private Sub Check2_Click() If Check2.Value = 1 Then DTP2.Enabled = True Else
......