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

ʹÓÃvc6±àд¹©vbʹÓõÄdll

ʹÓÃvc6±àд¹©vbʹÓõÄdll£¬ÐèÒªÄÄЩ²½Ö裿
Ó¦¸Ã×¢ÒâÄÄЩÊÂÏ
ºÃÏñÊÇºÍÆÕͨµÄÒ»Ñù°É£¿

д³ÉWin32µÄDLL¾ÍÐÐÁ˰É

DLL±àÒëºÃÒԺ󣬾ÍÊÇ2½øÖÆ´úÂëÁË£¬ºÍÄã²ÉÓÃÄÄÖÖÓïÑÔÎ޹صġ£
ΨһÐèҪעÒâµÄÊÇÄãÐèÒªÔÚÄÄÖÖÓïÑÔÖÐʹÓÃÕâ¸öDLL,ÄÇôÄã¶Ôº¯ÊýµÄÉùÃ÷¶¼Òª·ûºÏÕâ¸öÓïÑԵĹæÔò

ÎÒÔÚvb6Öе÷ÓÃ

ÒýÓÃ
DLL±àÒëºÃÒԺ󣬾ÍÊÇ2½øÖÆ´úÂëÁË£¬ºÍÄã²ÉÓÃÄÄÖÖÓïÑÔÎ޹صġ£
ΨһÐèҪעÒâµÄÊÇÄãÐèÒªÔÚÄÄÖÖÓïÑÔÖÐʹÓÃÕâ¸öDLL,ÄÇôÄã¶Ôº¯ÊýµÄÉùÃ÷¶¼Òª·ûºÏÕâ¸öÓïÑԵĹæÔò




ÎÒµÄdllÖÐÓõ½ÁË MFcµÄÀ࣬vB6ÖпÉÒÔµ÷ÓÃÂð


¶¥ÆðÀ´£¬Ð´¹ýµÄ Ö¸µãÏÂ


×¢Òâµ÷ÓÃÔ¼¶¨ºÍÃû³ÆÐÞÊξͿÉÒÔ¡£

ÒýÓÃ
ÎÒµÄdllÖÐÓõ½ÁË MFcµÄÀ࣬vB6ÖпÉÒÔµ÷ÓÃÂð


¿ÉÒԵģ¬Ö»Òªµ¼³öº¯ÊýûÓÐMFCÏà¹ØµÄ²ÎÊý¾Í¿ÉÒÔ¡£

½¨Òéд³Écom

Èç¹û²»Ð´³ÉcomµÄ»°£¬½¨ÒéÓÃUNICODE±àÒ룬µ¼³öº¯ÊýÒª_stdcall£¬ÆäËüÃ»Ê²Ã´ÌØ±ðµÄ¡£

×¢Ò⺯ÊýÉùÃ÷ÓëDLLµ¼³öµÄÒ»Ö¼´¿É£¬Êý¾ÝÀàÐÍת»»¶Ô


Ïà¹ØÎÊ´ð£º

¡¾¼±Çó¡¿VBÖÐʹÓÃWScriptµ÷ÓÃÍⲿÃüÁî - VB / »ù´¡Àà

ÔÚÏÂÊÇvbµÄÐÂÊÖ£¬Ïëд¶Î³ÌÐò£¬ÔÚvbÖУ¬Ê¹ÓÃwscriptµ÷ÓÃһЩÍⲿµÄÃüÁµ«ÊdzÌÐòÖ´ÐÐÒ»Ö±ÓдíÎó£¬Çë¸÷λ¸ßÊÖ°ïæ½â´ðÏ£¬Ð»Ð»¡£
´úÂëÈçÏ£º
VB code:

Private Function getFile_CMD(filename, filepath) As Bo ......

ΪʲôÓÃVB¸Ä±ä²»Á˹¤¾ßÀ¸°´Å¤µÄ¿í¶È - VB / ¿Ø¼þ

Ϊʲô¹¤¾ßÀ¸°´Å¤µÄ¿í¶È¸Ä±ä²»ÁË,ÔÚÊôÐÔÀï¸ÄÁËÓÖ±ä³ÉÔ­À´µÄÊýÖµÁË

´óºú×ÓÕæÀ÷º¦£¬»Ø´ð»ù±¾¶¼ÊDZ¬Áϼ¶µÄ
´óºú×ÓÉý¼¶Õæ¿ì°¡£¬Õâ²Å¼¸Ìì¾Í5Ìõ¶Ì¿ãÍâ¼ÓÔÂÅÅÃûµÚÒ»ÁË
ÏëÏëÎÒÕâ5¸ö¶Ì¿ã»ìÁ˲¶à8Äê²ÅµÃµ½µÄ¡£

»Ø¸´ ......

¹ØÓÚVB DIM ds as new DataSetÎÊÌâ - VB / »ù´¡Àà

DIM ds as new DataSet
ÎÒÕâÑùÉùÃ÷ ÔõÀÏÊDZ¨ Óû§¶¨ÒåÀàÐÍ䶨Ò壿 Õâ¸öÐèÒªÒýÓÃʲôÂ𣿣¿
ǰÌáÊÇDataSet¶ÔÏóÒª´æÔÚ,¾ÍÊǶÔÏóä¯ÀÀÆ÷ÖÐÓÐËü.ûÓоÍÒªÒýÓÃ.

datasetÊÇADO.NET¶ÔÏó
Èç¹ûÄãÓõÄÊÇvb.net£¬ÄÇôÔÚ´ ......

vb - VB / »ù´¡Àà

ÔÚvbÖÐÈçºÎ¶ÁÈ¡WordÄÚÈÝ(°üº¬±í¸ñ£¬Í¼Æ¬£¬µÈ£©
¾¹È»²»ÊÇzero¡£

²»ÖªµÀÔõôʵÏֵIJ»ÒªËµ»°

Õâ¸öÖ»ÄܶÁÎı¾,
VB code:
Private Sub Command1_Click()
Dim WordApp As Object
Set WordApp = CreateObject(& ......

vb crystalreport - .NET¼¼Êõ / VB.NET

Private Sub btnPrint_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnPrint.Click
  MouseWait()
  Dim ClearTempTabelSQL As String
  'If Not ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ