ASPÖÐʹÓÃSQLServerµÄÊÂÎñ¿ØÖƼ°ÅúÖ´ÐÐSqlÓï¾ä
<%
SQL1 = "update table1 set a=b where id=1"
Conn.ExeCute SQL1
SQL2 = "update table2 set a=b where id=2"
Conn.ExeCute SQL2
SQL3 = "update table3 set a=b where id=3"
Conn.ExeCute SQL3
%>
ÊÂʵÉÏ£¬ÕâÊÇÒ»ÖÖЧÂʺܵÍϵÄд·¨£¬ÎªÁËÌá¸ßSQLµÄÖ´ÐÐЧÂÊ£¬ÎÒÃÇ¿ÉÒ԰Ѷà¸öSQLÓï¾äÓÃ·ÖºÅÆ´½ÓÔÚÒ»Æð£¬È»ºóÒ»´ÎÐÔ½»¸øConnÀ´Ö´ÐС£ÈçÏ£º
<%
SQL1 = "update table1 set a=b where id=1"
SQL2 = "update table2 set a=b where id=2"
SQL3 = "update table3 set a=b where id=3"
SQL = SQL1 & ";" & SQL2 & ";" & SQL3
Conn.ExeCute SQL
%>
µ«ÊÇ£¬ÒÔÉÏ2ÖÖд·¨¶¼»áÃæÁÙÒ»¸öÎÊÌ⣬¾ÍÊǵ±ÎÒÃÇÐèÒª±£Ö¤3ÌõSQLÓï¾ä¶¼±ØÐëÍêÕûÖ´ÐУ¬µ±Ä³Ò»ÌõÖ´ÐдíÎóʱ£¬ÆäËû2ÌõÒ²¸úׯعöʱ£¬ÎÒÃǾÍÐèÒªÓõ½SQLServerµÄÊÂÎñ¿ØÖÆÁË£¬²»ÉÙµÄÎÄÕ½¨ÒéʹÓÃÒÔÏ·½·¨£º
<%
dim Conn=Server.CreateObject("ADODB.Connection")
'¿ªÊ¼ÊÂÎñ
Conn.BeginTrans
'Ö´ÐÐSQL,Èô³É¹¦ÔòÌύʣ¬·ñÔò»Ø¹öÊÂÎñ
Conn.Execute(sqlÓï¾ä)
'Ìá½»ÊÂÎñ
Conn.CommitTrans
'»Ø¹öÊÂÎñ
Conn.RollbackTrans
%>
Ôںܶàʱºò£¬Õâ²¢²»ÄÜ´ïµ½±£Ö¤SQLÓï¾äÍêÕûÖ´ÐеÄÄ¿µÄ£¬¸ßЧµÄ×ö·¨Ó¦¸ÃÊÇÀûÓÃSQLServer±¾ÉíµÄÊÂÎñ¿ØÖƹ¦ÄÜ£¬ÈçÏ£º
<%
Sub ExeSql(byval SqlStr)
Dim TrSql
TrSql = "SET XACT_ABORT ON;BEGIN TRANSACTION;"
TrSql = TrSql & SqlStr
TrSql = TrSql & ";COMMIT TRANSACTION;SET XACT_ABORT OFF"
Conn.ExeCute(TrSql)
End Sub
SQL1 = "update table1 set a=b where id=1"
SQL2 = "update table2 set a=b where id=2"
SQL3 = "update table3 set a=b where id=3"
SQL = SQL1 & ";" & SQL2 & ";" & SQL3
ExeSql SQL
%>
Ïà¹ØÎĵµ£º
1.Ñ¡Ôñ×îÓÐЧÂʵıíÃû˳Ðò(Ö»ÔÚ»ùÓÚ¹æÔòµÄÓÅ»¯Æ÷ÖÐÓÐЧ)¡¡¡¡
¡¡¡¡ SQLSERVERµÄ½âÎöÆ÷°´ÕÕ´ÓÓÒµ½×óµÄ˳Ðò´¦Àífrom×Ó¾äÖеıíÃû£¬Òò´Ëfrom×Ó¾äÖÐдÔÚ×îºóµÄ±í£¨»ù´¡±ídriving table£©½«±»×îÏÈ´¦Àí£¬ÔÚfrom×Ó¾äÖаüº¬¶à¸ö±íµÄÇé¿öÏ£¬±ØÐëÑ¡Ôñ¼Ç¼ÌõÊý×îÉٵıí×÷Ϊ»ù´¡±í£¬µ±SQLSERVER´¦Àí¶à¸ö±íʱ£¬»áÔËÓÃÅÅÐò¼°ºÏ²¢µÄ·½Ê½Á ......
ÎÒÔÚ°ÑoracleÊý¾Ýµ¼ÈësqlserverÖÐʱ£¬·¢ÏÖÔÚoracleÖÐ×ֶζ¨ÒåΪΨһË÷Òýʱ£¬²»Í¬¼Ç¼µÄ´Ë×Ö¶ÎÈç¹ûΪ¿Õ²»±»ÈÏΪÊÇÖØ¸´µÄ£¬µ«ÔÚsqlserverÖÐÈç¹û´Ë×Ö¶ÎΪΨһË÷Òý×ֶΣ¬²»ÔÊÐíÓÐ2¸öÒÔÉϵĿÕÖµ¡£ÓôÃÆ¡£ËùÒÔÖ»ºÃ½«sqlserverÖеÄΨһË÷Òý×Ö¶ÎÊÖ¹¤ÐÞ¸ÄΪ¼¸¸ö·Ç¿ÕµÄÖµ£¬µ«ÕâÑù³ÌÐò¿Ï¶¨Òª½øÐÐÐÞ¸ÄÁË¡£ÐèÒªÔÚ³ÌÐòÖÐΪ´Ë×Ö¶ÎÉèÖò»Öظ´ ......
create function comm_getpy
(
@str nvarchar(4000)
)
returns nvarchar(4000)
as
begin
declare @word nchar(1),@PY nvarchar(4000)
set @PY=''
while len(@str)>0
begin
set @word=left(@str,1)
--Èç¹û·Çºº×Ö×Ö·û£¬·µ»ØÔ×Ö·û
& ......
1.Èç¹ûÏÈprepare ºóÌí¼Ó²ÎÊý£¬ÕâÑùÒ»²¿·ÖÊý¾ÝÀàÐÍ¿ÉÒÔ²»ÓÃÉèÖÃÆäsize´óС£¬ÀýÈçchar
2.Èç¹ûÏÈÌí¼Ó²ÎÊýÔÙprepare£¬¾Í±ØÐëÉèÖòÎÊýµÄÀàÐÍ£¬´óС£¬¾«¶È²ÅÄÜͨ¹ý£¬±ÈÈçchar,varchar,decimalÀàÐÍ£¬¶øint,floatÓй̶¨×Ö½ÚÀàÐ͵ÄÊý¾ÝÀàÐÍÔò¿É²»ÓÃÉèÖôóС¡£
3.¹ØÓÚSqlServerµÄtimestampÀàÐÍ£º¸ÃÀàÐÍΪSqlServerµÄʱ¼ä´ÁÀàÐÍ£¬´´½ ......