飞飞世界论坛

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

物品发送脚本

[复制链接]

197

主题

203

帖子

1086

积分

管理员

Rank: 9Rank: 9Rank: 9

积分
1086
QQ
跳转到指定楼层
楼主
发表于 2016-1-10 03:43:06 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
<?php0 n! o+ y: r% }
function Connect () {
7 l+ _0 d7 ]4 r4 M! W1 v- Kmssql_connect('Server','UserName','Password') or die('Error: Connection to DB
- o) W7 h9 q# `  o% S' S/ j- R8 g! v6 R: K! q" |0 t
Failed.');
3 ]- \1 |3 Y0 C' l$ p}6 i0 P- w: `& k( w' z
Connect();. i2 y0 g, m( Y: O5 |5 A# a

0 ?* V) k/ O5 k1 Y! D) y% Tfunction InitForm(){2 ~" o% o; I6 P7 j1 `& ]5 D; @
//layout for the form
* {. h' C  Q3 u2 C  W; C" ^echo "<strong>Send Items.</strong>3 C& l( ]" f- s7 k) \3 D
<form name='select' method='post'>
8 @; X  M" ?  M3 l<lable>Character Name</lable><br/># N, L! j% ]. c* p
<input type='text' name='char'/><br/>: `6 ?' j# E# C9 E0 r
<lable>Item Name (Needs to be Exact or can use Item ID.)</lable><br/>4 E8 R+ P4 E# p4 N3 _: E/ s
<input type='text' name='item_name'/><br/>
$ U, n" E$ {/ H" S6 s" @<lable>Item Amount</lable><br/>
5 s- P0 K( `. h' }7 k<input type='text' name='item_amount'/><br/>
3 _9 F* j( f) {8 a<lable>Item Upgrade Amount</lable><br/>
, H6 b$ x# `' l; }4 a<input type='text' name='item_upgrade'/><br/>( o* [/ s: F, o, M) p. D( ~3 U1 _
<lable>Element Type.(0-None, 1-Fire, 2-Water, 3-Electricity, 4-Wind, 5-Earth.)
$ n" }* o0 @7 {7 n
1 n. i6 ^6 N. [; i' F6 [1 K9 Y</lable><br/>
& t. |: \) @/ }<input type='text' name='item_element'/><br/>8 x  K7 a" u3 P- D6 r! ~
<lable>Element Upgrade Amount</lable><br/>
5 Y! D$ D) |/ ^<input type='text' name='element_upgrade'/><br/>
. H* e0 s2 Y% ^  u- ^" i- v5 s<lable>Pierced Amount</lable><br/>- s2 g$ n+ B9 V: ?& }) Q
<input type='text' name='item_pierce'/><br/>
  Y. s3 ~1 S+ y2 \' X/ m6 B<input type='submit'/>- U  j* f3 `0 @/ Q: j5 N' _
</form>";
9 D+ {3 z* z" y; ]+ ?}  I7 N- W# x0 ?" J% R
3 J6 L% r- O3 m* z" V* W. L4 u
function PostListener (){
) A& I! F( r% d( l& ?7 g9 Q//Add more post variables if needed and add them to initform() function aswell
" B0 T; M3 N" s. A1 o- \! w
* r7 @0 C" [# I0 d. d# r################################
2 w, t& A/ K/ |) B, ~6 X; r##### Connection and Post ######
" U8 P* Z/ V, z$ @  X################################
1 K! u9 v, w! u4 j$ V8 D$name = @$_POST['char'];. K6 N6 G& V$ n3 x& S0 w
$ItemName = @$_POST['item_name'];
9 {8 ^7 P+ c. Z( p2 h3 q$ItemAmount = @$_POST['item_amount'];1 F: Q# y, k& \  G$ b' x
$ItemId = @$_POST['item_id'];
# i, S- j! W' V4 C: {$ItemUpgrade = @$_POST['item_upgrade'];7 u3 s* g" s, ?8 J
$ItemElement = @$_POST['item_element'];
- u! i$ A8 [' }# C/ D$ _' t$ElementUpgrade = @$_POST['element_upgrade'];) ^0 z6 ?( \' @6 S/ t
$ItemPierce = @$_POST['item_pierce'];* o! Y/ D* n" `( \" B! L
################################$ G: ~/ ?+ w0 U* b8 {2 I+ f5 T' G

3 `# U+ r' C) Q//Check both variables for empty value
, z9 p; D+ O) j7 Q) y
3 [  T5 K. z* d& k  Fif (!empty($_POST['char'])){  i  N2 J4 A! Z) J6 ~* j
$find = mssql_query("select * from [CHARACTER_01_DBF].[dbo].[CHARACTER_TBL] where , L( V9 m6 V2 _4 v$ D

7 K9 Q, q9 c$ D  q- J1 C, Zm_szName = '{$name}'");
; w" u5 Q7 X, C; O- k, Swhile ($row = mssql_fetch_object($find)){
( K$ S1 ^4 E8 v! a- w8 k" n" Vecho "You Just Sent {$ItemAmount} {$ItemName}(s) to {$name}<br>";
! E3 c  v) I" C  n$logs = mssql_query("INSERT INTO CHARACTER_01_DBF.dbo.ITEM_SEND_TBL([m_idPlayer],
' |; Z% [) {2 \! @% d# c& y/ J+ C) A/ {& Y# j) ?
[serverindex], [Item_Name], [Item_count], [idSender], [m_nAbilityOption], . Y0 `, |" S1 Z8 G8 g" O0 [
9 U8 ?# E& |+ e; B: N$ C
[m_bItemResist], [m_nResistAbilityOption], [nPiercedSize]) VALUES(N'$row->m_idPlayer', % s, c! t$ W0 j! ], Z' o2 g

& V5 d& }" f  \. R+ bN'01', N'{$ItemName}', '{$ItemAmount}', N'0000001', '{$ItemUpgrade}', '{$ItemElement}',
7 \% I- @+ S  Q
7 M# m5 f2 G+ w8 @'{$ElementUpgrade}', '{$ItemPierce}');");
3 Q, x4 R, {8 T) `% N. a}4 ~' m( W0 n- O* ]& p6 a' m( j
6 M( {6 e$ I0 \; Q# n
}
' Z9 `5 q/ v6 I% N) m2 G5 v5 h. [1 r, i# @
}
2 O  f2 b7 C$ m7 t+ R6 [! M& F2 O$ a1 F4 C
$InitForm = InitForm();: B& e) k) b1 x) G: B6 b# l  h
$Listener = PostListener();* W' }2 I; u( v5 N0 D

8 a" f  J* a1 l7 h' Z2 i; }?>. f$ v& y1 D. L8 r9 z2 B

& [( N. |) q( o- E
( R8 L( @! T$ g/ M6 P
& k& o' R8 \; Y/ L$ A
5 ?/ G  U# R6 F, |1 ?
回复

使用道具 举报

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

本版积分规则

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

GMT+8, 2025-12-4 14:30 , Processed in 0.071493 second(s), 22 queries , Gzip On.

Powered by Discuz! X3.2

© 2001-2013 Comsenz Inc.

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