sql=" insert into testA ( DepNo, empNo) values(?,?) ; " '-- ÀÌ Å×ÀÌºí¿¡ ÀÚµ¿Áõ°¡ identity ÇʵåÀִ°æ¿ìÀÓ sql= sql & " select ? =@@identity " set cmd=server.createObject("ADODB.Command") with cmd .ActiveConnection = db '-- ¿©±â¼­ db´Â Ado.ConnectionÀÓ .CommandText =sql .Parameters.Append .CreateParameter("@p1", adInteger, adParamInput,, 4000) .Parameters.Append .CreateParameter("@p2", adInteger, adParamInput,, 500) .Parameters.Append .CreateParameter("@rr",adInteger, adParamOutput,,rr) .execute tmp= .Parameters(2) end with set cmd=nothing response.write tmp £È.£Õ.£Ã-Œ­Œ­¡áÓÑÇé¼ì²â,¹óվ©¶´Ï൱¶à£¡

£È.£Õ.£Ã-Œ­Œ­¡á
ΪÖйúµÄÍøÂ簲ȫÊÂÒµ·Ü¶·ÖÕÉí!