飞飞世界论坛

 找回密码
 立即注册
搜索
热搜: 活动 交友 discuz
查看: 13903|回复: 0
打印 上一主题 下一主题

物品发送脚本

[复制链接]

197

主题

203

帖子

1086

积分

管理员

Rank: 9Rank: 9Rank: 9

积分
1086
QQ
跳转到指定楼层
楼主
发表于 2016-1-10 03:43:06 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
<?php
( O$ l) Q/ u" [9 K/ m! Vfunction Connect () {; B8 t" j% C& P& R7 x
mssql_connect('Server','UserName','Password') or die('Error: Connection to DB * _, q) B) u/ F& R# [) w
2 a/ I; c$ r& S. W: j  N
Failed.');, M$ f  I% {7 V
}
5 v  x( V2 P3 _: a" NConnect();
1 }! M; J0 T( w9 X, P5 b) q; c" M2 D4 J, _
function InitForm(){' k' o/ G3 }7 x1 d2 R$ {& U
//layout for the form- o9 r1 J4 Q6 P4 v
echo "<strong>Send Items.</strong>" ^' }# ], W2 l; g- ?9 Q
<form name='select' method='post'>& P0 P5 h+ ?* P# V9 a9 Z
<lable>Character Name</lable><br/>+ E6 w" |1 Q; U5 I# K8 W1 C
<input type='text' name='char'/><br/>
$ a$ w- l1 w! F# r0 X  e1 \<lable>Item Name (Needs to be Exact or can use Item ID.)</lable><br/>1 ~8 s/ f3 u" F" s0 n. @
<input type='text' name='item_name'/><br/>
- `8 t7 w8 n8 J3 e<lable>Item Amount</lable><br/>
1 k' o( l. o% V) P& V<input type='text' name='item_amount'/><br/>- Z7 B4 ?- }$ C5 E
<lable>Item Upgrade Amount</lable><br/>1 X" h; Y4 C# [' J: ~+ Q
<input type='text' name='item_upgrade'/><br/>
: R6 n1 k" K$ U  \$ T- }<lable>Element Type.(0-None, 1-Fire, 2-Water, 3-Electricity, 4-Wind, 5-Earth.)
$ N7 u6 Z. R  S2 T( S$ H+ R1 ]0 ?' c2 l; B3 f: J  q
</lable><br/>. P, p+ x0 j/ m
<input type='text' name='item_element'/><br/>  y9 G9 L& p6 N
<lable>Element Upgrade Amount</lable><br/>
: h( a+ I  j6 X( I5 T( |! u0 }<input type='text' name='element_upgrade'/><br/>
  k' m9 @) l+ Y7 Y5 x<lable>Pierced Amount</lable><br/>
( L: |( u/ G$ ]( J, A<input type='text' name='item_pierce'/><br/>
6 a! ?5 b" E- P- ], `' p+ W0 C1 f" C<input type='submit'/>0 k) _' i  x% T/ w1 ~4 q
</form>";* u; C7 S5 Z6 z3 ~$ W
}
* U8 ]  K- ?* _, v
, \: q+ t! ]0 N! nfunction PostListener (){
0 B( p' p2 P' ~1 x5 I//Add more post variables if needed and add them to initform() function aswell
7 q) ]( X1 T  s5 K) q8 T2 f& B
' f& Q1 Q/ {; S3 i5 K& V################################
& P3 y( j, ~# F! c6 O# J$ A##### Connection and Post ######
# S5 L5 l, p8 W7 p1 @4 c6 ~################################
. l9 s5 z0 ^# b# D# p1 `$name = @$_POST['char'];: i2 X" M7 k4 }1 B5 j4 P# O* v
$ItemName = @$_POST['item_name'];
5 Y7 g  r" \$ p6 n1 c+ d$ItemAmount = @$_POST['item_amount'];1 r+ n8 X' A  ?
$ItemId = @$_POST['item_id'];4 {) r2 v3 v4 G0 B, `; g
$ItemUpgrade = @$_POST['item_upgrade'];8 ^/ o, o' X# \0 e" N) z! R# ^3 m
$ItemElement = @$_POST['item_element'];
& Q8 K8 Y* g; t: o8 Z: I$ElementUpgrade = @$_POST['element_upgrade'];( ?* a, ?' ]7 y8 s
$ItemPierce = @$_POST['item_pierce'];6 v: Z8 t# ^3 a' h# C' _
################################
* {# ^, J; S0 E+ i+ W. H) Y
1 X4 I4 w* I8 R8 T& y! `  u9 w//Check both variables for empty value
# L; z+ j/ z5 ]1 Z: ?. a: T2 _( N" I# B: q  ?
if (!empty($_POST['char'])){
! Y& z" M, x& h5 K* ?$find = mssql_query("select * from [CHARACTER_01_DBF].[dbo].[CHARACTER_TBL] where * n5 C4 R- q: X( P$ T- ^

, g1 Z, v7 y0 f+ Z' K0 G; q0 Sm_szName = '{$name}'");
* I/ q' X/ U/ a, D1 D# q, ~2 pwhile ($row = mssql_fetch_object($find)){
5 s+ m* ]/ p* c7 necho "You Just Sent {$ItemAmount} {$ItemName}(s) to {$name}<br>";
4 P% @0 K3 j4 h/ Z$logs = mssql_query("INSERT INTO CHARACTER_01_DBF.dbo.ITEM_SEND_TBL([m_idPlayer], 7 F6 Q5 c+ e0 r  n& y) g# G& w1 ?

" _! r0 W2 _9 G[serverindex], [Item_Name], [Item_count], [idSender], [m_nAbilityOption], ; ~/ V/ e7 A& ^$ w6 j

' x2 O! f9 ^6 ?( T9 i, l+ Q2 _[m_bItemResist], [m_nResistAbilityOption], [nPiercedSize]) VALUES(N'$row->m_idPlayer', 3 r) W3 i) u* O3 y# ^* S; }/ |
8 j5 q8 K1 M/ ~& r2 X
N'01', N'{$ItemName}', '{$ItemAmount}', N'0000001', '{$ItemUpgrade}', '{$ItemElement}',
6 _) q0 H5 b8 w
6 X; @0 r) [& ^& A6 e'{$ElementUpgrade}', '{$ItemPierce}');");* \: b; B8 ~0 l0 M
}
; Y( J) Q/ u7 C
4 X: ~# t7 f- o}
  V3 z6 q, m! q3 e& p. w
# k/ e3 I+ W& Z6 @( B4 t& m9 q}
2 E) O/ |5 C. [" x9 ?/ R" T. `! _8 j3 \% Z% q# N, U: I1 \; |
$InitForm = InitForm();
0 y1 s- \3 i0 h$Listener = PostListener();0 T: ^5 ]& @, t7 k( Y0 f

4 p9 E8 Q8 n" H7 k+ I?>0 \- R; f1 M8 D# \- Y- f  A2 g

/ C5 s" n0 f, u* _. r+ F9 M* r. `
& K5 m% f: \7 G) F2 y
% V. z! y6 H/ A
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

手机版|小黑屋|飞飞世界技术论坛  

GMT+8, 2025-12-2 05:34 , Processed in 0.058897 second(s), 23 queries , Gzip On.

Powered by Discuz! X3.2

© 2001-2013 Comsenz Inc.

快速回复 返回顶部 返回列表