ÎÒ°ÑsqlµÄÊý¾Ý¿â»»ÎªaccessÊý¾Ý¿â£¬³öÏÖ´íÎó
ÎÒ°ÑsqlµÄÊý¾Ý¿â»»ÎªaccessÊý¾Ý¿â£¬Ö»ÐÞ¸ÄÁËÁ¬½ÓÎļþ£¬ÆäËüµÄ¶¼Ã»Óиı䣬³öÏÖ´íÎó(0x80004005)
無·¨Ö¸³öµÄ錯誤¡£
function returnrsByParam(strsql,con,cursor_type,lock_type,options)
dim rs
set rs=server.createobject("ADODB.RecordSet")
rs.open strsql,con,cursor_type,lock_type,optionsÕâÒ»ÐдíÎó
set returnrsByParam=rs
end function
function returnrsBycon(strsql,byref con)
set returnrsBycon=con.execute(strsql) ÕâÒ»ÐдíÎó
end function
ÇëÎÊ´ó¼ÒÊÇÄÇÀïÎÊÌâ¡£¼±Óá£
ÔÚÏßµÈ
{{
Ïà¹ØÎÊ´ð£º
½«Ò»¸ö±í21~30ɾ³ý£¬sqlÓï¾äÔõôд
Õâ¸öÌ«ÁýͳÁË£¬ÊÇÅÅÐòºóµÄµÚ21Ìõµ½30Ìõ¼Ç¼ɾ³ý»¹ÊÇijһÁÐÖµÔÚ21µ½30Ö®¼äµÄɾ³ý°¡£¿
21-30ÊÇʲôÒâ˼£¿×ֶεϰ¾Ídelete from table1 where col1>=21 and col1<=30
Ö¸µ ......
ÔÊý¾Ý
ÉÌÆ· Ô¼Û ´òÕÛ·½Ê½1 ÕÛ¿Û1 ´òÕÛ·½Ê½2 ÕÛ¿Û2
±Ê¼Ç±¾ 10000 NULL 0 NULL&nb ......
ÄÄÀï³ö´íÁË£¬Êä³öÕâÑùµÄ½á¹û£¿£¿
<%@ Page Language="VB" AutoEventWireup="false" aspcompat="true" CodeFile="Default.aspx.vb" Inherits="_Default" %&g ......
ÕâÁ½Ììѧϰ¡¶Delphi¼¼Êõ·½°¸±¦µä¡·Ò»ÊéÖеÚÈýÕ¹ØÓÚÓû§µÇ¼·½°¸µÄÀý×Ó£¬ÀûÓõÄÊÇSQl ServerÊý¾Ý¿âʵÏÖÓû§µÇ¼£¬±àÒëÔËÐж¼Ã»ÎÊÌ⣬¸ÃʵÏֵŦÄÜÒ²¶¼ÊµÏֵĺܺ㬵«ÊÇÆæ¹ÖµÄÊÇ£¬·´¸´ÔËÐÐÒ»¶Îʱ¼äºó£¬ÓÐʱÔڹرÕÕû¸ö ......