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

MYSQL´æ´¢¹ý³ÌVBµ÷Ó÷½·¨¡£

Private Sub Command1_Click()
   
    Dim MyComm As New ADODB.Command      '¶¨ÒåÒ»¸öÃüÁî¶ÔÏó
    Dim Rs_GetList As New ADODB.Recordset '¶¨ÒåÒ»¸ö¼Ç¼¼¯¶ÔÏó
    Dim param As ADODB.Parameter         '¶¨ÒåÒ»¸ö²ÎÊý¶ÔÏó
   
    With MyComm
        .ActiveConnection = Cn           'Êý¾ÝÁ¬½Ó
        .CommandText = "pp"              '´æ´¢¹ý³ÌÃû³Æ
        .CommandType = adCmdStoredProc   '±íÃ÷ÕâÊÇÒ»¸ö´æ´¢¹ý³Ì
        .Prepared = True                 'ÒªÇó½«SQLÃüÁîÏÈÐбàÒë
        Set param = .CreateParameter("@a", adInteger, adParamInput, 4, 3)   'ÉêÃ÷Ò»¸ö²ÎÊý
        .Parameters.Append param         '°Ñ²ÎÊýÌí¼Óµ½²ÎÊýÁбíÀï
        Set Rs_GetList = .Execute        'Ö´Ðд˴洢¹ý³Ì£¬·µ»Ø¼Ç¼¼¯
    End With
   
    While Not Rs_GetList.EOF             'Ñ­»·´òÓ¡¼Ç¼¼¯µÄ×Ö¶Î
        Debug.Print Rs_GetList.Fields(0).Value
        Rs_GetList.MoveNext
    Wend
End Sub


Ïà¹ØÎĵµ£º

ÈçºÎʹÓÃMySQLÌáÉýȨÏÞ


ǰ²»¾ÃÍøÉϹ«¿ªÁËÒ»¸öMySQL FuncµÄ©¶´,½²µÄÊÇʹÓÃMySQL´´½¨Ò»¸ö×Ô¶¨ÒåµÄº¯Êý,È»ºóͨ¹ýÕâ¸öº¯ÊýÀ´¹¥»÷·þÎñÆ÷¡£×îÔç¿´µ½Ïà¹ØµÄ±¨µÀÊÇÔÚo-otikÉÏ,µ«Êǹ«²¼µÄÊÇÕë¶Ô UnixϵͳµÄExploit,²¢Çҳɹ¦ÂÊÒ²²»ÊǺܸß.¶ø½üÆÚ,¹úÄÚÓиßÊַųöÕë¶ÔWinϵͳµÄÏà¹ØÎÄÕÂ,ÓÚÊÇÎÒÂíÉÏÕÒÀ´ÓëÅóÓÑһͬÑо¿.
ÆäʵÎÒÃÇÔç¾ÍÄÜÏëµ½.µ±ÎÒÃÇÔÚ¶ÔMSSQL ......

¹Ø±ÕMYSQL´íÎóÌáʾÒô

×î½ü¹¤×÷Éϳ£Óõ½MySQL£¬·¢ÏÖMySQLµÄ´íÎóÌáʾÒô±È½Ï·³ÈË£¬ÉÏÍøËÑË÷ÁËһϣ¬ÓÐÒÔÏÂÈýÖֹرոÃÌáʾÒôµÄ·½·¨£º
·½·¨1. ʹÓÃÖÕ¶ËÃüÁî
   ʹÓÃMySQLµÄÃüÁîÖÕ¶Ëʱ£¬Ê¹ÓÃmysql --no-beep¼´¿É¡£
·½·¨2. ÐÞ¸ÄMySQLÅäÖÃÎļþmy.ini
    ÔÚ[mysql] ϼÓÈëÒ»ÐÐ
    no-beep
 &nb ......

¹ØÓÚmysql plugin ×Ô¶¨Òåϵͳ±äÁ¿

1. ¶¨Òå
/*
  Plugin system variables.
*/
static long     sysvar_one_value;
static char     *sysvar_two_value;
static MYSQL_SYSVAR_LONG(simple_sysvar_one, sysvar_one_value,
  PLUGIN_VAR_RQCMDARG,
  "Simple fulltext parser example system variab ......

VBÖд°ÌåÄ£¿é¡¢±ê׼ģ¿é¡¢ÀàÄ£¿éµÄÇø±ð

VBµÄ´úÂë´æ´¢ÔÚÄ£¿éÖС£ÔÚVBÖÐÌṩÁËÈýÖÖÀàÐ͵ÄÄ£¿é£º´°ÌåÄ£¿é¡¢±ê׼ģ¿éºÍÀàÄ£¿é¡£
¡¡¡¡¼òµ¥µÄÓ¦ÓóÌÐò¿ÉÒÔÖ»ÓÐÒ»¸ö´°Ì壬ËùÓõijÌÐò¶¼×¤ÁôÔÚ´°ÌåÄ£¿éÖУ¬¶øµ±Ó¦ÓóÌÐòÅÓ´ó¸´ÔÓʱ£¬¾ÍÒªÁíÍ⸽¼Ó´°Ìå¡£×îÖÕ¿ÉÄÜÓм¸¸ö´°ÌåÖÐÓÐһЩ¹²Í¬¶¼ÒªÖ´ÐеĴúÂ룬ΪÁËÔÚÁ½¸ö´°ÌåÖв»²úÉúÖØ¸´´úÂ룬¿É´´½¨Ò»¸ö¶ÀÁ¢µÄÄ£¿é£¬ÓÃËüʵÏÖ´ú ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ