Çë½Ì¶ÁÈ¡Êý¾Ý¿âAccessÖÐOLE×ֶμǼµÄÎÊÌâ
¶ÁÈ¡Êý¾Ý¿âAccessÖÐOLE×ֶεÄÒ»Ìõ¼Ç¼£¨wordÎļþ£©Ê±£¬»áÉú³ÉÒ»¸öwordÎļþ¡£Òª¶ÁÈ¡ÏÂÒ»Ìõ¼Ç¼£¬±ØÐëÏÈÓÃÏÂÃæµÄ´úÂ룺
Kill App.Path & "\ÌâÄ¿.doc"
ɾ³ýwordÎļþ£¬·ñÔò¶Áȡʧ°Ü£¬ÕâÑùºÜ²»·½±ã£¬ÓÐûÓнâ¾öÕâ¸öÎÊÌâ·½·¨£¿
×¢Ò⣬ÊÇAccessÊý¾Ý¿â¡£
¾ÍÊǶÁÈ¡ÁËÒ»Ìõ¼Ç¼£¬½Ó×ŶÁÈ¡ÏÂÒ»Ìõ¼Ç¼ÁË..........
¸ßÊÖÇë½øÀ²£¡
¸ÉÂïҪɾ£¬¿ÉÒÔ½¨Á¢Ò»¸öcacheĿ¼£¬½«Éú³ÉµÄÎļþ·Åµ½ÕâÀï¡£
Ëæ»úÓøöÎļþÃû¡£
ÎÒÓõÄÊÇÈçÏ´úÂ룬ÔÚ¶ÁÈ¡ÁËÒ»Ìõ¼Ç¼ºó£¬ÔÙ¶ÁÈ¡ÏÂÒ»Ìõ¼Ç¼ʱ£¬»áÌáʾ¡°Ð´ÈëÎļþʧ°Ü¡±£º
Private Sub tk_ReadFile()
Set tm_Stm = New ADODB.Stream
With tm_Stm
.Mode = adModeReadWrite
.Type = adTypeBinary
.Open
.Write Rs("ÌâÄ¿")
.SaveToFile App.Path & "\tm.doc"
End With
With OLE1
.SourceDoc = App.Path & "\tm.doc"
.Action = 1 '´ÓÎļþµÄÄÚÈÝÖд´½¨Á´½Ó¶ÔÏó
End With
End Sub
3Â¥µÄÐв»Í¨£¬2Â¥µÄÒâ˼ÎÒ²»¶®À²£¬Ïêϸµã£¡
ɾ³ýÒ»ÏÂÒ²²»·ÑʲôÊ£¬ÎªÊ²Ã´Òª¸Ä±äÄØ£¿
¼ÓÁËÏÂÃæµÄ´úÂ룬Á
Ïà¹ØÎÊ´ð£º
ÎÒÓÃAccessÊý¾Ý¿â×öÁËÒ»¸öͼÊéÊý¾Ý¿â£¬ÀïÃæÓÐÒ»¸ö×Ö¶ÎÊÇISBN£¬¾ÍÊÇISBNºÅ£¬µ«ÊÇÖ»µÄÒ»×Ü·ÖͼÊéдµÄISBNºÅ£¬ÓеÄûд£¬Ð´µÄÄÇÒ»²¿·ÖÓеÄISBNÊÇÖØ¸´µÄ£¬ÄÜ·ñÓÃSQLÓïÑÔ°ÑÖØ¸´µÄ¹ýÂ˵ô£¬µ«Ã»Ð´ISBNºÅµÄͼÊé²»ÄܹýÂ˵ô£¬È ......
ÕâÁ½Ììѧϰ¡¶Delphi¼¼Êõ·½°¸±¦µä¡·Ò»ÊéÖеÚÈýÕ¹ØÓÚÓû§µÇ¼·½°¸µÄÀý×Ó£¬ÀûÓõÄÊÇSQl ServerÊý¾Ý¿âʵÏÖÓû§µÇ¼£¬±àÒëÔËÐж¼Ã»ÎÊÌ⣬¸ÃʵÏֵŦÄÜÒ²¶¼ÊµÏֵĺܺ㬵«ÊÇÆæ¹ÖµÄÊÇ£¬·´¸´ÔËÐÐÒ»¶Îʱ¼äºó£¬ÓÐʱÔڹرÕÕû¸ö ......
¸÷λ´óϺ£¬Ð¡µÜÓõÄÊÇADOÁ¬½ÓACCESSÊý¾Ý¿â£¬ÓÃDBGridÏÔʾ²éѯµÄÊý¾Ý£¬ÎÒ×öµÄÊǸöÊý¾Ý²É¼¯ÏµÍ³£¬¸ù¾Ý²»Í¬µÄµØÖ·°ÑÊý¾Ý·ÅÔÚACCESSÊý¾Ý¿âÖв»Í¬µÄ±íÀïÃæ£¬ÏÖÔÚÎÒÏë²éѯijһ¶Îʱ¼äÄÚËùÓбíÄÚµÄÊý¾Ý£¬²¢ÇÒÔÚDBGridÖÐÏÔʾ³ ......
ÿ´ÎMFC³ÌÐòÍ˳öµÄʱºò ¶¼»á³öÏÖ
Unhandled exception at 0x035e1341 in cvPDM.exe: 0xC0000005: Access violation writing location 0x80517de0.
ÇëÎÊÕâ¸öÎÊÌâÓ¦¸Ã´ÓÄÄÀïÈëÊÖ½â¾ö £¿
ÓÐûÓÐÒ»Ì×ͨÓõĽ⾠......
ÒÑÖªÁ½¸öÊý¾Ý¿â£¬·Ö±ðΪBASE.MDB ºÍ BASE2.DBF
×ֶηֱðΪBASE.MDB:NAME NAME2 NAME3
A B C
D E F
......