vb »ñÈ¡¶¯Ì¬sql µÄ·µ»ØÖµ¡£
´æ´¢¹ý³ÌÊDzÉÓö¯Ì¬µÄsqlÓï¾ä¡£
SQL code:
...
EXECUTE sp_executesql @StrSql,N'@UserID uniqueidentifier OUTPUT,@SysTime VARCHAR(20) OUTPUT,@EmpCode VARCHAR(5) , @PassWord VARCHAR(8)',@UserID OUTPUT ,@SysTime OUTPUT,@EmpCode,@PassWord
IF ....
BEGIN
RETURN 0
END
...
VB code:
With cmd
Set .ActiveConnection = g_Conn
.CommandType = adCmdStoredProc 'ÉèÖÃCommandÀàÐÍΪ¡°´æ´¢¹ý³Ì¡±
.CommandText = "P_Attend" '´æ´¢¹ý³ÌµÄÃû³Æ
'·µ»ØÐͲÎÊý
.Parameters.Append .CreateParameter("@RetVal", adInteger, adParamReturnValue)
'´«Èë²ÎÊý
.Parameters.Append .CreateParameter("@EmpCode", adChar, adParamInput, 5, strEmpCode)
.Parameters.Append .CreateParameter("@PassWord", adChar, adParamInput, 5, strPassWord)
'´«ÈëÊä³öÐ͵IJÎÊý
.Parameters.Append .CreateParameter("@UserID", adGUID, adParamOutput)
.Parameters.Append .CreateParameter("@SysTime", adGUID, adParamOutput)
.Execute
'µÃµ½²Ù×÷½á¹û£¬µÇ½³É¹¦·µ»ØÓû§ID
Attend= .Parameters("@RetVal").Value
If Attend= 0 Then
UserID = .Parameters("@U
Ïà¹ØÎÊ´ð£º
Ö´ÐеÄ˳Ðò£º
1£©Îļþä¯ÀÀ¿ò£¨Ñ¡ÔñÎļþʹÓã©
Ñ¡ÔñºÃÎļþºó
µã»÷Ò»¸öµ¼Èë°´Å¥µÄʱºò £¬°ÑÉÏÃæÉÏ´«¿òÀïµÄcsvÎļþÒÔÒ»¸öIDΪÎļþÃû£¬ÉÏ´«µ½**/**Îļþ¼ÐÏÂ
2£©¶ÁÈ¡Õâ¸öÎļþ¼ÐϵÄcsvµÄÎļþ£¬×ª»»³Ésql
3 ......
ÎÒÓжà¸ö±íA B C ½á¹¹ÊÇÒ»ÑùµÄ£¬¶¼ÓÐ2¸ö×Ö¶ÎnameºÍcontent,ÎÒÒªËÑË÷ËùÒÔ±íËùÓÐ×Ö¶ÎÖаüº¬¡°Öйú¡±µÄÄÚÈÝ Õâ¸öSQLÓï¾äÔõôд
ÈçºÎ½«¶à¸ö±íµÄ²éѯ½á¹ûÁ¬³ÉÒ»¸ö±í Õâ¸öSQLÓï¾äÔõôд ±íµÄ½á¹¹ÊÇÒ»ÑùµÄ
ÀýÈç£ ......
ÔÚÏÂÊÇvbµÄÐÂÊÖ£¬Ïëд¶Î³ÌÐò£¬ÔÚvbÖУ¬Ê¹ÓÃwscriptµ÷ÓÃһЩÍⲿµÄÃüÁµ«ÊdzÌÐòÖ´ÐÐÒ»Ö±ÓдíÎó£¬Çë¸÷λ¸ßÊÖ°ïæ½â´ðÏ£¬Ð»Ð»¡£
´úÂëÈçÏ£º
VB code:
Private Function getFile_CMD(filename, filepath) As Bo ......
ΪʲôÎÒÓÃform.showºÍform.hide¶à´ÎÁ¬½ÓÁËÁ½¸ö´°¿ÚÖ»ÄÜ»¥»»Á´½ÓÁ½´Î°¡£¿
´úÂë¿´¿´
ÕÕµÀÀíform.show û´ÎÊýÏÞ¶¨µÄ°É
ÎÒÒ²¿ì·èÁË¡£
Â¥Ö÷ÖªµÀÔõô·¢Ìùô£¿
ÒýÓÃ
ÎÒÒ²¿ì·èÁË¡£
Â¥Ö÷ÖªµÀÔõô·¢Ìùô£¿
Â¥Ö÷Ò² ......
sqlserver2005 ½¨Á¢µÄÊý¾Ý¿â£¬ÓëÊÖ³Öpda´«ÊäÊý¾Ý£¬×î½üͻȻ³öÏÖÎÞ·¨´«µÝÊý¾ÝµÄÎÊÌ⣬pda¶ËÌáʾµÄ´íÎóʱoutofmemoryexception£¬µ«ÊÇpdaÉÏÃæµÄÈÝÁ¿Ã»ÓÐÎÊÌ⣬
sqlserverµÄÈÕ×ÓÉϵĴíÎóÈçÏ£º
ÈÕÆÚ 2010-1-25 14:45: ......