C´úÂëÓïÑÔתVB´úÂëµÄÎÊÌ⣺
ËÄܰïÎÒ°ÑÕâ¶Î´úÂëת³ÉVbµÄ´úÂ룬²»Ê¤¸Ð¼¤£¬Ð»Ð»£¡
void CTempDlg::OnOK()
{
UpdateData(1);
int nlen=m_edit1.GetLength();
char *username=m_edit1.GetBuffer(nlen);//¶¨ÒåÒ»¸öÐÂ×Ö·û´®username,³¤¶ÈΪnlen£¬²¢½«m_edit1ÖеÄ×Ö·û´®Ò»¸ö¸ö·ÅÈëµ½usernameÊý×éÖÐ
char strA[]="9012345678abcdeABCDEFGHIJKLMNfghijklmnUVWXYZxyzuvwopqrstOPQRST";
int szint[18]={0x11,0x34,0xC9,0x23,0x75,0x18,0xD7,0xE2,0x12,0x35,0x29,0x2B,0xEC,0xB6,0x23,0x19};
int ljq1=0,ljq2=0x25;//ÀÛ¼ÓÆ÷
int k=0,l=0,q=0;
char *serile=new char[nlen];//¶¨ÒåÒ»¸öÐÂ×Ö·û´®Êý×éserile,³¤¶ÈΪnlen
for (int i=0;i<strlen(username);ljq1=ljq1+5,i++)
{
for (int j=0;j<strlen(strA);j++)
{
if (username[i]==strA[j])
{
// k=0,l=0/*,q=szint[i+2]*/;
l=szint[i];
if (i>=16)
{
l=i % 0x10;//ÇóÓà
l=szint[l];
}
k=ljq2;
k=k*3;
l=l^k;
l=l^ljq1;
l=l+j;
l=l % 0x3e;//ÓàÊý
serile[i]=strA[l];
l=l+0x24d9;
ljq2=l^ljq2;
break;
Ïà¹ØÎĵµ£º
CÓïÑÔ±ØÖª±Ø»á
Ö¸Õ룺
1.Ö¸ÕëÉùÃ÷ºóÒª¸³Öµ£¡·ñÔòÊÇ¿ÕÖ¸Õ룬¿É²»ÖªµÀÖ¸ÏòÁËÄÄÀï
ÀýÈ磺
void swap(int *a,int *b){
int *tmp;
*tmp=*a;
*a=*b;
*b=*tmp;
}
±¾À´ÊÇÏëÀûÓÃÉÏÃæµÄswapº¯ÊýʵÏÖÁ½¸öÊýµÄ»¥»»£¬µ«ÊÇ*tep=*a;Õâ¾ä»°ÊÇÓÐÎóµÄ ......
Microsoft VBScript ÔËÐÐʱ´íÎó '800a0046' ûÓÐȨÏÞ: 'CreateObject'
ÏÔʾ´íÎó£ºÃ»ÓÐȨÏÞ: 'CreateObject'
¼ÇµÃ½«×é¼þ¼ÓÈë Users ×éȨÏÞ£¨Èç¹û½« C ÅÌÈ¥µô Users ×éȨÏ޵ϰ£©¡£
¿ªÊ¼¡£¡£¡£ÔËÐС£¡£¡£regsvr32 jscript.dll (ÃüÁÄÜ£º ÐÞ¸´Java¶¯Ì¬Á´½Ó¿â)
¿ªÊ¼¡£¡£¡£ÔËÐС£¡£¡£regsvr32 vbscript.dll(à ......
VB±¸·ÝACCESSÊý¾Ý¿âµÄ·½·¨£¬´úÂë
Õâ¸ö´úÂëÆäʵҲÊÊÓÃÓÚÆäËüÀàÐÍÎļþµÄ¸´ÖÆ£¬ÒªÐÞ¸ÄÒ»ÏÂÆäÖеÄÓï¾äŶ~Private Sub bak_Click()
Dim TargetFileName As String 'Ä¿±êÎļþÃû
On Error Resume Next
With cdlog1
.DialogTitle = "Êý¾Ý±¸·Ý"
.InitDir = App.Path
.FileName = "backup.mdb"
.Filter = ......
±¾ÎÄÀ´×Ôqingye2008Ëù·¢µÄ´ËÌûµÄÌÖÂÛ£¬¸Ðл³Â»Ô¡¢ÂíÔÆ½£¡¢qingyeµÄÄÍÐÄÖ¸µãºÍ·ÖÏí¡£
1¡¢ÒýÑÔ
»°ËµqingyeͬѧµÃµ½ÁËÒ»¸öÓÃÓÚ¼Ó½âÃܵÄDll£¨¸Ã¶¯Ì¬¿âÔÚÕâÀïÏÂÔØ£©£¬Í¨¹ýDll Export Viewer¿´µ½dllÓÐ2¸öµ¼³öº¯Êý·Ö±ðÊÇDll_EncInºÍDll_EncOut£¬qingyeͬѧÏëÔÚVBÖÐʹÓÃÕâÁ½¸öº¯Êý¡£ÒòΪ¸ã²»µ½½Ó¿Ú˵Ã÷£¬Ö»ºÃͨ¹ý²é¿´»ã±à´úÂëÀ´²Â ......