|
|
|
|
¹Ý¾ß / 2000-06-01 / ¿ÀÀü 2:43:49 / 210.207.238.52
Á¶È¸¼ö : 217
|
[Áú¹®] asp¿¡¼ ÇÁ·Î½ÃÀú ½ÇÇà½ÃÅ°±â ¿¡·¯60 |
ÀÌ ÆäÀÌÁö´Â °ü¸®ÀÚ ¸ðµå¿¡¼ db¿¡ µ¥ÀÌÅ͸¦ »ðÀÔÇÏ°í, ÀúÀåÇÁ·Î½ÃÀú¸¦ È£ÃâÇÏ¿©. ½ÇÇà½ÃÅ°´Â ºÎºÐÀÔ´Ï´Ù.
¹®Á¦°¡ µÇ´Â°ÍÀº ÇÁ·Î½ÃÀú¸¦ È£ÃâÇؼ, ½ÇÇØÇÏ´Â ºÎºÐÀε¥, ´ÙÀ½ °ú°°Àº ¿¡·¯°¡ ³³´Ï´Ù.
ADODB.Command error '800a0bb9'
ÀÀ¿ë ÇÁ·Î±×·¥ÀÌ À߸øµÈ Çü½ÄÀ̰ųª, ¿Ã¹Ù¸¥ ¹üÀ§ ¹Û¿¡ Àְųª, ¼·Î Ãæµ¹ÇÏ´Â Àμö¸¦ »ç¿ëÇÏ°í ÀÖ½À´Ï´Ù.
Á¦°¡ ÇÁ·Î½ÃÀú È£ÃâÇÏ´Â ¹æ¹ýÀ» À߸ô¶ó¼ÀÎÁö, ¾ÆÁ÷ Ãʺ¸¶ó¼¿ä. ºÎµð ¹æ¹ýÀ» ¾Ë·ÁÁÖ¼¼¿ä.
-------------¼Ò½ºÄÚµå-----------
<%
Set db=Server.CreateObject("ADODB.Connection")
db.Open("dsn=xx;Uid=xx;pwd=xx")
team_game_num = request("game_num")
team_num = request("team_num")
sql = "insert into TEAM_RESULT (team_game_num,team_num) values (''"&team_game_num&"'',''"&team_num&"'')"
db.Execute sql
%>
<%
Set ObjCmd=Server.CreateObject("ADODB.Command")
Set ObjCmd.ActiveConnection=db
Set rs=Server.CreateObject("ADODB.Recordset")
ObjCmd.CommandText="returnpoint"
ObjCmd.Commandtype=adCmdStoredProc
objcmd.excute
Set rs=objcmd.execute
rs.Open objcmd
%>
---------dbÀÇ ÀÌ ºÎºÐÀº ÇÁ·Î½ÃÀú ±¸¹®------
create proc returnpoint
as
declare bet cursor
for
select r.team_bet_num, r.mem_id, r.pre_point
from team_result tr, ratio r
where tr.team_game_num = r.team_game_num and tr.team_num = r.team_num
open bet
declare @team_bet_num int,
@mem_id varchar(8),
@point int
fetch next from bet into @team_bet_num,@mem_id,@point
while(@@fetch_status = 0)
begin
update member
set reminder = reminder + @point
where mem_id = @mem_id
insert account_log values (@point, '°ÔÀӽ¸® (#$000'+convert(varchar(10),@team_bet_num)+')'
, getdate(), @mem_id)
fetch next from bet into @team_bet_num,@mem_id, @point
end
close bet
deallocate bet
truncate table team_result
|
|
|
|