飞飞世界论坛

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

物品发送脚本

[复制链接]

197

主题

203

帖子

1054

积分

管理员

Rank: 9Rank: 9Rank: 9

积分
1054
QQ
跳转到指定楼层
楼主
发表于 2016-1-10 03:43:06 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
<?php3 F) p+ O! \  U( O6 K: J5 E# A
function Connect () {* h  ?7 D% Q5 s$ d( q% {
mssql_connect('Server','UserName','Password') or die('Error: Connection to DB
+ z' }$ N* [' T: n  B7 z3 Q1 Y
) P4 @* P( w* P1 I5 }Failed.');
( \5 x/ n/ j; w}
0 g9 Y7 x$ a0 M2 SConnect();
% E# U7 J( B# @
# j0 B  ?! G- V, ~/ {1 V# Gfunction InitForm(){
' K: T9 X  r0 ?5 k3 ^% Y2 `//layout for the form. Y- J  f( r8 C
echo "<strong>Send Items.</strong>9 T$ j( y9 U) @3 b
<form name='select' method='post'>
, E* ~$ ?% f* I2 m; i8 g<lable>Character Name</lable><br/>0 I5 v6 k% M  _# D: W6 J1 v
<input type='text' name='char'/><br/>( _# @+ g9 Q9 t8 F' L: h2 c
<lable>Item Name (Needs to be Exact or can use Item ID.)</lable><br/>
" O3 z3 Q' F4 x! l8 ^; r5 I& v<input type='text' name='item_name'/><br/>4 H" _4 t. u- u0 C- b
<lable>Item Amount</lable><br/>. Y9 w  f  g9 `  I8 j9 L
<input type='text' name='item_amount'/><br/>
$ n% w2 S% u7 L) h% T/ G# N* q<lable>Item Upgrade Amount</lable><br/>
" L9 P1 U$ a$ J' P5 a% [8 f% O, {<input type='text' name='item_upgrade'/><br/>7 a0 B$ p, s1 T
<lable>Element Type.(0-None, 1-Fire, 2-Water, 3-Electricity, 4-Wind, 5-Earth.)
% H" h3 `, \. D8 [0 ?) G
. I- v: u, J( C! H" |4 K: z( e</lable><br/>7 P. F! r3 J% u) V$ p/ o+ D0 O
<input type='text' name='item_element'/><br/>0 Q5 R+ _% I" m3 s- n/ ^6 E/ e
<lable>Element Upgrade Amount</lable><br/>
( P1 Q3 m" r) q' Q<input type='text' name='element_upgrade'/><br/>
* o% Q* \0 d3 M+ h9 w<lable>Pierced Amount</lable><br/>) R8 m7 S; ]: J! S; s* m7 T6 r( f
<input type='text' name='item_pierce'/><br/>
' f; l  ]  d" R! C8 H5 r) V1 G; q" L  d<input type='submit'/>
+ t/ [% Y. ]5 I# T' P; u; O</form>";( v0 t. R$ t7 h- [' t4 j% L1 u# i
}+ h5 {- I8 u; v1 R/ M9 r# u& O7 k
' q& f6 _/ _8 T# l- y2 D- k4 [
function PostListener (){
5 D  l0 {  w& H$ ]: A4 O//Add more post variables if needed and add them to initform() function aswell" t1 |& U5 ^* l* u3 f- h9 o
6 c/ @  O& N: z
################################: W/ v4 V1 F5 c* V8 I  w2 `: S1 U: g! r
##### Connection and Post ######) l, j2 {9 W+ [0 ^. C, \% T& F  A
################################
0 D/ p+ Z, g4 u6 [% S$name = @$_POST['char'];. w9 @& [2 w; k, W5 ?( t
$ItemName = @$_POST['item_name'];, y2 t/ p8 t8 K( l. [2 Q, d
$ItemAmount = @$_POST['item_amount'];
8 A1 ~5 R5 \/ N: t& h$ItemId = @$_POST['item_id'];
$ R( g  ?/ Z  u/ t# A$ [+ e$ItemUpgrade = @$_POST['item_upgrade'];5 Q" [% ^( Y" [2 }
$ItemElement = @$_POST['item_element'];" L- e, O& ^- I+ c
$ElementUpgrade = @$_POST['element_upgrade'];
3 Y8 m9 a* M$ \, e9 s/ g( j$ f$ItemPierce = @$_POST['item_pierce'];
0 f% M# n) S+ ^0 p$ A################################
4 r6 w- z+ {9 Z3 {9 Q% l. T( k6 K# L0 a3 ?! ]+ R
//Check both variables for empty value7 Z' W8 B- r$ D* W0 E' B
& i# ^3 V4 ?2 G/ {' o" J
if (!empty($_POST['char'])){
& v3 k! X" x& v# I3 o# a$find = mssql_query("select * from [CHARACTER_01_DBF].[dbo].[CHARACTER_TBL] where 6 q( U7 N3 Z$ h* t4 P9 ?5 c

& c! u& j0 k5 r, sm_szName = '{$name}'");4 C: _2 l. o( c
while ($row = mssql_fetch_object($find)){
# S4 @' b5 j6 C0 r1 c* l" e$ wecho "You Just Sent {$ItemAmount} {$ItemName}(s) to {$name}<br>";+ M2 Q/ s7 ~" i; F6 m  u3 l
$logs = mssql_query("INSERT INTO CHARACTER_01_DBF.dbo.ITEM_SEND_TBL([m_idPlayer],
7 v; r7 e+ P" x6 D! t# L* `0 p3 l" V4 c) m" J
[serverindex], [Item_Name], [Item_count], [idSender], [m_nAbilityOption], : J2 B2 Y1 n# D& p: X0 C
! J, A" j( c( l$ W, y: `
[m_bItemResist], [m_nResistAbilityOption], [nPiercedSize]) VALUES(N'$row->m_idPlayer',
8 N2 i4 T. P8 v" |2 W0 O4 u; M4 A6 a9 U7 ~0 s9 B$ ~5 ?% t3 O4 ~2 z, {
N'01', N'{$ItemName}', '{$ItemAmount}', N'0000001', '{$ItemUpgrade}', '{$ItemElement}',
/ _6 y$ c5 g$ W* ?9 b
) r2 f' @  U1 ~" v$ ~, I'{$ElementUpgrade}', '{$ItemPierce}');");
9 I' A5 r/ u& A. C7 G( b}
/ e; `  X$ [. i& t0 ^1 M8 T  U
4 \% f' u! u! V$ u$ o( S}& Q" e1 H. e0 b

- ^6 K2 H5 m- B! \7 e7 u/ H}
7 e+ u# R0 k: l& m6 w3 @1 x" e) D4 s9 ~# t: T4 N1 @, F
$InitForm = InitForm();
, r2 }. d' i* b7 ?. b- C$Listener = PostListener();
3 |- q- ]2 j3 w
4 g6 S8 D$ m' E' q2 G?>& l5 x: J/ G5 r
0 N' J, d0 s2 p' ]  \1 c( @
6 F# c0 }# u) S3 M1 J/ M
# Q" z2 }. d' e" i2 ?
3 C: H. m' z& z6 M: F! o, o
回复

使用道具 举报

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

本版积分规则

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

GMT+8, 2024-12-23 07:18 , Processed in 0.058348 second(s), 22 queries , Gzip On.

Powered by Discuz! X3.2

© 2001-2013 Comsenz Inc.

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