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

vb activex ´«µÝ²ÎÊý - VB / COM/DCOM/COM+

ÎÒÓÃVBдÁËÒ»¸öactivex£¬ÏÖÔÚÏëÔÚjsÀïÃæÏòactivex´«Öµ£¬Ð´ÁËÒ»¸öpublic·½·¨²»ÐУ¬Ð´ÁËÒ»¸öÊôÐÔÒ²²»ÐУ¬Çë¸ßÊÖÖ¸µã£¬ÔÚÏߵȺò,´úÂëÈçÏÂ
±äÁ¿ÉùÃ÷
Dim dirName As String = ""
·½·¨
Public Sub UrlName(ByRef tt As String)
  dirName = tt
  End Sub
ÊôÐÔ
Public Property StrName1() As String
  Get
  Return strName
  End Get
  Set(ByVal value As String)
  strName = value
  End Set
  End Property
jsµ÷ÓÃ
<html>
<head>
  <script type="text/vbscript" language="vbscript">
  function aa()
  {
  var objClass=document.getElementById("objClass");
  objClass.UrlName("d:\123");
  }
  </script>
</head>
<body onload="aa();">
  <object id="objClass" classid="clsid:CA04D92A-0AFA-3736-BC23-4EF99B7BF91F"></object>
</body>
</html>
document.all.objClass.UrlName("d:\123");
ÕâÑùÊÔÊÔ
{{


Ïà¹ØÎÊ´ð£º

vbµÄÀàÖÐʹÓÃ×Ô¶¨ÒåÀàÐÍÊý¾ÝµÄÎÊÌâ - VB / »ù´¡Àà


ÎÒÔÚÀàÖÐÓÐÒ»¸öº¯Êý
Public Function DownloadAdditionalSite(SiteName As siteconfig, Directory As String, ymd As String) As Boolean
siteconfigÊÇÎÒ×Ô¶¨ÒåÀàÐ͵ÄÊý¾Ý£¬ÎªÊ²Ã´»áÌáʾ¡°Ö»ÓÐÔÚ¹«¹²¶ÔÏóÄ£¿éÖж ......

vb - VB / »ù´¡Àà

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

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

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

VBÖÐÈçºÎʵÏÖÒ»PC¿ØÖÆN̨PC»úÄØ£¿ - VB / ¶àýÌå

ÈçÌ⣬VBÖÐÈçºÎʵÏÖÒ»PC¿ØÖÆN̨PC»úµÄ¿ª¹Ø»ú»òÕ߯äËûÃüÁîÄØ£¿
Õâ¸öÎÊÌâÓеã´óŶ.Èç²»ÄÜÔÚÆäËü»úÆ÷ÉÏÒ²×°³ÌÐòµÄ»°,ÄÇÖ»Òª¿´ËûÃÇÓÐûÅäÖÃÓÐÔ¶³Ì¿ØÖÆ¿ª¹Ø»úÁË

Èç¹ûÊÇÄÇÖÖ¿Í»§/·þÎñ¶ËµÄ·½Ê½ £¬¾ÍÊDZ»¿ØÖÆPCÒ²ÐèÒª°²× ......

VB µ÷ÓÃInet¿Ø¼þÏÂÔØ³ö´í - VB / ÍøÂç±à³Ì

¸÷λ¸ßÊÖ£¬Ð¡µÜ×î½üÅöµ½Ò»¸öÎÊÌ⣺ԭÏÈдµÄ³ÌÐò´ó¸ÅµÄ˼·ÊÇ£ºÊ×ÏÈwebbrowser´ò¿ªÍøÖ·£¬ÍøÖ·ÏÔʾºó£¬µã»÷ÍøÖ·ÉϵÄijһ¸öÁ¬½Ó£¬µ±webbrowser¼ì²âµ½ÍøÖ·ÒѾ­Á¬½Óµ½ÏëÒªµÄµØÖ·Ê±ºò¾Í¿ªÊ¼ÏÂÔØÎļþ£¬µ±ÓÃIE6µÄʱºòÏÂÔ ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ