c# ÑéÖ¤Âë×é¼þ ¿Évb£¬asp£¬netµ÷ÓÃ
½ñÌ칫˾ҪÇóÓÃC#д¸öÑéÖ¤Âë×é¼þ£¬ÈÃasp¿ÉÒÔµ÷Óã¬ÔÚÍøÉÏÕÒÁËÒ»¶Ñ×ÊÁÏ£¬ÖÕÓÚ¸øÎÒ¸ø¸ã³öÀ´ÁË£¬ÒòΪ±¾È˵ÚÒ»´Îд×é¼þ£¬Ò²ÊǵÚÒ»´Î·¢±íÎÄÕ£¬ËùÓпÉÄÜ˵µÄ²»ÊǺܺ㬴ó¼ÒÇë¼ûÁ¡£
csdnÉÏÓÐÕâôƪÎÄÕ£¬Ïëѧϰд×é¼þµÄ¿ÉÒÔÈ¥¿´¿´£ºhttp://blog.csdn.net/KimmKing/archive/2008/12/04/3445233.aspx£¬ÒòΪ±¾È˾ÍÊÇ·ÂÕÕÕâ¸öдµÄÑéÖ¤Âë×é¼þ£¬ÒòΪÅÂÉÏÃæµÄÎÄÕ¶ªÊ§£¬ÎÒ¾ÍÔÚÕâÀï¼òµ¥ËµÏ´´½¨µÄ¹ý³Ì£º
1¡¢´´½¨Ò»Àà¿â
2¡¢ÊµÏÖÒ»¸öÀࣨ¾ßÌå´úÂëÏÂÃæÏêд£©
3¡¢¸øÎļþÇ©Ãû
·½·¨£ºÑ¡Ôñ¿ªÊ¼²Ëµ¥ÖÐVistual StudioĿ¼ÏµÄVistual Studio ToolsϵÄVistual Studio ÃüÁîÌáʾ¡£Ê¹ÓÃsn -k c:\myKey.snkÉú³ÉÇ©ÃûÎļþ¡£ÔÚÏîÄ¿ÉÏÓÒ¼ü£¬µã»÷ÊôÐÔ£¬Ñ¡ÔñÇ©Ãû£¬Ñ¡ÖÐΪ³ÌÐò¼¯Ç©Ãû£¬Ñ¡ÔñmyKey.snkÎļþ¡£
4¡¢Éú³É½â¾ö·½°¸
ÔÚÏîĿĿ¼µÄ\TestCom\bin\DebugÖпÉÒÔÕÒµ½TestCom.dll
5¡¢Éú³ÉtlbÀà¿â
ÔÚVisual StudioÃüÁîÌáʾ·ûÏ£¬Çл»µ½´ËĿ¼¡£
ÊäÈëtlbexp TestCom.dll /out:TestCom.tlb
6¡¢×¢²áÀàÐÍ¿â
ÊäÈëregasm TestCom.dll /tlb: TestCom.tlb /codebase£¬½«ÀàÐÍ¿âµ¼Èëµ½×¢²á±í¡£Ìáʾ³É¹¦×¢²áÁËÀàÐÍ£¬ËµÃ÷²Ù×÷³É¹¦£¬´ËʱTestCom .dll¿ÉÒÔ×÷Ϊһ¸öcomÀ´Ê¹Óá£
7¡¢Ìí¼Ódllµ½GAC
ÊäÈëgacutil /i TestCom.dll£¬½«´Ë.net³ÌÐò¼¯Ìí¼Óµ½GAC¡£
ÕâÑù´´½¨×é¼þµÄËùÓй¤×÷¾ÍÍê³ÉÁË¡£Ê£ÏµľÍÊǵ÷ÓÃÁË
ÔÚvbºÍnetÀïÃæµ÷Ó㺵¼Èëdll£¬ÊµÀý»¯¶ÔÏó¾Í¿ÉÒÔʹÓÃÁË
£¨Dim a As New TestCom.Class1£©a.·½·¨
£¨TestCom.Class1 aa = new TestCom.Class1£¨£©£©aa.·½·¨
ÔÚaspµ÷Óãº
<%
SET s = CreateObject("TestCom.Class1")
s.test()
%>
ÒÔÉϾÍÊÇÎÒÕÒµ½µÄ´´½¨×é¼þµÄ×ÊÁÏ£¬ÄÇôÏÖÔھͿªÊ¼±àдÑéÖ¤Âë×é¼þµÄ´úÂë°É
Ê×ÏȱàдÀà¿â£º
using System;
using System.Collections.Generic;
using System.Text;
using System.Runtime.InteropServices;
using System.Drawing;
using System.Security;
namespace TestComs
{
[ComVisible(true)]
public interface iClass1
{
string DoCode(int num);
byte[] DoImg(string code);
}
[ComVisible(true)]
[ClassInterface(ClassInterfaceType.AutoDual)]
public class Class1 : iClass1
{
private double PI2;
public Class1()
{
PI2 = 6.
Ïà¹ØÎĵµ£º
Private Sub Form_load()
'ÅжϳÌÐòÊÇ·ñÒѾÔËÐÐ
If App.PrevInstance
Then
MsgBox "±¾³ÌÐòÒѾÔËÐУ¡", vbInformation Or vbOKOnly, "ÌáʾÐÅÏ¢"
Unload
Me
Exit Sub
&n ......
webbrowser ²»ÄÜÊÕµ½SendMessageµÄÏûÏ¢
Ö÷ÒªÊÇÒòΪ1webbrowser µÄ¾ä±úÕÒ²»µ½¡£¾¹ýŬÁ¦ËÑË÷£¬ÖÕÓÚ½â¾öÁË¡£×ö¸ö¼Ç¼.
Private Declare Function PostMessage Lib "user32" Alias "PostMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, ByVal lParam As Long) As Long
Private Declare Function ......
½ñÌìͬѧװÁËÒ»¸öxampp.À´Ê¹ÓÃFTPºÍMysql. µ«ÊÇËûÊÇʹÓÃASP.netÀ´½øÐÐÍøÒ³¿ª·¢µÄ,È»ºóÓÖ²»ÏëÁíÍâ×°IIS,½ÐÎÒ°ïËûŪ. ÉÏÍøGoogleÒ»ÏÂ,·¢ÏÖ¹úÍâÓÐÈË·¢¹ý½Ì³ÌÁË,²»¹ýÊÇÓ¢ÎĵÄ.ÕûÀíÁËһϺÍ×Ô¼ºÅäÖÃÍê³ÉµÄÐĵÃÖØз¢³öÀ´. Ê×ÏÈ,ÄãÒªÉÏxamppµÄ¹ÙÍøÉÏÏÂÔØ°²×°xampp,°²×°¹ý³Ì¹ÙÍøÓÐÏêϸµÄ˵Ã÷. °²×°Íê³Éºó,È·¶¨ÄãµÄxamppÄܳɹ¦Ô ......
Õâ¶Î´úÂëµÄ¹¦ÄÜÊÇ£º½«Ò»¸öÊý×é´òÂÒ˳Ðò£¬ÏÔʾ³öÀ´£¬ÈÃÿһ´ÎÏÔʾµÄ˳Ðò¶¼²»Ò»Ñù¡£
<%
Dim tt
tt=Split("1,2,3,4,5,6",",")
'Ëæ»úÅÅÐò
leng=UBound(tt)
randomize
for ii=0 to leng-1
b=int(rnd()*leng)
temp=tt(b)
tt(b ......
ÔõôÓÃaspÅжÏÏÂÃæµÄÐÅÏ¢ÕâÀïÎÒÊÇ¿´µ½¶¯Ì¬ÍøµÄ.
FSOÎļþ¶Áд √ Jmail·¢ËÍÓʼþÖ§³Ö ×
CDONTS·¢ËÍÓʼþÖ§³ ......