Restructure repository to include all source folders
Move git root from Client/ to src/ to track all source code: - Client: Game client source (moved to Client/Client/) - Server: Game server source - GameTools: Development tools - CryptoSource: Encryption utilities - database: Database scripts - Script: Game scripts - rylCoder_16.02.2008_src: Legacy coder tools - GMFont, Game: Additional resources 🤖 Generated with [Claude Code](https://claude.com/claude-code) Co-Authored-By: Claude <noreply@anthropic.com>
This commit is contained in:
192
Server/ToolProject/RCMS_Tool/AdminInfo.resx
Normal file
192
Server/ToolProject/RCMS_Tool/AdminInfo.resx
Normal file
@@ -0,0 +1,192 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 1.3
|
||||
|
||||
The primary goals of this format is to allow a simple XML format
|
||||
that is mostly human readable. The generation and parsing of the
|
||||
various data types are done through the TypeConverter classes
|
||||
associated with the data types.
|
||||
|
||||
Example:
|
||||
|
||||
... ado.net/XML headers & schema ...
|
||||
<resheader name="resmimetype">text/microsoft-resx</resheader>
|
||||
<resheader name="version">1.3</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1">this is my long string</data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
[base64 mime encoded serialized .NET Framework object]
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
[base64 mime encoded string representing a byte array form of the .NET Framework object]
|
||||
</data>
|
||||
|
||||
There are any number of "resheader" rows that contain simple
|
||||
name/value pairs.
|
||||
|
||||
Each data row contains a name, and value. The row also contains a
|
||||
type or mimetype. Type corresponds to a .NET class that support
|
||||
text/value conversion through the TypeConverter architecture.
|
||||
Classes that don't support this are serialized and stored with the
|
||||
mimetype set.
|
||||
|
||||
The mimetype is used for serialized objects, and tells the
|
||||
ResXResourceReader how to depersist the object. This is currently not
|
||||
extensible. For a given mimetype the value must be set accordingly:
|
||||
|
||||
Note - application/x-microsoft.net.object.binary.base64 is the format
|
||||
that the ResXResourceWriter will generate, however the reader can
|
||||
read any of the formats listed below.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.binary.base64
|
||||
value : The object must be serialized with
|
||||
: System.Serialization.Formatters.Binary.BinaryFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.soap.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
mimetype: application/x-microsoft.net.object.bytearray.base64
|
||||
value : The object must be serialized into a byte array
|
||||
: using a System.ComponentModel.TypeConverter
|
||||
: and then encoded with base64 encoding.
|
||||
-->
|
||||
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="data">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="resheader">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:choice>
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:schema>
|
||||
<resheader name="resmimetype">
|
||||
<value>text/microsoft-resx</value>
|
||||
</resheader>
|
||||
<resheader name="version">
|
||||
<value>1.3</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<data name="lbltitle.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="grdResult.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="GroupBox1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="btnSearch.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtId.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="cboSearchType.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="btnAdminAdd.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="btnDelete.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="grboxEdit.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="Button1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="btnEdit.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="cboAdminKind.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtip4.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtip3.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtip2.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="Label10.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="Label9.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="Label8.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtip1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtName.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtPass2.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtPass.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtAdminid.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblip.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblrights.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblname.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblpass2.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblpass.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lbladminid.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="btnAdminReg.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="$this.Name">
|
||||
<value>AdminInfo</value>
|
||||
</data>
|
||||
</root>
|
||||
687
Server/ToolProject/RCMS_Tool/AdminInfo.vb
Normal file
687
Server/ToolProject/RCMS_Tool/AdminInfo.vb
Normal file
@@ -0,0 +1,687 @@
|
||||
Imports System.Net
|
||||
Imports System.Text
|
||||
|
||||
Public Class AdminInfo
|
||||
Inherits System.Windows.Forms.Form
|
||||
|
||||
#Region " Windows Form Designer generated code "
|
||||
|
||||
Public Sub New()
|
||||
MyBase.New()
|
||||
|
||||
'This call is required by the Windows Form Designer.
|
||||
InitializeComponent()
|
||||
|
||||
'Add any initialization after the InitializeComponent() call
|
||||
|
||||
End Sub
|
||||
|
||||
'Form overrides dispose to clean up the component list.
|
||||
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
If disposing Then
|
||||
If Not (components Is Nothing) Then
|
||||
components.Dispose()
|
||||
End If
|
||||
End If
|
||||
MyBase.Dispose(disposing)
|
||||
End Sub
|
||||
|
||||
'Required by the Windows Form Designer
|
||||
Private components As System.ComponentModel.IContainer
|
||||
|
||||
'NOTE: The following procedure is required by the Windows Form Designer
|
||||
'It can be modified using the Windows Form Designer.
|
||||
'Do not modify it using the code editor.
|
||||
Friend WithEvents GroupBox1 As System.Windows.Forms.GroupBox
|
||||
Friend WithEvents cboSearchType As System.Windows.Forms.ComboBox
|
||||
Friend WithEvents txtId As System.Windows.Forms.TextBox
|
||||
Friend WithEvents btnSearch As System.Windows.Forms.Button
|
||||
Friend WithEvents grdResult As System.Windows.Forms.DataGrid
|
||||
Friend WithEvents grboxEdit As System.Windows.Forms.GroupBox
|
||||
Friend WithEvents txtAdminid As System.Windows.Forms.TextBox
|
||||
Friend WithEvents txtPass As System.Windows.Forms.TextBox
|
||||
Friend WithEvents txtPass2 As System.Windows.Forms.TextBox
|
||||
Friend WithEvents txtName As System.Windows.Forms.TextBox
|
||||
Friend WithEvents txtip1 As System.Windows.Forms.TextBox
|
||||
Friend WithEvents Label8 As System.Windows.Forms.Label
|
||||
Friend WithEvents Label9 As System.Windows.Forms.Label
|
||||
Friend WithEvents Label10 As System.Windows.Forms.Label
|
||||
Friend WithEvents txtip2 As System.Windows.Forms.TextBox
|
||||
Friend WithEvents txtip3 As System.Windows.Forms.TextBox
|
||||
Friend WithEvents txtip4 As System.Windows.Forms.TextBox
|
||||
Friend WithEvents cboAdminKind As System.Windows.Forms.ComboBox
|
||||
Friend WithEvents btnAdminReg As System.Windows.Forms.Button
|
||||
Friend WithEvents btnAdminAdd As System.Windows.Forms.Button
|
||||
Friend WithEvents btnDelete As System.Windows.Forms.Button
|
||||
Friend WithEvents btnEdit As System.Windows.Forms.Button
|
||||
Friend WithEvents Button1 As System.Windows.Forms.Button
|
||||
Friend WithEvents lbltitle As System.Windows.Forms.Label
|
||||
Friend WithEvents lblip As System.Windows.Forms.Label
|
||||
Friend WithEvents lblrights As System.Windows.Forms.Label
|
||||
Friend WithEvents lblname As System.Windows.Forms.Label
|
||||
Friend WithEvents lblpass2 As System.Windows.Forms.Label
|
||||
Friend WithEvents lblpass As System.Windows.Forms.Label
|
||||
Friend WithEvents lbladminid As System.Windows.Forms.Label
|
||||
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
|
||||
Me.lbltitle = New System.Windows.Forms.Label()
|
||||
Me.grdResult = New System.Windows.Forms.DataGrid()
|
||||
Me.GroupBox1 = New System.Windows.Forms.GroupBox()
|
||||
Me.btnSearch = New System.Windows.Forms.Button()
|
||||
Me.txtId = New System.Windows.Forms.TextBox()
|
||||
Me.cboSearchType = New System.Windows.Forms.ComboBox()
|
||||
Me.btnAdminAdd = New System.Windows.Forms.Button()
|
||||
Me.btnDelete = New System.Windows.Forms.Button()
|
||||
Me.grboxEdit = New System.Windows.Forms.GroupBox()
|
||||
Me.Button1 = New System.Windows.Forms.Button()
|
||||
Me.btnEdit = New System.Windows.Forms.Button()
|
||||
Me.cboAdminKind = New System.Windows.Forms.ComboBox()
|
||||
Me.txtip4 = New System.Windows.Forms.TextBox()
|
||||
Me.txtip3 = New System.Windows.Forms.TextBox()
|
||||
Me.txtip2 = New System.Windows.Forms.TextBox()
|
||||
Me.Label10 = New System.Windows.Forms.Label()
|
||||
Me.Label9 = New System.Windows.Forms.Label()
|
||||
Me.Label8 = New System.Windows.Forms.Label()
|
||||
Me.txtip1 = New System.Windows.Forms.TextBox()
|
||||
Me.txtName = New System.Windows.Forms.TextBox()
|
||||
Me.txtPass2 = New System.Windows.Forms.TextBox()
|
||||
Me.txtPass = New System.Windows.Forms.TextBox()
|
||||
Me.txtAdminid = New System.Windows.Forms.TextBox()
|
||||
Me.lblip = New System.Windows.Forms.Label()
|
||||
Me.lblrights = New System.Windows.Forms.Label()
|
||||
Me.lblname = New System.Windows.Forms.Label()
|
||||
Me.lblpass2 = New System.Windows.Forms.Label()
|
||||
Me.lblpass = New System.Windows.Forms.Label()
|
||||
Me.lbladminid = New System.Windows.Forms.Label()
|
||||
Me.btnAdminReg = New System.Windows.Forms.Button()
|
||||
CType(Me.grdResult, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.GroupBox1.SuspendLayout()
|
||||
Me.grboxEdit.SuspendLayout()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'lbltitle
|
||||
'
|
||||
Me.lbltitle.AutoSize = True
|
||||
Me.lbltitle.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbltitle.Font = New System.Drawing.Font("GulimChe", 14.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
|
||||
Me.lbltitle.Location = New System.Drawing.Point(400, 40)
|
||||
Me.lbltitle.Name = "lbltitle"
|
||||
Me.lbltitle.Size = New System.Drawing.Size(118, 24)
|
||||
Me.lbltitle.TabIndex = 0
|
||||
Me.lbltitle.Text = "<EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>"
|
||||
'
|
||||
'grdResult
|
||||
'
|
||||
Me.grdResult.DataMember = ""
|
||||
Me.grdResult.HeaderForeColor = System.Drawing.SystemColors.ControlText
|
||||
Me.grdResult.Location = New System.Drawing.Point(48, 336)
|
||||
Me.grdResult.Name = "grdResult"
|
||||
Me.grdResult.Size = New System.Drawing.Size(712, 256)
|
||||
Me.grdResult.TabIndex = 1
|
||||
'
|
||||
'GroupBox1
|
||||
'
|
||||
Me.GroupBox1.Controls.AddRange(New System.Windows.Forms.Control() {Me.btnSearch, Me.txtId, Me.cboSearchType})
|
||||
Me.GroupBox1.Location = New System.Drawing.Point(48, 88)
|
||||
Me.GroupBox1.Name = "GroupBox1"
|
||||
Me.GroupBox1.Size = New System.Drawing.Size(336, 56)
|
||||
Me.GroupBox1.TabIndex = 2
|
||||
Me.GroupBox1.TabStop = False
|
||||
'
|
||||
'btnSearch
|
||||
'
|
||||
Me.btnSearch.Location = New System.Drawing.Point(240, 24)
|
||||
Me.btnSearch.Name = "btnSearch"
|
||||
Me.btnSearch.Size = New System.Drawing.Size(72, 24)
|
||||
Me.btnSearch.TabIndex = 2
|
||||
Me.btnSearch.Text = "ã<EFBFBD><EFBFBD>"
|
||||
'
|
||||
'txtId
|
||||
'
|
||||
Me.txtId.Location = New System.Drawing.Point(128, 24)
|
||||
Me.txtId.Name = "txtId"
|
||||
Me.txtId.Size = New System.Drawing.Size(104, 21)
|
||||
Me.txtId.TabIndex = 1
|
||||
Me.txtId.Text = ""
|
||||
'
|
||||
'cboSearchType
|
||||
'
|
||||
Me.cboSearchType.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
|
||||
Me.cboSearchType.Location = New System.Drawing.Point(24, 24)
|
||||
Me.cboSearchType.Name = "cboSearchType"
|
||||
Me.cboSearchType.Size = New System.Drawing.Size(96, 20)
|
||||
Me.cboSearchType.TabIndex = 0
|
||||
'
|
||||
'btnAdminAdd
|
||||
'
|
||||
Me.btnAdminAdd.Location = New System.Drawing.Point(600, 104)
|
||||
Me.btnAdminAdd.Name = "btnAdminAdd"
|
||||
Me.btnAdminAdd.Size = New System.Drawing.Size(72, 40)
|
||||
Me.btnAdminAdd.TabIndex = 3
|
||||
Me.btnAdminAdd.Text = "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"
|
||||
'
|
||||
'btnDelete
|
||||
'
|
||||
Me.btnDelete.Location = New System.Drawing.Point(688, 104)
|
||||
Me.btnDelete.Name = "btnDelete"
|
||||
Me.btnDelete.Size = New System.Drawing.Size(72, 40)
|
||||
Me.btnDelete.TabIndex = 4
|
||||
Me.btnDelete.Text = "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"
|
||||
'
|
||||
'grboxEdit
|
||||
'
|
||||
Me.grboxEdit.Controls.AddRange(New System.Windows.Forms.Control() {Me.Button1, Me.btnEdit, Me.cboAdminKind, Me.txtip4, Me.txtip3, Me.txtip2, Me.Label10, Me.Label9, Me.Label8, Me.txtip1, Me.txtName, Me.txtPass2, Me.txtPass, Me.txtAdminid, Me.lblip, Me.lblrights, Me.lblname, Me.lblpass2, Me.lblpass, Me.lbladminid, Me.btnAdminReg})
|
||||
Me.grboxEdit.Location = New System.Drawing.Point(48, 152)
|
||||
Me.grboxEdit.Name = "grboxEdit"
|
||||
Me.grboxEdit.Size = New System.Drawing.Size(712, 168)
|
||||
Me.grboxEdit.TabIndex = 5
|
||||
Me.grboxEdit.TabStop = False
|
||||
'
|
||||
'Button1
|
||||
'
|
||||
Me.Button1.Location = New System.Drawing.Point(456, 40)
|
||||
Me.Button1.Name = "Button1"
|
||||
Me.Button1.Size = New System.Drawing.Size(72, 32)
|
||||
Me.Button1.TabIndex = 23
|
||||
Me.Button1.Text = "<EFBFBD><EFBFBD><EFBFBD>Ѽ<EFBFBD><EFBFBD><EFBFBD>"
|
||||
'
|
||||
'btnEdit
|
||||
'
|
||||
Me.btnEdit.Location = New System.Drawing.Point(552, 112)
|
||||
Me.btnEdit.Name = "btnEdit"
|
||||
Me.btnEdit.Size = New System.Drawing.Size(64, 40)
|
||||
Me.btnEdit.TabIndex = 22
|
||||
Me.btnEdit.Text = "<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"
|
||||
'
|
||||
'cboAdminKind
|
||||
'
|
||||
Me.cboAdminKind.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
|
||||
Me.cboAdminKind.Location = New System.Drawing.Point(320, 48)
|
||||
Me.cboAdminKind.Name = "cboAdminKind"
|
||||
Me.cboAdminKind.Size = New System.Drawing.Size(112, 20)
|
||||
Me.cboAdminKind.TabIndex = 19
|
||||
'
|
||||
'txtip4
|
||||
'
|
||||
Me.txtip4.Location = New System.Drawing.Point(488, 112)
|
||||
Me.txtip4.Name = "txtip4"
|
||||
Me.txtip4.Size = New System.Drawing.Size(48, 21)
|
||||
Me.txtip4.TabIndex = 17
|
||||
Me.txtip4.Text = ""
|
||||
'
|
||||
'txtip3
|
||||
'
|
||||
Me.txtip3.Location = New System.Drawing.Point(432, 112)
|
||||
Me.txtip3.Name = "txtip3"
|
||||
Me.txtip3.Size = New System.Drawing.Size(48, 21)
|
||||
Me.txtip3.TabIndex = 16
|
||||
Me.txtip3.Text = ""
|
||||
'
|
||||
'txtip2
|
||||
'
|
||||
Me.txtip2.Location = New System.Drawing.Point(376, 112)
|
||||
Me.txtip2.Name = "txtip2"
|
||||
Me.txtip2.Size = New System.Drawing.Size(48, 21)
|
||||
Me.txtip2.TabIndex = 15
|
||||
Me.txtip2.Text = ""
|
||||
'
|
||||
'Label10
|
||||
'
|
||||
Me.Label10.AutoSize = True
|
||||
Me.Label10.Location = New System.Drawing.Point(480, 120)
|
||||
Me.Label10.Name = "Label10"
|
||||
Me.Label10.Size = New System.Drawing.Size(9, 14)
|
||||
Me.Label10.TabIndex = 14
|
||||
Me.Label10.Text = "."
|
||||
'
|
||||
'Label9
|
||||
'
|
||||
Me.Label9.AutoSize = True
|
||||
Me.Label9.Location = New System.Drawing.Point(424, 120)
|
||||
Me.Label9.Name = "Label9"
|
||||
Me.Label9.Size = New System.Drawing.Size(9, 14)
|
||||
Me.Label9.TabIndex = 13
|
||||
Me.Label9.Text = "."
|
||||
'
|
||||
'Label8
|
||||
'
|
||||
Me.Label8.AutoSize = True
|
||||
Me.Label8.Location = New System.Drawing.Point(368, 120)
|
||||
Me.Label8.Name = "Label8"
|
||||
Me.Label8.Size = New System.Drawing.Size(9, 14)
|
||||
Me.Label8.TabIndex = 12
|
||||
Me.Label8.Text = "."
|
||||
'
|
||||
'txtip1
|
||||
'
|
||||
Me.txtip1.Location = New System.Drawing.Point(320, 112)
|
||||
Me.txtip1.Name = "txtip1"
|
||||
Me.txtip1.Size = New System.Drawing.Size(48, 21)
|
||||
Me.txtip1.TabIndex = 11
|
||||
Me.txtip1.Text = ""
|
||||
'
|
||||
'txtName
|
||||
'
|
||||
Me.txtName.Location = New System.Drawing.Point(96, 112)
|
||||
Me.txtName.Name = "txtName"
|
||||
Me.txtName.Size = New System.Drawing.Size(120, 21)
|
||||
Me.txtName.TabIndex = 9
|
||||
Me.txtName.Text = ""
|
||||
'
|
||||
'txtPass2
|
||||
'
|
||||
Me.txtPass2.Location = New System.Drawing.Point(320, 80)
|
||||
Me.txtPass2.Name = "txtPass2"
|
||||
Me.txtPass2.PasswordChar = Microsoft.VisualBasic.ChrW(42)
|
||||
Me.txtPass2.Size = New System.Drawing.Size(121, 21)
|
||||
Me.txtPass2.TabIndex = 8
|
||||
Me.txtPass2.Text = ""
|
||||
'
|
||||
'txtPass
|
||||
'
|
||||
Me.txtPass.Location = New System.Drawing.Point(96, 80)
|
||||
Me.txtPass.Name = "txtPass"
|
||||
Me.txtPass.PasswordChar = Microsoft.VisualBasic.ChrW(42)
|
||||
Me.txtPass.Size = New System.Drawing.Size(120, 21)
|
||||
Me.txtPass.TabIndex = 7
|
||||
Me.txtPass.Text = ""
|
||||
'
|
||||
'txtAdminid
|
||||
'
|
||||
Me.txtAdminid.Location = New System.Drawing.Point(96, 48)
|
||||
Me.txtAdminid.Name = "txtAdminid"
|
||||
Me.txtAdminid.Size = New System.Drawing.Size(120, 21)
|
||||
Me.txtAdminid.TabIndex = 6
|
||||
Me.txtAdminid.Text = ""
|
||||
'
|
||||
'lblip
|
||||
'
|
||||
Me.lblip.AutoSize = True
|
||||
Me.lblip.Location = New System.Drawing.Point(267, 117)
|
||||
Me.lblip.Name = "lblip"
|
||||
Me.lblip.Size = New System.Drawing.Size(42, 14)
|
||||
Me.lblip.TabIndex = 5
|
||||
Me.lblip.Text = "<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"
|
||||
'
|
||||
'lblrights
|
||||
'
|
||||
Me.lblrights.AutoSize = True
|
||||
Me.lblrights.Location = New System.Drawing.Point(278, 52)
|
||||
Me.lblrights.Name = "lblrights"
|
||||
Me.lblrights.Size = New System.Drawing.Size(52, 14)
|
||||
Me.lblrights.TabIndex = 4
|
||||
Me.lblrights.Text = "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>ddd"
|
||||
'
|
||||
'lblname
|
||||
'
|
||||
Me.lblname.AutoSize = True
|
||||
Me.lblname.Location = New System.Drawing.Point(48, 112)
|
||||
Me.lblname.Name = "lblname"
|
||||
Me.lblname.Size = New System.Drawing.Size(29, 14)
|
||||
Me.lblname.TabIndex = 3
|
||||
Me.lblname.Text = "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"
|
||||
'
|
||||
'lblpass2
|
||||
'
|
||||
Me.lblpass2.AutoSize = True
|
||||
Me.lblpass2.Location = New System.Drawing.Point(233, 85)
|
||||
Me.lblpass2.Name = "lblpass2"
|
||||
Me.lblpass2.Size = New System.Drawing.Size(79, 14)
|
||||
Me.lblpass2.TabIndex = 2
|
||||
Me.lblpass2.Text = "<EFBFBD>н<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ȯ<EFBFBD><EFBFBD>"
|
||||
'
|
||||
'lblpass
|
||||
'
|
||||
Me.lblpass.AutoSize = True
|
||||
Me.lblpass.Location = New System.Drawing.Point(24, 80)
|
||||
Me.lblpass.Name = "lblpass"
|
||||
Me.lblpass.Size = New System.Drawing.Size(54, 14)
|
||||
Me.lblpass.TabIndex = 1
|
||||
Me.lblpass.Text = "<EFBFBD>н<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"
|
||||
'
|
||||
'lbladminid
|
||||
'
|
||||
Me.lbladminid.AutoSize = True
|
||||
Me.lbladminid.Location = New System.Drawing.Point(32, 48)
|
||||
Me.lbladminid.Name = "lbladminid"
|
||||
Me.lbladminid.Size = New System.Drawing.Size(69, 14)
|
||||
Me.lbladminid.TabIndex = 0
|
||||
Me.lbladminid.Text = "<EFBFBD><EFBFBD><EFBFBD>IDdd"
|
||||
'
|
||||
'btnAdminReg
|
||||
'
|
||||
Me.btnAdminReg.Location = New System.Drawing.Point(640, 112)
|
||||
Me.btnAdminReg.Name = "btnAdminReg"
|
||||
Me.btnAdminReg.Size = New System.Drawing.Size(64, 40)
|
||||
Me.btnAdminReg.TabIndex = 21
|
||||
Me.btnAdminReg.Text = "ID <20><><EFBFBD><EFBFBD>"
|
||||
'
|
||||
'AdminInfo
|
||||
'
|
||||
Me.AutoScaleBaseSize = New System.Drawing.Size(6, 14)
|
||||
Me.ClientSize = New System.Drawing.Size(1028, 753)
|
||||
Me.Controls.AddRange(New System.Windows.Forms.Control() {Me.grboxEdit, Me.GroupBox1, Me.grdResult, Me.lbltitle, Me.btnDelete, Me.btnAdminAdd})
|
||||
Me.Name = "AdminInfo"
|
||||
Me.Text = "<EFBFBD><EFBFBD>ڰ<EFBFBD><EFBFBD><EFBFBD>"
|
||||
CType(Me.grdResult, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.GroupBox1.ResumeLayout(False)
|
||||
Me.grboxEdit.ResumeLayout(False)
|
||||
Me.ResumeLayout(False)
|
||||
|
||||
End Sub
|
||||
|
||||
#End Region
|
||||
|
||||
|
||||
Private Sub AdminInfo_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
|
||||
|
||||
'Dim ITextAdminInfo As New TextAdminInfo()
|
||||
'Dim ITextButton As New TextButton()
|
||||
'Dim ITextMSG As New TextMSG()
|
||||
|
||||
|
||||
ProcessPacket.IAdminInfo = Me
|
||||
|
||||
cboSearchType.Items.Add(ITextAdminInfo.cbosearchtypeitem_total)
|
||||
cboSearchType.Items.Add(ITextAdminInfo.cbosearchtypeitem_adminid)
|
||||
|
||||
Me.lbladminid.Text = ITextAdminInfo.admininfo_adminid
|
||||
Me.lblip.Text = ITextAdminInfo.admininfo_ip
|
||||
Me.lblname.Text = ITextAdminInfo.admininfo_name
|
||||
Me.lblpass.Text = ITextAdminInfo.admininfo_pass
|
||||
Me.lblpass2.Text = ITextAdminInfo.admininfo_pass2
|
||||
Me.lblrights.Text = ITextAdminInfo.admininfo_rights
|
||||
Me.lbltitle.Text = ITextAdminInfo.AdminInfo_Title
|
||||
Me.Text = ITextAdminInfo.AdminInfo_Header
|
||||
|
||||
Me.btnAdminAdd.Text = ITextButton.btnCreate
|
||||
Me.btnAdminReg.Text = ITextButton.btnCreate_Real
|
||||
Me.btnDelete.Text = ITextButton.btnDelete
|
||||
Me.btnEdit.Text = ITextButton.btnEdit
|
||||
Me.btnSearch.Text = ITextButton.btnSearch
|
||||
Me.Button1.Text = ITextButton.btnSetting
|
||||
|
||||
cboSearchType.SelectedIndex = 0
|
||||
|
||||
txtId.Visible = False
|
||||
txtId.MaxLength = 15
|
||||
|
||||
btnAdminReg.Visible = False
|
||||
lblpass2.Visible = False
|
||||
txtPass2.Visible = False
|
||||
|
||||
txtAdminid.MaxLength = 15
|
||||
txtPass.MaxLength = 15
|
||||
txtName.MaxLength = 6
|
||||
txtip1.MaxLength = 3
|
||||
txtip2.MaxLength = 3
|
||||
txtip3.MaxLength = 3
|
||||
txtip4.MaxLength = 3
|
||||
|
||||
txtAdminid.Enabled = False
|
||||
|
||||
grdResult.DataSource = ds.Tables(AdminTableIndex)
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub AdminInfo_Unload(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Closed
|
||||
|
||||
ProcessPacket.IAdminInfo = Nothing
|
||||
ProcessPacket.IRylMDI.IAdminInfo = Nothing
|
||||
|
||||
End Sub
|
||||
|
||||
'Searching...
|
||||
Private Sub btnSearch_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnSearch.Click
|
||||
|
||||
RefreshAdmin()
|
||||
|
||||
End Sub
|
||||
|
||||
Public Sub RefreshAdmin()
|
||||
|
||||
txtAdminid.Text = ""
|
||||
txtip1.Text = ""
|
||||
txtip2.Text = ""
|
||||
txtip3.Text = ""
|
||||
txtip4.Text = ""
|
||||
txtPass.Text = ""
|
||||
txtPass2.Text = ""
|
||||
txtName.Text = ""
|
||||
|
||||
'<27><> <20>ʱ<EFBFBD>ȭ
|
||||
cboAdminKind.Items.Clear()
|
||||
|
||||
txtAdminid.Enabled = False
|
||||
lblpass2.Visible = False
|
||||
txtPass2.Visible = False
|
||||
btnAdminReg.Visible = False
|
||||
btnEdit.Visible = True
|
||||
'grid<69><64> <20>ʱ<EFBFBD>ȭ <20>Ѵ<EFBFBD>.
|
||||
grdResult.Refresh()
|
||||
|
||||
btnSearch.Enabled = False
|
||||
|
||||
'<27><> <20>ʱ<EFBFBD>ȭ
|
||||
ds.Tables(AdminTableIndex).Clear()
|
||||
|
||||
If cboSearchType.SelectedIndex = 1 Then
|
||||
|
||||
If txtId.Text = "" Then
|
||||
|
||||
MsgBox(ITextMSG.msg_inputadminid, MsgBoxStyle.OKOnly, ITextMSG.msg_error)
|
||||
txtId.Focus()
|
||||
btnSearch.Enabled = True
|
||||
Exit Sub
|
||||
|
||||
Else
|
||||
'Ư<><C6AF> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> ID <20>˻<EFBFBD> <20><>Ŷ
|
||||
Dim sendb(15) As Byte
|
||||
Encoding.GetEncoding(Code).GetBytes(txtId.Text, 0, Min(16, txtId.Text.Length), sendb, 0)
|
||||
IClientSocket.Send(3, sendb)
|
||||
|
||||
End If
|
||||
|
||||
ElseIf cboSearchType.SelectedIndex = 0 Then
|
||||
|
||||
'<27><>ü <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20>˻<EFBFBD> <20><>Ŷ
|
||||
Dim sendb(0) As Byte
|
||||
IClientSocket.Send(4, sendb)
|
||||
|
||||
End If
|
||||
|
||||
btnSearch.Enabled = True
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
Private Sub cboSearchType_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cboSearchType.SelectedIndexChanged
|
||||
|
||||
If cboSearchType.SelectedIndex = 0 Then
|
||||
txtId.Visible = False
|
||||
ElseIf cboSearchType.SelectedIndex = 1 Then
|
||||
txtId.Visible = True
|
||||
End If
|
||||
End Sub
|
||||
|
||||
'<27><EFBFBD><EEBFB5> <20><><EFBFBD><EFBFBD><EFBFBD>ϱ<EFBFBD> <20><>ư
|
||||
Private Sub btnAdminAdd_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnAdminAdd.Click
|
||||
|
||||
txtAdminid.Text = ""
|
||||
txtip1.Text = ""
|
||||
txtip2.Text = ""
|
||||
txtip3.Text = ""
|
||||
txtip4.Text = ""
|
||||
txtPass.Text = ""
|
||||
txtPass2.Text = ""
|
||||
txtName.Text = ""
|
||||
|
||||
'<27><> <20>ʱ<EFBFBD>ȭ
|
||||
cboAdminKind.Items.Clear()
|
||||
|
||||
cboAdminKind.Items.Add(ITextAdminInfo.cboadminkind_admin)
|
||||
cboAdminKind.Items.Add(ITextAdminInfo.cboadminkind_subadmin)
|
||||
cboAdminKind.Items.Add(ITextAdminInfo.cboadminkind_part)
|
||||
cboAdminKind.SelectedIndex = 2
|
||||
|
||||
'<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ϲ<EFBFBD>ư Ȱ<><C8B0>ȭ<EFBFBD>ϱ<EFBFBD>
|
||||
btnAdminReg.Visible = True
|
||||
lblpass2.Visible = True
|
||||
txtPass2.Visible = True
|
||||
|
||||
'<27><><EFBFBD><EFBFBD><EFBFBD>ϱ<EFBFBD> <20><>ư<EFBFBD><C6B0> <20><>Ȱ<EFBFBD><C8B0>ȭ<EFBFBD>Ѵ<EFBFBD>.
|
||||
btnEdit.Visible = False
|
||||
txtAdminid.Enabled = True
|
||||
|
||||
End Sub
|
||||
|
||||
'new adminid registering....
|
||||
Private Sub btnAdminReg_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnAdminReg.Click
|
||||
|
||||
If txtAdminid.Text = "" Then
|
||||
MsgBox(ITextMSG.msg_regadmin, MsgBoxStyle.OKOnly, ITextMSG.msg_error)
|
||||
txtAdminid.Focus()
|
||||
Exit Sub
|
||||
End If
|
||||
|
||||
If (txtPass.Text <> txtPass2.Text) And (txtPass.Text = "") Then
|
||||
MsgBox(ITextMSG.msg_passadmin, MsgBoxStyle.OKOnly, ITextMSG.msg_error)
|
||||
txtPass.Focus()
|
||||
Exit Sub
|
||||
End If
|
||||
|
||||
btnAdminReg.Enabled = False
|
||||
|
||||
Dim ip As String
|
||||
ip = Trim(txtip1.Text) + "." + Trim(txtip2.Text) + "." + Trim(txtip3.Text) + "." + Trim(txtip4.Text)
|
||||
Dim AdminKind As Char
|
||||
|
||||
Select Case cboAdminKind.SelectedIndex
|
||||
Case 0
|
||||
AdminKind = "T"
|
||||
Case 1
|
||||
AdminKind = "M"
|
||||
Case 2
|
||||
AdminKind = "G"
|
||||
End Select
|
||||
|
||||
' send packet - 56bytes
|
||||
Dim sendb(55) As Byte
|
||||
Encoding.GetEncoding(Code).GetBytes(txtAdminid.Text, 0, Min(16, txtAdminid.Text.Length), sendb, 0)
|
||||
Encoding.GetEncoding(Code).GetBytes(txtPass.Text, 0, Min(16, txtPass.Text.Length), sendb, 16)
|
||||
Encoding.GetEncoding(Code).GetBytes(ip, 0, Min(16, ip.Length), sendb, 32)
|
||||
|
||||
' <20>ѱ<EFBFBD> ó<><C3B3><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>
|
||||
Encoding.GetEncoding(Code).GetBytes(txtName.Text, 0, Min(16, txtName.Text.Length), sendb, 48)
|
||||
sendb(55) = Asc(AdminKind)
|
||||
|
||||
IClientSocket.Send(2, sendb)
|
||||
|
||||
End Sub
|
||||
|
||||
'<27><EFBFBD><EEBFB5> <20><><EFBFBD><EFBFBD><EFBFBD>ϱ<EFBFBD>
|
||||
Private Sub btnDelete_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnDelete.Click
|
||||
|
||||
'<27><><EFBFBD><EFBFBD> Ŭ<><C5AC><EFBFBD><EFBFBD> row<6F><77> <20>ε<EFBFBD><CEB5><EFBFBD><EFBFBD><EFBFBD>ȣ(0<><30><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>Ѵ<EFBFBD>.)
|
||||
Dim CurrentIndex As Integer
|
||||
Dim DeleteYesNo As Integer
|
||||
Dim DeleteAdmin As String
|
||||
|
||||
CurrentIndex = grdResult.CurrentRowIndex
|
||||
DeleteAdmin = grdResult.Item(CurrentIndex, 0)
|
||||
|
||||
btnDelete.Enabled = False
|
||||
DeleteYesNo = MsgBox(DeleteAdmin + " " + ITextMSG.msg_confirmdel, MsgBoxStyle.YesNo, "<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> Ȯ<><C8AE>")
|
||||
|
||||
If DeleteYesNo = vbYes Then
|
||||
|
||||
Dim sendb(15) As Byte
|
||||
Encoding.GetEncoding(Code).GetBytes(DeleteAdmin, 0, Min(16, DeleteAdmin.Length), sendb, 0)
|
||||
IClientSocket.Send(5, sendb)
|
||||
|
||||
Else
|
||||
MsgBox(ITextMSG.msg_cancel, MsgBoxStyle.OKOnly, "Cancel")
|
||||
End If
|
||||
btnDelete.Enabled = True
|
||||
End Sub
|
||||
|
||||
'editing...
|
||||
Private Sub btnEdit_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnEdit.Click
|
||||
|
||||
If txtAdminid.Text = "" Then
|
||||
MsgBox(ITextMSG.msg_confirmedit, MsgBoxStyle.OKOnly, "<EFBFBD><EFBFBD><EFBFBD>̵<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ϱ<EFBFBD>")
|
||||
Exit Sub
|
||||
End If
|
||||
|
||||
Dim ip As String
|
||||
ip = Trim(txtip1.Text) + "." + Trim(txtip2.Text) + "." + Trim(txtip3.Text) + "." + Trim(txtip4.Text)
|
||||
Dim sendb(64) As Byte
|
||||
Dim AdminKind As Char
|
||||
Select Case cboAdminKind.SelectedIndex
|
||||
Case 0
|
||||
AdminKind = "T"
|
||||
Case 1
|
||||
AdminKind = "M"
|
||||
Case 2
|
||||
AdminKind = "G"
|
||||
End Select
|
||||
|
||||
Encoding.GetEncoding(Code).GetBytes(txtAdminid.Text, 0, Min(16, txtAdminid.Text.Length), sendb, 0)
|
||||
Encoding.GetEncoding(Code).GetBytes(txtPass.Text, 0, Min(16, txtPass.Text.Length), sendb, 16)
|
||||
Encoding.GetEncoding(Code).GetBytes(ip, 0, Min(16, ip.Length), sendb, 32)
|
||||
Encoding.GetEncoding(Code).GetBytes(txtName.Text, 0, Min(16, txtName.Text.Length), sendb, 48)
|
||||
sendb(64) = Asc(AdminKind) '1<><31><EFBFBD><EFBFBD>Ʈ
|
||||
|
||||
IClientSocket.Send(6, sendb)
|
||||
End Sub
|
||||
|
||||
'<27>ش<EFBFBD> <20>÷<EFBFBD><C3B7><EFBFBD> Ŭ<><C5AC><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
||||
Private Sub grdResult_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles grdResult.DoubleClick
|
||||
'<27><><EFBFBD><EFBFBD> Ŭ<><C5AC><EFBFBD><EFBFBD> row<6F><77> <20>ε<EFBFBD><CEB5><EFBFBD><EFBFBD><EFBFBD>ȣ(0<><30><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>Ѵ<EFBFBD>.)
|
||||
'Dim SelectedCellText As String = grdResult.Item(grdResult.CurrentCell)
|
||||
Dim CurrentIndex As Integer = grdResult.CurrentRowIndex
|
||||
Dim Right As String
|
||||
Dim IP As String
|
||||
Dim ippart(4) As String
|
||||
|
||||
cboAdminKind.Items.Clear()
|
||||
|
||||
cboAdminKind.Items.Add(ITextAdminInfo.cboadminkind_admin)
|
||||
cboAdminKind.Items.Add(ITextAdminInfo.cboadminkind_subadmin)
|
||||
cboAdminKind.Items.Add(ITextAdminInfo.cboadminkind_part)
|
||||
|
||||
|
||||
'<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>,<2C>н<EFBFBD><D0BD><EFBFBD><EFBFBD><EFBFBD>,<2C><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>,<2C>Ǹ<EFBFBD>,<2C><><EFBFBD><EFBFBD>,<2C><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
||||
|
||||
txtAdminid.Text = grdResult.Item(CurrentIndex, 0)
|
||||
txtPass.Text = grdResult.Item(CurrentIndex, 1)
|
||||
Right = grdResult.Item(CurrentIndex, 2)
|
||||
txtName.Text = grdResult.Item(CurrentIndex, 3)
|
||||
'IP.Split(".", 4)
|
||||
IP = grdResult.Item(CurrentIndex, 4)
|
||||
|
||||
If Not (Trim(txtAdminid.Text) = "admin") Then
|
||||
ippart = IP.Split(".", 4)
|
||||
txtip1.Text = ippart(0)
|
||||
txtip2.Text = ippart(1)
|
||||
txtip3.Text = ippart(2)
|
||||
txtip4.Text = ippart(3)
|
||||
End If
|
||||
|
||||
If Right = "T" Then
|
||||
cboAdminKind.SelectedIndex = 0 '<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
||||
ElseIf Right = "M" Then
|
||||
cboAdminKind.SelectedIndex = 1 '<27>ؿ<D8BF><EEBFB5>
|
||||
ElseIf Right = "G" Then
|
||||
cboAdminKind.SelectedIndex = 2 '<27>Ϲݿ<DDBF><EEBFB5>
|
||||
End If
|
||||
|
||||
'ICharBugItem.ShowDialog()
|
||||
'ICharBugItem.MdiParent = IMuhonMDI
|
||||
End Sub
|
||||
|
||||
'<27><><EFBFBD>Ѽ<EFBFBD><D1BC><EFBFBD><EFBFBD>ϱ<EFBFBD>
|
||||
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
|
||||
Dim IAdminSetting As New AdminSetting()
|
||||
IAdminSetting.ShowDialog()
|
||||
End Sub
|
||||
End Class
|
||||
159
Server/ToolProject/RCMS_Tool/AdminSetting.resx
Normal file
159
Server/ToolProject/RCMS_Tool/AdminSetting.resx
Normal file
@@ -0,0 +1,159 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 1.3
|
||||
|
||||
The primary goals of this format is to allow a simple XML format
|
||||
that is mostly human readable. The generation and parsing of the
|
||||
various data types are done through the TypeConverter classes
|
||||
associated with the data types.
|
||||
|
||||
Example:
|
||||
|
||||
... ado.net/XML headers & schema ...
|
||||
<resheader name="resmimetype">text/microsoft-resx</resheader>
|
||||
<resheader name="version">1.3</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1">this is my long string</data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
[base64 mime encoded serialized .NET Framework object]
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
[base64 mime encoded string representing a byte array form of the .NET Framework object]
|
||||
</data>
|
||||
|
||||
There are any number of "resheader" rows that contain simple
|
||||
name/value pairs.
|
||||
|
||||
Each data row contains a name, and value. The row also contains a
|
||||
type or mimetype. Type corresponds to a .NET class that support
|
||||
text/value conversion through the TypeConverter architecture.
|
||||
Classes that don't support this are serialized and stored with the
|
||||
mimetype set.
|
||||
|
||||
The mimetype is used for serialized objects, and tells the
|
||||
ResXResourceReader how to depersist the object. This is currently not
|
||||
extensible. For a given mimetype the value must be set accordingly:
|
||||
|
||||
Note - application/x-microsoft.net.object.binary.base64 is the format
|
||||
that the ResXResourceWriter will generate, however the reader can
|
||||
read any of the formats listed below.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.binary.base64
|
||||
value : The object must be serialized with
|
||||
: System.Serialization.Formatters.Binary.BinaryFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.soap.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
mimetype: application/x-microsoft.net.object.bytearray.base64
|
||||
value : The object must be serialized into a byte array
|
||||
: using a System.ComponentModel.TypeConverter
|
||||
: and then encoded with base64 encoding.
|
||||
-->
|
||||
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="data">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="resheader">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:choice>
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:schema>
|
||||
<resheader name="resmimetype">
|
||||
<value>text/microsoft-resx</value>
|
||||
</resheader>
|
||||
<resheader name="version">
|
||||
<value>1.3</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<data name="lbltitle.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="cboAdminID.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="grbcharadmin.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="chkCharSeeItem.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="chkCharlocation.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="chkCharedit.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="grbrestraint.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="chkRestraintRelease.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="chkRestraintReg.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="grbitemadmin.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="chkItemDelete.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="chkItemedit.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="chkItemReg.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="grblogout.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="chkDoingLogout.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="chkLastLogin.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="chkCurrentLogin.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="btnEdit.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="btnSearch.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="$this.Name">
|
||||
<value>AdminSetting</value>
|
||||
</data>
|
||||
</root>
|
||||
346
Server/ToolProject/RCMS_Tool/AdminSetting.vb
Normal file
346
Server/ToolProject/RCMS_Tool/AdminSetting.vb
Normal file
@@ -0,0 +1,346 @@
|
||||
Imports System.Text
|
||||
|
||||
Public Class AdminSetting
|
||||
Inherits System.Windows.Forms.Form
|
||||
|
||||
#Region " Windows Form Designer generated code "
|
||||
|
||||
Public Sub New()
|
||||
MyBase.New()
|
||||
|
||||
'This call is required by the Windows Form Designer.
|
||||
InitializeComponent()
|
||||
|
||||
'Add any initialization after the InitializeComponent() call
|
||||
|
||||
End Sub
|
||||
|
||||
'Form overrides dispose to clean up the component list.
|
||||
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
If disposing Then
|
||||
If Not (components Is Nothing) Then
|
||||
components.Dispose()
|
||||
End If
|
||||
End If
|
||||
MyBase.Dispose(disposing)
|
||||
End Sub
|
||||
|
||||
'Required by the Windows Form Designer
|
||||
Private components As System.ComponentModel.IContainer
|
||||
|
||||
'NOTE: The following procedure is required by the Windows Form Designer
|
||||
'It can be modified using the Windows Form Designer.
|
||||
'Do not modify it using the code editor.
|
||||
Friend WithEvents cboAdminID As System.Windows.Forms.ComboBox
|
||||
Friend WithEvents chkCharSeeItem As System.Windows.Forms.CheckBox
|
||||
Friend WithEvents chkCharlocation As System.Windows.Forms.CheckBox
|
||||
Friend WithEvents chkCharedit As System.Windows.Forms.CheckBox
|
||||
Friend WithEvents chkRestraintRelease As System.Windows.Forms.CheckBox
|
||||
Friend WithEvents chkRestraintReg As System.Windows.Forms.CheckBox
|
||||
Friend WithEvents chkItemDelete As System.Windows.Forms.CheckBox
|
||||
Friend WithEvents chkItemedit As System.Windows.Forms.CheckBox
|
||||
Friend WithEvents chkItemReg As System.Windows.Forms.CheckBox
|
||||
Friend WithEvents chkDoingLogout As System.Windows.Forms.CheckBox
|
||||
Friend WithEvents chkLastLogin As System.Windows.Forms.CheckBox
|
||||
Friend WithEvents chkCurrentLogin As System.Windows.Forms.CheckBox
|
||||
Friend WithEvents btnEdit As System.Windows.Forms.Button
|
||||
Friend WithEvents btnSearch As System.Windows.Forms.Button
|
||||
Friend WithEvents lbltitle As System.Windows.Forms.Label
|
||||
Friend WithEvents grbcharadmin As System.Windows.Forms.GroupBox
|
||||
Friend WithEvents grbrestraint As System.Windows.Forms.GroupBox
|
||||
Friend WithEvents grbitemadmin As System.Windows.Forms.GroupBox
|
||||
Friend WithEvents grblogout As System.Windows.Forms.GroupBox
|
||||
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
|
||||
Me.lbltitle = New System.Windows.Forms.Label()
|
||||
Me.cboAdminID = New System.Windows.Forms.ComboBox()
|
||||
Me.grbcharadmin = New System.Windows.Forms.GroupBox()
|
||||
Me.chkCharSeeItem = New System.Windows.Forms.CheckBox()
|
||||
Me.chkCharlocation = New System.Windows.Forms.CheckBox()
|
||||
Me.chkCharedit = New System.Windows.Forms.CheckBox()
|
||||
Me.grbrestraint = New System.Windows.Forms.GroupBox()
|
||||
Me.chkRestraintRelease = New System.Windows.Forms.CheckBox()
|
||||
Me.chkRestraintReg = New System.Windows.Forms.CheckBox()
|
||||
Me.grbitemadmin = New System.Windows.Forms.GroupBox()
|
||||
Me.chkItemDelete = New System.Windows.Forms.CheckBox()
|
||||
Me.chkItemedit = New System.Windows.Forms.CheckBox()
|
||||
Me.chkItemReg = New System.Windows.Forms.CheckBox()
|
||||
Me.grblogout = New System.Windows.Forms.GroupBox()
|
||||
Me.chkDoingLogout = New System.Windows.Forms.CheckBox()
|
||||
Me.chkLastLogin = New System.Windows.Forms.CheckBox()
|
||||
Me.chkCurrentLogin = New System.Windows.Forms.CheckBox()
|
||||
Me.btnEdit = New System.Windows.Forms.Button()
|
||||
Me.btnSearch = New System.Windows.Forms.Button()
|
||||
Me.grbcharadmin.SuspendLayout()
|
||||
Me.grbrestraint.SuspendLayout()
|
||||
Me.grbitemadmin.SuspendLayout()
|
||||
Me.grblogout.SuspendLayout()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'lbltitle
|
||||
'
|
||||
Me.lbltitle.AutoSize = True
|
||||
Me.lbltitle.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbltitle.Font = New System.Drawing.Font("GulimChe", 14.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
|
||||
Me.lbltitle.Location = New System.Drawing.Point(336, 32)
|
||||
Me.lbltitle.Name = "lbltitle"
|
||||
Me.lbltitle.Size = New System.Drawing.Size(157, 24)
|
||||
Me.lbltitle.TabIndex = 1
|
||||
Me.lbltitle.Text = "<EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD>Ѽ<EFBFBD><D1BC><EFBFBD>"
|
||||
'
|
||||
'cboAdminID
|
||||
'
|
||||
Me.cboAdminID.Location = New System.Drawing.Point(96, 96)
|
||||
Me.cboAdminID.Name = "cboAdminID"
|
||||
Me.cboAdminID.Size = New System.Drawing.Size(128, 20)
|
||||
Me.cboAdminID.TabIndex = 2
|
||||
'
|
||||
'grbcharadmin
|
||||
'
|
||||
Me.grbcharadmin.Controls.AddRange(New System.Windows.Forms.Control() {Me.chkCharSeeItem, Me.chkCharlocation, Me.chkCharedit})
|
||||
Me.grbcharadmin.Location = New System.Drawing.Point(96, 128)
|
||||
Me.grbcharadmin.Name = "grbcharadmin"
|
||||
Me.grbcharadmin.Size = New System.Drawing.Size(544, 48)
|
||||
Me.grbcharadmin.TabIndex = 4
|
||||
Me.grbcharadmin.TabStop = False
|
||||
Me.grbcharadmin.Text = "ij<EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>"
|
||||
'
|
||||
'chkCharSeeItem
|
||||
'
|
||||
Me.chkCharSeeItem.Location = New System.Drawing.Point(240, 16)
|
||||
Me.chkCharSeeItem.Name = "chkCharSeeItem"
|
||||
Me.chkCharSeeItem.Size = New System.Drawing.Size(112, 24)
|
||||
Me.chkCharSeeItem.TabIndex = 3
|
||||
Me.chkCharSeeItem.Text = "<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ۺ<EFBFBD><EFBFBD><EFBFBD>"
|
||||
'
|
||||
'chkCharlocation
|
||||
'
|
||||
Me.chkCharlocation.Location = New System.Drawing.Point(144, 16)
|
||||
Me.chkCharlocation.Name = "chkCharlocation"
|
||||
Me.chkCharlocation.Size = New System.Drawing.Size(96, 24)
|
||||
Me.chkCharlocation.TabIndex = 2
|
||||
Me.chkCharlocation.Text = "<EFBFBD><EFBFBD>ǥ<EFBFBD>̵<EFBFBD>"
|
||||
'
|
||||
'chkCharedit
|
||||
'
|
||||
Me.chkCharedit.Location = New System.Drawing.Point(48, 16)
|
||||
Me.chkCharedit.Name = "chkCharedit"
|
||||
Me.chkCharedit.Size = New System.Drawing.Size(96, 24)
|
||||
Me.chkCharedit.TabIndex = 1
|
||||
Me.chkCharedit.Text = "<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"
|
||||
'
|
||||
'grbrestraint
|
||||
'
|
||||
Me.grbrestraint.Controls.AddRange(New System.Windows.Forms.Control() {Me.chkRestraintRelease, Me.chkRestraintReg})
|
||||
Me.grbrestraint.Location = New System.Drawing.Point(96, 184)
|
||||
Me.grbrestraint.Name = "grbrestraint"
|
||||
Me.grbrestraint.Size = New System.Drawing.Size(544, 48)
|
||||
Me.grbrestraint.TabIndex = 5
|
||||
Me.grbrestraint.TabStop = False
|
||||
Me.grbrestraint.Text = "ij<EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"
|
||||
'
|
||||
'chkRestraintRelease
|
||||
'
|
||||
Me.chkRestraintRelease.Location = New System.Drawing.Point(144, 16)
|
||||
Me.chkRestraintRelease.Name = "chkRestraintRelease"
|
||||
Me.chkRestraintRelease.Size = New System.Drawing.Size(96, 24)
|
||||
Me.chkRestraintRelease.TabIndex = 2
|
||||
Me.chkRestraintRelease.Text = "<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"
|
||||
'
|
||||
'chkRestraintReg
|
||||
'
|
||||
Me.chkRestraintReg.Location = New System.Drawing.Point(48, 16)
|
||||
Me.chkRestraintReg.Name = "chkRestraintReg"
|
||||
Me.chkRestraintReg.Size = New System.Drawing.Size(96, 24)
|
||||
Me.chkRestraintReg.TabIndex = 1
|
||||
Me.chkRestraintReg.Text = "<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"
|
||||
'
|
||||
'grbitemadmin
|
||||
'
|
||||
Me.grbitemadmin.Controls.AddRange(New System.Windows.Forms.Control() {Me.chkItemDelete, Me.chkItemedit, Me.chkItemReg})
|
||||
Me.grbitemadmin.Location = New System.Drawing.Point(96, 240)
|
||||
Me.grbitemadmin.Name = "grbitemadmin"
|
||||
Me.grbitemadmin.Size = New System.Drawing.Size(544, 48)
|
||||
Me.grbitemadmin.TabIndex = 6
|
||||
Me.grbitemadmin.TabStop = False
|
||||
Me.grbitemadmin.Text = "<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>"
|
||||
'
|
||||
'chkItemDelete
|
||||
'
|
||||
Me.chkItemDelete.Location = New System.Drawing.Point(240, 16)
|
||||
Me.chkItemDelete.Name = "chkItemDelete"
|
||||
Me.chkItemDelete.Size = New System.Drawing.Size(96, 24)
|
||||
Me.chkItemDelete.TabIndex = 2
|
||||
Me.chkItemDelete.Text = "<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ۻ<EFBFBD><EFBFBD><EFBFBD>"
|
||||
'
|
||||
'chkItemedit
|
||||
'
|
||||
Me.chkItemedit.Location = New System.Drawing.Point(144, 16)
|
||||
Me.chkItemedit.Name = "chkItemedit"
|
||||
Me.chkItemedit.Size = New System.Drawing.Size(96, 24)
|
||||
Me.chkItemedit.TabIndex = 1
|
||||
Me.chkItemedit.Text = "<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ۼ<EFBFBD><EFBFBD><EFBFBD>"
|
||||
'
|
||||
'chkItemReg
|
||||
'
|
||||
Me.chkItemReg.Location = New System.Drawing.Point(48, 16)
|
||||
Me.chkItemReg.Name = "chkItemReg"
|
||||
Me.chkItemReg.Size = New System.Drawing.Size(88, 24)
|
||||
Me.chkItemReg.TabIndex = 0
|
||||
Me.chkItemReg.Text = "<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ۻ<EFBFBD><EFBFBD><EFBFBD>"
|
||||
'
|
||||
'grblogout
|
||||
'
|
||||
Me.grblogout.Controls.AddRange(New System.Windows.Forms.Control() {Me.chkDoingLogout, Me.chkLastLogin, Me.chkCurrentLogin})
|
||||
Me.grblogout.Location = New System.Drawing.Point(96, 296)
|
||||
Me.grblogout.Name = "grblogout"
|
||||
Me.grblogout.Size = New System.Drawing.Size(544, 48)
|
||||
Me.grblogout.TabIndex = 7
|
||||
Me.grblogout.TabStop = False
|
||||
Me.grblogout.Text = "<EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>"
|
||||
'
|
||||
'chkDoingLogout
|
||||
'
|
||||
Me.chkDoingLogout.Location = New System.Drawing.Point(320, 16)
|
||||
Me.chkDoingLogout.Name = "chkDoingLogout"
|
||||
Me.chkDoingLogout.Size = New System.Drawing.Size(136, 24)
|
||||
Me.chkDoingLogout.TabIndex = 2
|
||||
Me.chkDoingLogout.Text = "<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>αƿ<EFBFBD><EFBFBD>ϱ<EFBFBD>"
|
||||
'
|
||||
'chkLastLogin
|
||||
'
|
||||
Me.chkLastLogin.Location = New System.Drawing.Point(176, 16)
|
||||
Me.chkLastLogin.Name = "chkLastLogin"
|
||||
Me.chkLastLogin.Size = New System.Drawing.Size(128, 24)
|
||||
Me.chkLastLogin.TabIndex = 1
|
||||
Me.chkLastLogin.Text = "<EFBFBD><EFBFBD><EFBFBD>ŷαױ<EFBFBD><EFBFBD>ϰ˻<EFBFBD>"
|
||||
'
|
||||
'chkCurrentLogin
|
||||
'
|
||||
Me.chkCurrentLogin.Location = New System.Drawing.Point(48, 16)
|
||||
Me.chkCurrentLogin.Name = "chkCurrentLogin"
|
||||
Me.chkCurrentLogin.Size = New System.Drawing.Size(112, 24)
|
||||
Me.chkCurrentLogin.TabIndex = 0
|
||||
Me.chkCurrentLogin.Text = "<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>α<EFBFBD><EFBFBD><EFBFBD>üũ"
|
||||
'
|
||||
'btnEdit
|
||||
'
|
||||
Me.btnEdit.Location = New System.Drawing.Point(320, 360)
|
||||
Me.btnEdit.Name = "btnEdit"
|
||||
Me.btnEdit.Size = New System.Drawing.Size(136, 40)
|
||||
Me.btnEdit.TabIndex = 8
|
||||
Me.btnEdit.Text = "<EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20>Ϸ<EFBFBD>"
|
||||
'
|
||||
'btnSearch
|
||||
'
|
||||
Me.btnSearch.Location = New System.Drawing.Point(240, 96)
|
||||
Me.btnSearch.Name = "btnSearch"
|
||||
Me.btnSearch.Size = New System.Drawing.Size(112, 24)
|
||||
Me.btnSearch.TabIndex = 9
|
||||
Me.btnSearch.Text = "Searching..."
|
||||
'
|
||||
'AdminSetting
|
||||
'
|
||||
Me.AutoScaleBaseSize = New System.Drawing.Size(6, 14)
|
||||
Me.ClientSize = New System.Drawing.Size(720, 437)
|
||||
Me.Controls.AddRange(New System.Windows.Forms.Control() {Me.btnSearch, Me.btnEdit, Me.grbitemadmin, Me.grbrestraint, Me.grbcharadmin, Me.cboAdminID, Me.lbltitle, Me.grblogout})
|
||||
Me.Name = "AdminSetting"
|
||||
Me.Text = "<EFBFBD><EFBFBD>ڱ<EFBFBD><EFBFBD>Ѽ<EFBFBD><EFBFBD><EFBFBD>"
|
||||
Me.grbcharadmin.ResumeLayout(False)
|
||||
Me.grbrestraint.ResumeLayout(False)
|
||||
Me.grbitemadmin.ResumeLayout(False)
|
||||
Me.grblogout.ResumeLayout(False)
|
||||
Me.ResumeLayout(False)
|
||||
|
||||
End Sub
|
||||
|
||||
#End Region
|
||||
|
||||
|
||||
Private Sub AdminSetting_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
|
||||
|
||||
cboAdminID.Items.Add(ITextAdminInfo.cboadminkind_admin)
|
||||
cboAdminID.Items.Add(ITextAdminInfo.cboadminkind_subadmin)
|
||||
cboAdminID.Items.Add(ITextAdminInfo.cboadminkind_part)
|
||||
|
||||
cboAdminID.SelectedIndex = 2
|
||||
|
||||
ProcessPacket.IAdminSetting = Me
|
||||
|
||||
Me.Text = ITextAdminSetting.form_header
|
||||
Me.lbltitle.Text = ITextAdminSetting.lbltitle
|
||||
Me.chkCharedit.Text = ITextAdminSetting.chkCharedit
|
||||
Me.chkCharlocation.Text = ITextAdminSetting.chkCharlocation
|
||||
Me.chkCharSeeItem.Text = ITextAdminSetting.chkCharSeeItem
|
||||
Me.chkCurrentLogin.Text = ITextAdminSetting.chkCurrentLogin
|
||||
Me.chkDoingLogout.Text = ITextAdminSetting.chkDoingLogout
|
||||
Me.chkItemDelete.Text = ITextAdminSetting.chkItemDelete
|
||||
Me.chkItemedit.Text = ITextAdminSetting.chkItemedit
|
||||
Me.chkItemReg.Text = ITextAdminSetting.chkItemReg
|
||||
Me.chkLastLogin.Text = ITextAdminSetting.chkLastLogin
|
||||
Me.chkRestraintReg.Text = ITextAdminSetting.chkRestraintReg
|
||||
Me.chkRestraintRelease.Text = ITextAdminSetting.chkRestraintRelease
|
||||
|
||||
Me.btnSearch.Text = ITextButton.btnSearch
|
||||
Me.btnEdit.Text = ITextButton.btnEdit
|
||||
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
Private Sub AdminSetting_UnLoad(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Closed
|
||||
|
||||
ProcessPacket.IAdminSetting = Nothing
|
||||
|
||||
End Sub
|
||||
|
||||
'ã<><C3A3>
|
||||
Private Sub btnSearch_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnSearch.Click
|
||||
|
||||
Dim adminid As Char
|
||||
|
||||
Select Case cboAdminID.SelectedIndex
|
||||
Case 0
|
||||
adminid = "T"
|
||||
Case 1
|
||||
adminid = "M"
|
||||
Case 2
|
||||
adminid = "G"
|
||||
End Select
|
||||
|
||||
'<27><>Ŷ<EFBFBD><C5B6><EFBFBD><EFBFBD><EFBFBD><EFBFBD>..,,,,,
|
||||
SendPacket.SendAdminRightSearch(adminid)
|
||||
|
||||
End Sub
|
||||
|
||||
'<27><><EFBFBD>Ѽ<EFBFBD><D1BC><EFBFBD><EFBFBD>ϱ<EFBFBD>
|
||||
Private Sub btnEdit_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnEdit.Click
|
||||
|
||||
Dim adminid As Char
|
||||
|
||||
Select Case cboAdminID.SelectedIndex
|
||||
Case 0
|
||||
adminid = "T"
|
||||
Case 1
|
||||
adminid = "M"
|
||||
Case 2
|
||||
adminid = "G"
|
||||
End Select
|
||||
|
||||
Dim Update(20) As Boolean
|
||||
|
||||
Update(1) = chkCharedit.Checked
|
||||
Update(2) = chkCharlocation.Checked
|
||||
Update(3) = chkCharSeeItem.Checked
|
||||
Update(4) = chkItemReg.Checked
|
||||
Update(5) = chkItemedit.Checked
|
||||
Update(6) = chkItemDelete.Checked
|
||||
Update(7) = chkRestraintReg.Checked
|
||||
Update(8) = chkRestraintRelease.Checked
|
||||
Update(9) = chkCurrentLogin.Checked
|
||||
Update(10) = chkLastLogin.Checked
|
||||
Update(11) = chkDoingLogout.Checked
|
||||
|
||||
SendPacket.SendAdminRightUpdate(adminid, Update)
|
||||
|
||||
End Sub
|
||||
End Class
|
||||
31
Server/ToolProject/RCMS_Tool/AssemblyInfo.vb
Normal file
31
Server/ToolProject/RCMS_Tool/AssemblyInfo.vb
Normal file
@@ -0,0 +1,31 @@
|
||||
Imports System.Reflection
|
||||
Imports System.Runtime.InteropServices
|
||||
|
||||
' General Information about an assembly is controlled through the following
|
||||
' set of attributes. Change these attribute values to modify the information
|
||||
' associated with an assembly.
|
||||
|
||||
' Review the values of the assembly attributes
|
||||
|
||||
<Assembly: AssemblyTitle("")>
|
||||
<Assembly: AssemblyDescription("")>
|
||||
<Assembly: AssemblyCompany("")>
|
||||
<Assembly: AssemblyProduct("")>
|
||||
<Assembly: AssemblyCopyright("")>
|
||||
<Assembly: AssemblyTrademark("")>
|
||||
<Assembly: CLSCompliant(True)>
|
||||
|
||||
'The following GUID is for the ID of the typelib if this project is exposed to COM
|
||||
<Assembly: Guid("9F53D8FD-C336-4131-A262-248EF7E6D04F")>
|
||||
|
||||
' Version information for an assembly consists of the following four values:
|
||||
'
|
||||
' Major Version
|
||||
' Minor Version
|
||||
' Build Number
|
||||
' Revision
|
||||
'
|
||||
' You can specify all the values or you can default the Build and Revision Numbers
|
||||
' by using the '*' as shown below:
|
||||
|
||||
<Assembly: AssemblyVersion("1.0.*")>
|
||||
339
Server/ToolProject/RCMS_Tool/CharInfo.resx
Normal file
339
Server/ToolProject/RCMS_Tool/CharInfo.resx
Normal file
@@ -0,0 +1,339 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 1.3
|
||||
|
||||
The primary goals of this format is to allow a simple XML format
|
||||
that is mostly human readable. The generation and parsing of the
|
||||
various data types are done through the TypeConverter classes
|
||||
associated with the data types.
|
||||
|
||||
Example:
|
||||
|
||||
... ado.net/XML headers & schema ...
|
||||
<resheader name="resmimetype">text/microsoft-resx</resheader>
|
||||
<resheader name="version">1.3</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1">this is my long string</data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
[base64 mime encoded serialized .NET Framework object]
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
[base64 mime encoded string representing a byte array form of the .NET Framework object]
|
||||
</data>
|
||||
|
||||
There are any number of "resheader" rows that contain simple
|
||||
name/value pairs.
|
||||
|
||||
Each data row contains a name, and value. The row also contains a
|
||||
type or mimetype. Type corresponds to a .NET class that support
|
||||
text/value conversion through the TypeConverter architecture.
|
||||
Classes that don't support this are serialized and stored with the
|
||||
mimetype set.
|
||||
|
||||
The mimetype is used for serialized objects, and tells the
|
||||
ResXResourceReader how to depersist the object. This is currently not
|
||||
extensible. For a given mimetype the value must be set accordingly:
|
||||
|
||||
Note - application/x-microsoft.net.object.binary.base64 is the format
|
||||
that the ResXResourceWriter will generate, however the reader can
|
||||
read any of the formats listed below.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.binary.base64
|
||||
value : The object must be serialized with
|
||||
: System.Serialization.Formatters.Binary.BinaryFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.soap.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
mimetype: application/x-microsoft.net.object.bytearray.base64
|
||||
value : The object must be serialized into a byte array
|
||||
: using a System.ComponentModel.TypeConverter
|
||||
: and then encoded with base64 encoding.
|
||||
-->
|
||||
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="data">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="resheader">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:choice>
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:schema>
|
||||
<resheader name="resmimetype">
|
||||
<value>text/microsoft-resx</value>
|
||||
</resheader>
|
||||
<resheader name="version">
|
||||
<value>1.3</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<data name="cboSearchType.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="btnSearch.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtSearchID.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="cboServerName.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="grbcharinfo.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="btnEdit.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtName.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtCID.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="GroupBox6.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtExp.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtMp.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtHp.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblexp.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblmp.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblhp.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="GroupBox5.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtWis.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtIni.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtCon.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtDex.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtStr.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtLevel.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblstr.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lbldex.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblcon.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblini.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblwis.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lbllevel.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="GroupBox4.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtIP.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtParty.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtGuild.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtMoney.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtFame.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtMi.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblmi.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblfame.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblmoney.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblguild.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblparty.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblip.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="GroupBox3.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtClass.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtFace.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtKind.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtHead.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtMW.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblmw.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblhead.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblface.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblkind.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblclass.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblname.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblcid.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="GroupBox7.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="btnBlock.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="rdoBlockRE.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="RadioButton1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="Label2.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lboxCharid.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="grblocation.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="btnMove.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtZ.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtY.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtX.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblx.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lbly.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblz.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="btnDetailItemInfo.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lbltitle.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="grbsearch.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="btnIDSearch.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtIdSearch.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="cboIDType.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="cboserver.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="btnCharSearch.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="CommitButton.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtUID.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lbluid.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="$this.Name">
|
||||
<value>CharInfo</value>
|
||||
</data>
|
||||
</root>
|
||||
1230
Server/ToolProject/RCMS_Tool/CharInfo.vb
Normal file
1230
Server/ToolProject/RCMS_Tool/CharInfo.vb
Normal file
File diff suppressed because it is too large
Load Diff
138
Server/ToolProject/RCMS_Tool/CharItemInfo.resx
Normal file
138
Server/ToolProject/RCMS_Tool/CharItemInfo.resx
Normal file
@@ -0,0 +1,138 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 1.3
|
||||
|
||||
The primary goals of this format is to allow a simple XML format
|
||||
that is mostly human readable. The generation and parsing of the
|
||||
various data types are done through the TypeConverter classes
|
||||
associated with the data types.
|
||||
|
||||
Example:
|
||||
|
||||
... ado.net/XML headers & schema ...
|
||||
<resheader name="resmimetype">text/microsoft-resx</resheader>
|
||||
<resheader name="version">1.3</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1">this is my long string</data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
[base64 mime encoded serialized .NET Framework object]
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
[base64 mime encoded string representing a byte array form of the .NET Framework object]
|
||||
</data>
|
||||
|
||||
There are any number of "resheader" rows that contain simple
|
||||
name/value pairs.
|
||||
|
||||
Each data row contains a name, and value. The row also contains a
|
||||
type or mimetype. Type corresponds to a .NET class that support
|
||||
text/value conversion through the TypeConverter architecture.
|
||||
Classes that don't support this are serialized and stored with the
|
||||
mimetype set.
|
||||
|
||||
The mimetype is used for serialized objects, and tells the
|
||||
ResXResourceReader how to depersist the object. This is currently not
|
||||
extensible. For a given mimetype the value must be set accordingly:
|
||||
|
||||
Note - application/x-microsoft.net.object.binary.base64 is the format
|
||||
that the ResXResourceWriter will generate, however the reader can
|
||||
read any of the formats listed below.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.binary.base64
|
||||
value : The object must be serialized with
|
||||
: System.Serialization.Formatters.Binary.BinaryFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.soap.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
mimetype: application/x-microsoft.net.object.bytearray.base64
|
||||
value : The object must be serialized into a byte array
|
||||
: using a System.ComponentModel.TypeConverter
|
||||
: and then encoded with base64 encoding.
|
||||
-->
|
||||
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="data">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="resheader">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:choice>
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:schema>
|
||||
<resheader name="resmimetype">
|
||||
<value>text/microsoft-resx</value>
|
||||
</resheader>
|
||||
<resheader name="version">
|
||||
<value>1.3</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<data name="lbltitle.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="GroupBox1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="Label2.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtName.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="cboServer.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="btnSearch.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="ComboBox2.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="grdResult.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="btnCreate.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="btnClose.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="ItemPos.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="ItemWhere.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="$this.Name">
|
||||
<value>CharItemInfo</value>
|
||||
</data>
|
||||
</root>
|
||||
342
Server/ToolProject/RCMS_Tool/CharItemInfo.vb
Normal file
342
Server/ToolProject/RCMS_Tool/CharItemInfo.vb
Normal file
@@ -0,0 +1,342 @@
|
||||
Public Class CharItemInfo
|
||||
Inherits System.Windows.Forms.Form
|
||||
|
||||
#Region " Windows Form Designer generated code "
|
||||
|
||||
Public Sub New()
|
||||
MyBase.New()
|
||||
|
||||
'This call is required by the Windows Form Designer.
|
||||
InitializeComponent()
|
||||
|
||||
'Add any initialization after the InitializeComponent() call
|
||||
|
||||
End Sub
|
||||
|
||||
'Form overrides dispose to clean up the component list.
|
||||
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
If disposing Then
|
||||
If Not (components Is Nothing) Then
|
||||
components.Dispose()
|
||||
End If
|
||||
End If
|
||||
MyBase.Dispose(disposing)
|
||||
End Sub
|
||||
|
||||
'Required by the Windows Form Designer
|
||||
Private components As System.ComponentModel.IContainer
|
||||
|
||||
'NOTE: The following procedure is required by the Windows Form Designer
|
||||
'It can be modified using the Windows Form Designer.
|
||||
'Do not modify it using the code editor.
|
||||
Friend WithEvents GroupBox1 As System.Windows.Forms.GroupBox
|
||||
Friend WithEvents txtName As System.Windows.Forms.TextBox
|
||||
Friend WithEvents cboServer As System.Windows.Forms.ComboBox
|
||||
Friend WithEvents grdResult As System.Windows.Forms.DataGrid
|
||||
Friend WithEvents btnSearch As System.Windows.Forms.Button
|
||||
Friend WithEvents Label2 As System.Windows.Forms.Label
|
||||
Friend WithEvents ComboBox2 As System.Windows.Forms.ComboBox
|
||||
Friend WithEvents btnClose As System.Windows.Forms.Button
|
||||
Friend WithEvents btnCreate As System.Windows.Forms.Button
|
||||
Friend WithEvents ItemPos As System.Windows.Forms.TextBox
|
||||
Friend WithEvents ItemWhere As System.Windows.Forms.ComboBox
|
||||
Friend WithEvents lbltitle As System.Windows.Forms.Label
|
||||
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
|
||||
Me.lbltitle = New System.Windows.Forms.Label()
|
||||
Me.GroupBox1 = New System.Windows.Forms.GroupBox()
|
||||
Me.Label2 = New System.Windows.Forms.Label()
|
||||
Me.txtName = New System.Windows.Forms.TextBox()
|
||||
Me.cboServer = New System.Windows.Forms.ComboBox()
|
||||
Me.btnSearch = New System.Windows.Forms.Button()
|
||||
Me.ComboBox2 = New System.Windows.Forms.ComboBox()
|
||||
Me.grdResult = New System.Windows.Forms.DataGrid()
|
||||
Me.btnCreate = New System.Windows.Forms.Button()
|
||||
Me.btnClose = New System.Windows.Forms.Button()
|
||||
Me.ItemPos = New System.Windows.Forms.TextBox()
|
||||
Me.ItemWhere = New System.Windows.Forms.ComboBox()
|
||||
Me.GroupBox1.SuspendLayout()
|
||||
CType(Me.grdResult, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'lbltitle
|
||||
'
|
||||
Me.lbltitle.AutoSize = True
|
||||
Me.lbltitle.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbltitle.Font = New System.Drawing.Font("GulimChe", 14.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
|
||||
Me.lbltitle.Location = New System.Drawing.Point(824, 80)
|
||||
Me.lbltitle.Name = "lbltitle"
|
||||
Me.lbltitle.Size = New System.Drawing.Size(118, 24)
|
||||
Me.lbltitle.TabIndex = 1
|
||||
Me.lbltitle.Text = "<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>"
|
||||
'
|
||||
'GroupBox1
|
||||
'
|
||||
Me.GroupBox1.Controls.AddRange(New System.Windows.Forms.Control() {Me.Label2, Me.txtName, Me.cboServer, Me.btnSearch, Me.ComboBox2})
|
||||
Me.GroupBox1.Location = New System.Drawing.Point(696, 8)
|
||||
Me.GroupBox1.Name = "GroupBox1"
|
||||
Me.GroupBox1.Size = New System.Drawing.Size(552, 48)
|
||||
Me.GroupBox1.TabIndex = 2
|
||||
Me.GroupBox1.TabStop = False
|
||||
Me.GroupBox1.Text = "<EFBFBD><EFBFBD>ȸ"
|
||||
'
|
||||
'Label2
|
||||
'
|
||||
Me.Label2.AutoSize = True
|
||||
Me.Label2.Location = New System.Drawing.Point(150, 20)
|
||||
Me.Label2.Name = "Label2"
|
||||
Me.Label2.Size = New System.Drawing.Size(58, 14)
|
||||
Me.Label2.TabIndex = 3
|
||||
Me.Label2.Text = "ij<EFBFBD><EFBFBD><EFBFBD><EFBFBD>:"
|
||||
'
|
||||
'txtName
|
||||
'
|
||||
Me.txtName.Location = New System.Drawing.Point(207, 16)
|
||||
Me.txtName.Name = "txtName"
|
||||
Me.txtName.Size = New System.Drawing.Size(112, 21)
|
||||
Me.txtName.TabIndex = 1
|
||||
Me.txtName.Text = "ij<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"
|
||||
'
|
||||
'cboServer
|
||||
'
|
||||
Me.cboServer.Location = New System.Drawing.Point(25, 16)
|
||||
Me.cboServer.Name = "cboServer"
|
||||
Me.cboServer.Size = New System.Drawing.Size(103, 20)
|
||||
Me.cboServer.TabIndex = 0
|
||||
Me.cboServer.Text = "<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"
|
||||
'
|
||||
'btnSearch
|
||||
'
|
||||
Me.btnSearch.Location = New System.Drawing.Point(456, 16)
|
||||
Me.btnSearch.Name = "btnSearch"
|
||||
Me.btnSearch.Size = New System.Drawing.Size(88, 24)
|
||||
Me.btnSearch.TabIndex = 2
|
||||
Me.btnSearch.Text = "<EFBFBD>˻<EFBFBD>"
|
||||
'
|
||||
'ComboBox2
|
||||
'
|
||||
Me.ComboBox2.ItemHeight = 12
|
||||
Me.ComboBox2.Location = New System.Drawing.Point(344, 16)
|
||||
Me.ComboBox2.Name = "ComboBox2"
|
||||
Me.ComboBox2.Size = New System.Drawing.Size(103, 20)
|
||||
Me.ComboBox2.TabIndex = 3
|
||||
Me.ComboBox2.Text = "<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ġ"
|
||||
'
|
||||
'grdResult
|
||||
'
|
||||
Me.grdResult.DataMember = ""
|
||||
Me.grdResult.HeaderForeColor = System.Drawing.SystemColors.ControlText
|
||||
Me.grdResult.Location = New System.Drawing.Point(8, 232)
|
||||
Me.grdResult.Name = "grdResult"
|
||||
Me.grdResult.Size = New System.Drawing.Size(1008, 480)
|
||||
Me.grdResult.TabIndex = 3
|
||||
'
|
||||
'btnCreate
|
||||
'
|
||||
Me.btnCreate.Location = New System.Drawing.Point(824, 184)
|
||||
Me.btnCreate.Name = "btnCreate"
|
||||
Me.btnCreate.Size = New System.Drawing.Size(88, 40)
|
||||
Me.btnCreate.TabIndex = 4
|
||||
Me.btnCreate.Text = "<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ۻ<EFBFBD><EFBFBD><EFBFBD>"
|
||||
'
|
||||
'btnClose
|
||||
'
|
||||
Me.btnClose.Location = New System.Drawing.Point(928, 184)
|
||||
Me.btnClose.Name = "btnClose"
|
||||
Me.btnClose.Size = New System.Drawing.Size(88, 40)
|
||||
Me.btnClose.TabIndex = 5
|
||||
Me.btnClose.Text = "â<EFBFBD>ݱ<EFBFBD>"
|
||||
'
|
||||
'ItemPos
|
||||
'
|
||||
Me.ItemPos.Location = New System.Drawing.Point(8, 8)
|
||||
Me.ItemPos.Multiline = True
|
||||
Me.ItemPos.Name = "ItemPos"
|
||||
Me.ItemPos.ReadOnly = True
|
||||
Me.ItemPos.ScrollBars = System.Windows.Forms.ScrollBars.Both
|
||||
Me.ItemPos.Size = New System.Drawing.Size(680, 216)
|
||||
Me.ItemPos.TabIndex = 6
|
||||
Me.ItemPos.Text = ""
|
||||
'
|
||||
'ItemWhere
|
||||
'
|
||||
Me.ItemWhere.Location = New System.Drawing.Point(696, 200)
|
||||
Me.ItemWhere.Name = "ItemWhere"
|
||||
Me.ItemWhere.Size = New System.Drawing.Size(112, 20)
|
||||
Me.ItemWhere.TabIndex = 7
|
||||
Me.ItemWhere.Text = "ComboBox1"
|
||||
'
|
||||
'CharItemInfo
|
||||
'
|
||||
Me.AutoScaleBaseSize = New System.Drawing.Size(6, 14)
|
||||
Me.ClientSize = New System.Drawing.Size(1028, 753)
|
||||
Me.Controls.AddRange(New System.Windows.Forms.Control() {Me.ItemWhere, Me.ItemPos, Me.btnClose, Me.btnCreate, Me.grdResult, Me.GroupBox1, Me.lbltitle})
|
||||
Me.Name = "CharItemInfo"
|
||||
Me.Text = "<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>"
|
||||
Me.GroupBox1.ResumeLayout(False)
|
||||
CType(Me.grdResult, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.ResumeLayout(False)
|
||||
|
||||
End Sub
|
||||
|
||||
#End Region
|
||||
|
||||
|
||||
|
||||
|
||||
Private Sub CharItemInfo_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
|
||||
|
||||
GroupBox1.Visible = False
|
||||
ProcessPacket.ICharItemInfo = Me
|
||||
|
||||
|
||||
grdResult.DataSource = ds.Tables(CharItemListIndex)
|
||||
ProcessPacket.UpdateItemView()
|
||||
|
||||
'TS_EQUIP = 1, <09><><EFBFBD><EFBFBD>
|
||||
'TS_INVEN = 2, <09>κ<EFBFBD><CEBA>丮
|
||||
'TS_QSLOT = 3, <09><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
||||
'TS_SSLOT = 4, <09><>ų<EFBFBD><C5B3><EFBFBD><EFBFBD>
|
||||
'TS_TEMP = 6, <09>ӽ<EFBFBD>(<28><>)
|
||||
'TS_UPGRADE = 7, <09><><EFBFBD><EFBFBD><D7B7>̵<EFBFBD>â
|
||||
'TS_EXCHANGE = 8, <09><>ȯâ
|
||||
'TS_DEPOSIT = 9, â<><C3A2>
|
||||
'TS_STALL = 10 <09><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
||||
|
||||
Me.Text = ITextItemInfo.formheader
|
||||
lbltitle.Text = ITextItemInfo.formheader
|
||||
btnCreate.Text = ITextAdminSetting.chkItemReg
|
||||
btnClose.Text = ITextButton.btnClose
|
||||
|
||||
ItemWhere.Items.Add(ITextItemInfo.cboitemwhere_1) ' 1
|
||||
ItemWhere.Items.Add(ITextItemInfo.cboitemwhere_2) ' 2
|
||||
ItemWhere.Items.Add(ITextItemInfo.cboitemwhere_3) ' 6
|
||||
ItemWhere.Items.Add(ITextItemInfo.cboitemwhere_4) ' 7
|
||||
ItemWhere.Items.Add(ITextItemInfo.cboitemwhere_5) ' 8
|
||||
ItemWhere.Items.Add(ITextItemInfo.cboitemwhere_6) ' 9
|
||||
|
||||
ItemWhere.SelectedIndex = 0
|
||||
|
||||
'item create
|
||||
If IToolAdminRight.ItemCreate = False Then
|
||||
btnCreate.Enabled = False
|
||||
Else
|
||||
btnCreate.Enabled = True
|
||||
End If
|
||||
|
||||
|
||||
UpdateItemPosView()
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub CharItemInfo_Unload(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Closed
|
||||
|
||||
ProcessPacket.ICharItemInfo = Nothing
|
||||
ProcessPacket.IRylMDI.ICharItemInfo = Nothing
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
Private Sub grdResult_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles grdResult.DoubleClick
|
||||
'<27><><EFBFBD><EFBFBD> Ŭ<><C5AC><EFBFBD><EFBFBD> row<6F><77> <20>ε<EFBFBD><CEB5><EFBFBD><EFBFBD><EFBFBD>ȣ(0<><30><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>Ѵ<EFBFBD>.)
|
||||
|
||||
Dim ICharItemInfoDetail As New CharItemInfoDetail()
|
||||
Dim CurrentIndex As Integer = grdResult.CurrentRowIndex
|
||||
|
||||
ICharItemInfoDetail.itemnum = grdResult.Item(CurrentIndex, 0)
|
||||
ICharItemInfoDetail.itemprototype = grdResult.Item(CurrentIndex, 1)
|
||||
ICharItemInfoDetail.itemname = grdResult.Item(CurrentIndex, 2)
|
||||
ICharItemInfoDetail.itemtype = grdResult.Item(CurrentIndex, 3)
|
||||
ICharItemInfoDetail.itemwhere = GetTakePos(grdResult.Item(CurrentIndex, 4))
|
||||
|
||||
ICharItemInfoDetail.itemX = grdResult.Item(CurrentIndex, 5)
|
||||
ICharItemInfoDetail.itemY = grdResult.Item(CurrentIndex, 6)
|
||||
ICharItemInfoDetail.itemZ = grdResult.Item(CurrentIndex, 7)
|
||||
|
||||
ICharItemInfoDetail.sizeX = grdResult.Item(CurrentIndex, 8)
|
||||
ICharItemInfoDetail.sizeY = grdResult.Item(CurrentIndex, 9)
|
||||
ICharItemInfoDetail.amount = grdResult.Item(CurrentIndex, 10)
|
||||
|
||||
ICharItemInfoDetail.equip = grdResult.Item(CurrentIndex, 11)
|
||||
ICharItemInfoDetail.runesocket = grdResult.Item(CurrentIndex, 12)
|
||||
ICharItemInfoDetail.maxdurability = grdResult.Item(CurrentIndex, 13)
|
||||
ICharItemInfoDetail.currsocket = grdResult.Item(CurrentIndex, 14)
|
||||
ICharItemInfoDetail.maxsocket = grdResult.Item(CurrentIndex, 15)
|
||||
ICharItemInfoDetail.material = grdResult.Item(CurrentIndex, 16)
|
||||
|
||||
Dim pos As Int32 = 16
|
||||
|
||||
ICharItemInfoDetail.socket1 = grdResult.Item(CurrentIndex, pos + 1)
|
||||
ICharItemInfoDetail.socket2 = grdResult.Item(CurrentIndex, pos + 2)
|
||||
ICharItemInfoDetail.socket3 = grdResult.Item(CurrentIndex, pos + 3)
|
||||
ICharItemInfoDetail.socket4 = grdResult.Item(CurrentIndex, pos + 4)
|
||||
ICharItemInfoDetail.socket5 = grdResult.Item(CurrentIndex, pos + 5)
|
||||
ICharItemInfoDetail.socket6 = grdResult.Item(CurrentIndex, pos + 6)
|
||||
ICharItemInfoDetail.socket7 = grdResult.Item(CurrentIndex, pos + 7)
|
||||
ICharItemInfoDetail.socket8 = grdResult.Item(CurrentIndex, pos + 8)
|
||||
|
||||
ICharItemInfoDetail.cri_typ = grdResult.Item(CurrentIndex, pos + 10)
|
||||
ICharItemInfoDetail.cri_per = grdResult.Item(CurrentIndex, pos + 11)
|
||||
ICharItemInfoDetail.min_dam = grdResult.Item(CurrentIndex, pos + 12)
|
||||
ICharItemInfoDetail.max_dam = grdResult.Item(CurrentIndex, pos + 13)
|
||||
ICharItemInfoDetail.drc = grdResult.Item(CurrentIndex, pos + 14)
|
||||
ICharItemInfoDetail.off_rev = grdResult.Item(CurrentIndex, pos + 15)
|
||||
ICharItemInfoDetail.def = grdResult.Item(CurrentIndex, pos + 16)
|
||||
ICharItemInfoDetail.def_rev = grdResult.Item(CurrentIndex, pos + 17)
|
||||
ICharItemInfoDetail.mag_res = grdResult.Item(CurrentIndex, pos + 18)
|
||||
ICharItemInfoDetail.blo_per = grdResult.Item(CurrentIndex, pos + 19)
|
||||
|
||||
ICharItemInfoDetail.max_hp = grdResult.Item(CurrentIndex, pos + 24)
|
||||
ICharItemInfoDetail.max_mp = grdResult.Item(CurrentIndex, pos + 25)
|
||||
ICharItemInfoDetail.hp_reg = grdResult.Item(CurrentIndex, pos + 26)
|
||||
ICharItemInfoDetail.mp_reg = grdResult.Item(CurrentIndex, pos + 27)
|
||||
|
||||
ICharItemInfoDetail.fir_att = grdResult.Item(CurrentIndex, pos + 28)
|
||||
ICharItemInfoDetail.lig_att = grdResult.Item(CurrentIndex, pos + 29)
|
||||
ICharItemInfoDetail.col_att = grdResult.Item(CurrentIndex, pos + 30)
|
||||
ICharItemInfoDetail.dra_att = grdResult.Item(CurrentIndex, pos + 31)
|
||||
ICharItemInfoDetail.poi_att = grdResult.Item(CurrentIndex, pos + 32)
|
||||
ICharItemInfoDetail.fir_res = grdResult.Item(CurrentIndex, pos + 33)
|
||||
ICharItemInfoDetail.lig_res = grdResult.Item(CurrentIndex, pos + 34)
|
||||
ICharItemInfoDetail.col_res = grdResult.Item(CurrentIndex, pos + 35)
|
||||
ICharItemInfoDetail.dra_res = grdResult.Item(CurrentIndex, pos + 36)
|
||||
ICharItemInfoDetail.poi_res = grdResult.Item(CurrentIndex, pos + 37)
|
||||
ICharItemInfoDetail.add_str = grdResult.Item(CurrentIndex, pos + 38)
|
||||
ICharItemInfoDetail.add_dex = grdResult.Item(CurrentIndex, pos + 39)
|
||||
ICharItemInfoDetail.add_con = grdResult.Item(CurrentIndex, pos + 40)
|
||||
ICharItemInfoDetail.add_int = grdResult.Item(CurrentIndex, pos + 41)
|
||||
ICharItemInfoDetail.add_wis = grdResult.Item(CurrentIndex, pos + 42)
|
||||
ICharItemInfoDetail.magic_power = grdResult.Item(CurrentIndex, pos + 43)
|
||||
|
||||
'edit form
|
||||
CharItemFormType = True
|
||||
|
||||
ICharItemInfoDetail.ShowDialog()
|
||||
End Sub
|
||||
|
||||
Private Sub btnClose_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnClose.Click
|
||||
Me.Close()
|
||||
|
||||
End Sub
|
||||
|
||||
'<27><><EFBFBD><EFBFBD><EFBFBD>ۻ<EFBFBD><DBBB><EFBFBD><EFBFBD>ϱ<EFBFBD>
|
||||
Private Sub btnCreate_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnCreate.Click
|
||||
Dim ICharItemInfoDetail As New CharItemInfoDetail()
|
||||
'create form
|
||||
CharItemFormType = False
|
||||
ICharItemInfoDetail.ShowDialog()
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
Private Sub UpdateItemPosView()
|
||||
|
||||
ItemPos.Text = ""
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub ItemWhere_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ItemWhere.SelectedIndexChanged
|
||||
|
||||
UpdateItemPosView()
|
||||
|
||||
End Sub
|
||||
End Class
|
||||
465
Server/ToolProject/RCMS_Tool/CharItemInfoDetail.resx
Normal file
465
Server/ToolProject/RCMS_Tool/CharItemInfoDetail.resx
Normal file
@@ -0,0 +1,465 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 1.3
|
||||
|
||||
The primary goals of this format is to allow a simple XML format
|
||||
that is mostly human readable. The generation and parsing of the
|
||||
various data types are done through the TypeConverter classes
|
||||
associated with the data types.
|
||||
|
||||
Example:
|
||||
|
||||
... ado.net/XML headers & schema ...
|
||||
<resheader name="resmimetype">text/microsoft-resx</resheader>
|
||||
<resheader name="version">1.3</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1">this is my long string</data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
[base64 mime encoded serialized .NET Framework object]
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
[base64 mime encoded string representing a byte array form of the .NET Framework object]
|
||||
</data>
|
||||
|
||||
There are any number of "resheader" rows that contain simple
|
||||
name/value pairs.
|
||||
|
||||
Each data row contains a name, and value. The row also contains a
|
||||
type or mimetype. Type corresponds to a .NET class that support
|
||||
text/value conversion through the TypeConverter architecture.
|
||||
Classes that don't support this are serialized and stored with the
|
||||
mimetype set.
|
||||
|
||||
The mimetype is used for serialized objects, and tells the
|
||||
ResXResourceReader how to depersist the object. This is currently not
|
||||
extensible. For a given mimetype the value must be set accordingly:
|
||||
|
||||
Note - application/x-microsoft.net.object.binary.base64 is the format
|
||||
that the ResXResourceWriter will generate, however the reader can
|
||||
read any of the formats listed below.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.binary.base64
|
||||
value : The object must be serialized with
|
||||
: System.Serialization.Formatters.Binary.BinaryFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.soap.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
mimetype: application/x-microsoft.net.object.bytearray.base64
|
||||
value : The object must be serialized into a byte array
|
||||
: using a System.ComponentModel.TypeConverter
|
||||
: and then encoded with base64 encoding.
|
||||
-->
|
||||
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="data">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="resheader">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:choice>
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:schema>
|
||||
<resheader name="resmimetype">
|
||||
<value>text/microsoft-resx</value>
|
||||
</resheader>
|
||||
<resheader name="version">
|
||||
<value>1.3</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<data name="lbltitle.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="grbcharinfo.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtCharname.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtserver.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblserver.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblcharname.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="grbiteminfo_1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtItemWhere.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtEquip.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblequip.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblitemwhere.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtitemtype.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblitemtype.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtitemname.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblitemname.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtSizeY.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtSizeX.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblitemsize.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtItemZ.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtItemY.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtItemX.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtItemprotoType.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtItemNum.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblitemxyz.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblitemprototype.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblitemnum.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtAmount.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblitemamount.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="grbiteminfo_3.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtadd_int.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lbladd_int.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtadd_con.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtadd_dex.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtadd_wis.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtadd_str.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtpoi_res.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtdra_res.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtcol_res.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtlig_res.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtfir_res.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtpoi_att.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtdra_att.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtcol_att.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtlig_att.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtfir_att.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtmp_reg.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txthp_reg.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtmax_mp.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtmax_hp.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtblo_per.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtmag_res.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtdef_rev.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtdef.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtoff_rev.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtdrc.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtmax_dam.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtmin_dam.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtcri_per.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtCri_typ.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lbladd_wis.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblpoison_resistance.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="Label42.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lbldrain_resistance.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lbladd_con.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lbladd_dex.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblcold_resistance.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lbladd_str.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lbldrain_attack.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblpoison_attack.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblfire_resistance.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lbllightning_resistance.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblcold_attack.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lbllightning_attack.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblfire_attack.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblmp_regen_amount.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblhp_regen_amount.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblmax_mp.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblmax_hp.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblblocking_percentage.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblmagic_resistance.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblcritical_type.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lbldrc.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lbldefence.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lbldefence_revision.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lbloffence_revision.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblmax_damage.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblmin_damage.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblcritical_percentage.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="btnEdit.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="btnDelete.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="grbiteminfo_2.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblsocket1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblsocket2.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblsocket3.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblsocket4.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblsocket5.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblsocket6.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblsocket7.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblsocket8.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblmaterial.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblmaxsocket.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblcurrsocket.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblmaxdurability.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtSocket8.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtSocket7.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtSocket6.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtSocket5.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtSocket4.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtSocket3.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtSocket2.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtSocket1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtMaterial.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtMaxSocket.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtCurrSocket.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtMaxDura.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtRuneSocket.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblrunesocket.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="btnClose.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="btnCreate.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lbMagicPower.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtmagicpower.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="$this.Name">
|
||||
<value>CharItemInfoDetail</value>
|
||||
</data>
|
||||
</root>
|
||||
1761
Server/ToolProject/RCMS_Tool/CharItemInfoDetail.vb
Normal file
1761
Server/ToolProject/RCMS_Tool/CharItemInfoDetail.vb
Normal file
File diff suppressed because it is too large
Load Diff
138
Server/ToolProject/RCMS_Tool/CharRestraint.resx
Normal file
138
Server/ToolProject/RCMS_Tool/CharRestraint.resx
Normal file
@@ -0,0 +1,138 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 1.3
|
||||
|
||||
The primary goals of this format is to allow a simple XML format
|
||||
that is mostly human readable. The generation and parsing of the
|
||||
various data types are done through the TypeConverter classes
|
||||
associated with the data types.
|
||||
|
||||
Example:
|
||||
|
||||
... ado.net/XML headers & schema ...
|
||||
<resheader name="resmimetype">text/microsoft-resx</resheader>
|
||||
<resheader name="version">1.3</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1">this is my long string</data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
[base64 mime encoded serialized .NET Framework object]
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
[base64 mime encoded string representing a byte array form of the .NET Framework object]
|
||||
</data>
|
||||
|
||||
There are any number of "resheader" rows that contain simple
|
||||
name/value pairs.
|
||||
|
||||
Each data row contains a name, and value. The row also contains a
|
||||
type or mimetype. Type corresponds to a .NET class that support
|
||||
text/value conversion through the TypeConverter architecture.
|
||||
Classes that don't support this are serialized and stored with the
|
||||
mimetype set.
|
||||
|
||||
The mimetype is used for serialized objects, and tells the
|
||||
ResXResourceReader how to depersist the object. This is currently not
|
||||
extensible. For a given mimetype the value must be set accordingly:
|
||||
|
||||
Note - application/x-microsoft.net.object.binary.base64 is the format
|
||||
that the ResXResourceWriter will generate, however the reader can
|
||||
read any of the formats listed below.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.binary.base64
|
||||
value : The object must be serialized with
|
||||
: System.Serialization.Formatters.Binary.BinaryFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.soap.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
mimetype: application/x-microsoft.net.object.bytearray.base64
|
||||
value : The object must be serialized into a byte array
|
||||
: using a System.ComponentModel.TypeConverter
|
||||
: and then encoded with base64 encoding.
|
||||
-->
|
||||
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="data">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="resheader">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:choice>
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:schema>
|
||||
<resheader name="resmimetype">
|
||||
<value>text/microsoft-resx</value>
|
||||
</resheader>
|
||||
<resheader name="version">
|
||||
<value>1.3</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<data name="lbltitle.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="GroupBox1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="cboType.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblsearchwide.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lbluid.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblserver.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="btnSearch.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtSearchID.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="cboServerID.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="grdResult.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="btnReg.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="btnBlockClose.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="$this.Name">
|
||||
<value>CharRestraint</value>
|
||||
</data>
|
||||
</root>
|
||||
359
Server/ToolProject/RCMS_Tool/CharRestraint.vb
Normal file
359
Server/ToolProject/RCMS_Tool/CharRestraint.vb
Normal file
@@ -0,0 +1,359 @@
|
||||
Imports System.Text
|
||||
|
||||
Public Class CharRestraint
|
||||
Inherits System.Windows.Forms.Form
|
||||
|
||||
#Region " Windows Form Designer generated code "
|
||||
|
||||
Public Sub New()
|
||||
MyBase.New()
|
||||
|
||||
'This call is required by the Windows Form Designer.
|
||||
InitializeComponent()
|
||||
|
||||
'Add any initialization after the InitializeComponent() call
|
||||
|
||||
End Sub
|
||||
|
||||
'Form overrides dispose to clean up the component list.
|
||||
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
If disposing Then
|
||||
If Not (components Is Nothing) Then
|
||||
components.Dispose()
|
||||
End If
|
||||
End If
|
||||
MyBase.Dispose(disposing)
|
||||
End Sub
|
||||
|
||||
'Required by the Windows Form Designer
|
||||
Private components As System.ComponentModel.IContainer
|
||||
|
||||
'NOTE: The following procedure is required by the Windows Form Designer
|
||||
'It can be modified using the Windows Form Designer.
|
||||
'Do not modify it using the code editor.
|
||||
Friend WithEvents GroupBox1 As System.Windows.Forms.GroupBox
|
||||
Friend WithEvents txtSearchID As System.Windows.Forms.TextBox
|
||||
Friend WithEvents btnSearch As System.Windows.Forms.Button
|
||||
Friend WithEvents cboServerID As System.Windows.Forms.ComboBox
|
||||
Friend WithEvents grdResult As System.Windows.Forms.DataGrid
|
||||
Friend WithEvents btnReg As System.Windows.Forms.Button
|
||||
Friend WithEvents cboType As System.Windows.Forms.ComboBox
|
||||
Friend WithEvents btnBlockClose As System.Windows.Forms.Button
|
||||
Friend WithEvents lblsearchwide As System.Windows.Forms.Label
|
||||
Friend WithEvents lbluid As System.Windows.Forms.Label
|
||||
Friend WithEvents lblserver As System.Windows.Forms.Label
|
||||
Friend WithEvents lbltitle As System.Windows.Forms.Label
|
||||
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
|
||||
Me.lbltitle = New System.Windows.Forms.Label()
|
||||
Me.GroupBox1 = New System.Windows.Forms.GroupBox()
|
||||
Me.cboType = New System.Windows.Forms.ComboBox()
|
||||
Me.lblsearchwide = New System.Windows.Forms.Label()
|
||||
Me.lbluid = New System.Windows.Forms.Label()
|
||||
Me.lblserver = New System.Windows.Forms.Label()
|
||||
Me.btnSearch = New System.Windows.Forms.Button()
|
||||
Me.txtSearchID = New System.Windows.Forms.TextBox()
|
||||
Me.cboServerID = New System.Windows.Forms.ComboBox()
|
||||
Me.grdResult = New System.Windows.Forms.DataGrid()
|
||||
Me.btnReg = New System.Windows.Forms.Button()
|
||||
Me.btnBlockClose = New System.Windows.Forms.Button()
|
||||
Me.GroupBox1.SuspendLayout()
|
||||
CType(Me.grdResult, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'lbltitle
|
||||
'
|
||||
Me.lbltitle.AutoSize = True
|
||||
Me.lbltitle.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbltitle.Font = New System.Drawing.Font("GulimChe", 14.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
|
||||
Me.lbltitle.Location = New System.Drawing.Point(440, 56)
|
||||
Me.lbltitle.Name = "lbltitle"
|
||||
Me.lbltitle.Size = New System.Drawing.Size(128, 24)
|
||||
Me.lbltitle.TabIndex = 1
|
||||
Me.lbltitle.Text = "ij<EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> "
|
||||
'
|
||||
'GroupBox1
|
||||
'
|
||||
Me.GroupBox1.Controls.AddRange(New System.Windows.Forms.Control() {Me.cboType, Me.lblsearchwide, Me.lbluid, Me.lblserver, Me.btnSearch, Me.txtSearchID, Me.cboServerID})
|
||||
Me.GroupBox1.Location = New System.Drawing.Point(48, 96)
|
||||
Me.GroupBox1.Name = "GroupBox1"
|
||||
Me.GroupBox1.Size = New System.Drawing.Size(576, 80)
|
||||
Me.GroupBox1.TabIndex = 2
|
||||
Me.GroupBox1.TabStop = False
|
||||
Me.GroupBox1.Text = "<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> ij<><C4B3><EFBFBD><EFBFBD> <20><>ȸ<EFBFBD>ϱ<EFBFBD>"
|
||||
'
|
||||
'cboType
|
||||
'
|
||||
Me.cboType.Location = New System.Drawing.Point(336, 24)
|
||||
Me.cboType.Name = "cboType"
|
||||
Me.cboType.Size = New System.Drawing.Size(112, 20)
|
||||
Me.cboType.TabIndex = 12
|
||||
'
|
||||
'lblsearchwide
|
||||
'
|
||||
Me.lblsearchwide.AutoSize = True
|
||||
Me.lblsearchwide.Location = New System.Drawing.Point(248, 28)
|
||||
Me.lblsearchwide.Name = "lblsearchwide"
|
||||
Me.lblsearchwide.Size = New System.Drawing.Size(79, 14)
|
||||
Me.lblsearchwide.TabIndex = 11
|
||||
Me.lblsearchwide.Text = "<EFBFBD><EFBFBD>ȸ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"
|
||||
'
|
||||
'lbluid
|
||||
'
|
||||
Me.lbluid.AutoSize = True
|
||||
Me.lbluid.Location = New System.Drawing.Point(16, 52)
|
||||
Me.lbluid.Name = "lbluid"
|
||||
Me.lbluid.Size = New System.Drawing.Size(97, 14)
|
||||
Me.lbluid.TabIndex = 8
|
||||
Me.lbluid.Text = "UID(<28><><EFBFBD><EFBFBD><EFBFBD>ε<EFBFBD><CEB5><EFBFBD>)"
|
||||
'
|
||||
'lblserver
|
||||
'
|
||||
Me.lblserver.AutoSize = True
|
||||
Me.lblserver.Location = New System.Drawing.Point(56, 29)
|
||||
Me.lblserver.Name = "lblserver"
|
||||
Me.lblserver.Size = New System.Drawing.Size(54, 14)
|
||||
Me.lblserver.TabIndex = 6
|
||||
Me.lblserver.Text = "<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"
|
||||
'
|
||||
'btnSearch
|
||||
'
|
||||
Me.btnSearch.Location = New System.Drawing.Point(456, 24)
|
||||
Me.btnSearch.Name = "btnSearch"
|
||||
Me.btnSearch.Size = New System.Drawing.Size(96, 40)
|
||||
Me.btnSearch.TabIndex = 4
|
||||
Me.btnSearch.Text = "<EFBFBD>˻<EFBFBD>"
|
||||
'
|
||||
'txtSearchID
|
||||
'
|
||||
Me.txtSearchID.Location = New System.Drawing.Point(120, 48)
|
||||
Me.txtSearchID.Name = "txtSearchID"
|
||||
Me.txtSearchID.Size = New System.Drawing.Size(112, 21)
|
||||
Me.txtSearchID.TabIndex = 3
|
||||
Me.txtSearchID.Text = ""
|
||||
'
|
||||
'cboServerID
|
||||
'
|
||||
Me.cboServerID.Location = New System.Drawing.Point(120, 24)
|
||||
Me.cboServerID.Name = "cboServerID"
|
||||
Me.cboServerID.Size = New System.Drawing.Size(112, 20)
|
||||
Me.cboServerID.TabIndex = 1
|
||||
'
|
||||
'grdResult
|
||||
'
|
||||
Me.grdResult.DataMember = ""
|
||||
Me.grdResult.HeaderForeColor = System.Drawing.SystemColors.ControlText
|
||||
Me.grdResult.Location = New System.Drawing.Point(48, 184)
|
||||
Me.grdResult.Name = "grdResult"
|
||||
Me.grdResult.Size = New System.Drawing.Size(904, 336)
|
||||
Me.grdResult.TabIndex = 3
|
||||
'
|
||||
'btnReg
|
||||
'
|
||||
Me.btnReg.Location = New System.Drawing.Point(648, 120)
|
||||
Me.btnReg.Name = "btnReg"
|
||||
Me.btnReg.Size = New System.Drawing.Size(80, 48)
|
||||
Me.btnReg.TabIndex = 4
|
||||
Me.btnReg.Text = "<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"
|
||||
'
|
||||
'btnBlockClose
|
||||
'
|
||||
Me.btnBlockClose.Location = New System.Drawing.Point(768, 120)
|
||||
Me.btnBlockClose.Name = "btnBlockClose"
|
||||
Me.btnBlockClose.Size = New System.Drawing.Size(80, 48)
|
||||
Me.btnBlockClose.TabIndex = 5
|
||||
Me.btnBlockClose.Text = "<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"
|
||||
'
|
||||
'CharRestraint
|
||||
'
|
||||
Me.AutoScaleBaseSize = New System.Drawing.Size(6, 14)
|
||||
Me.ClientSize = New System.Drawing.Size(1028, 701)
|
||||
Me.Controls.AddRange(New System.Windows.Forms.Control() {Me.btnBlockClose, Me.btnReg, Me.grdResult, Me.GroupBox1, Me.lbltitle})
|
||||
Me.Name = "CharRestraint"
|
||||
Me.Text = "ij<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"
|
||||
Me.GroupBox1.ResumeLayout(False)
|
||||
CType(Me.grdResult, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.ResumeLayout(False)
|
||||
|
||||
End Sub
|
||||
|
||||
#End Region
|
||||
|
||||
Private Sub CharRestraint_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
|
||||
|
||||
ProcessPacket.ICharRestraint = Me
|
||||
|
||||
DBConn.SetServerNames(cboServerID)
|
||||
|
||||
cboServerID.SelectedIndex = 0
|
||||
|
||||
txtSearchID.Visible = False
|
||||
|
||||
lbluid.Visible = False
|
||||
txtSearchID.Visible = False
|
||||
|
||||
Me.Text = ITextCharRestraint.formheader
|
||||
lbltitle.Text = ITextCharRestraint.formheader
|
||||
lblserver.Text = ITextCharRestraint.lblserver
|
||||
lblsearchwide.Text = ITextCharRestraint.lblsearchwide
|
||||
Me.lbluid.Text = ITextCharRestraint.lbluid
|
||||
btnSearch.Text = ITextButton.btnSearch
|
||||
btnReg.Text = ITextAdminSetting.chkRestraintReg
|
||||
Me.btnBlockClose.Text = ITextAdminSetting.chkRestraintRelease
|
||||
|
||||
|
||||
cboType.Items.Add(ITextCharRestraint.cboType_1)
|
||||
cboType.Items.Add(ITextCharRestraint.cboType_2)
|
||||
cboType.SelectedIndex = 0
|
||||
grdResult.DataSource = ds.Tables(CharRestraintIndex)
|
||||
|
||||
If IToolAdminRight.RestraintReg = False Then
|
||||
btnReg.Enabled = False
|
||||
Else
|
||||
btnReg.Enabled = True
|
||||
End If
|
||||
|
||||
If IToolAdminRight.RestraintRelease = False Then
|
||||
btnBlockClose.Enabled = False
|
||||
Else
|
||||
btnBlockClose.Enabled = True
|
||||
End If
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub CharRestraint_UnLoad(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Closed
|
||||
|
||||
ProcessPacket.ICharRestraint = Nothing
|
||||
ProcessPacket.IRylMDI.ICharRestraint = Nothing
|
||||
|
||||
End Sub
|
||||
|
||||
'searching ...
|
||||
Private Sub btnSearch_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnSearch.Click
|
||||
|
||||
If cboType.SelectedIndex = 1 And txtSearchID.Text = "" Then
|
||||
MsgBox(ITextMSG.msg_inputadminid, MsgBoxStyle.OKOnly, ITextMSG.msg_error)
|
||||
txtSearchID.Focus()
|
||||
Exit Sub
|
||||
End If
|
||||
|
||||
|
||||
ViewRestraintList()
|
||||
|
||||
End Sub
|
||||
|
||||
Public Sub ViewRestraintList()
|
||||
|
||||
ds.Tables(CharRestraintIndex).Clear()
|
||||
|
||||
Dim serverid As Byte
|
||||
|
||||
Select Case cboServerID.SelectedIndex
|
||||
Case 0
|
||||
serverid = 0
|
||||
Case 1
|
||||
serverid = 1
|
||||
Case 2
|
||||
serverid = 2
|
||||
Case 3
|
||||
serverid = 3
|
||||
Case 4
|
||||
serverid = 4
|
||||
Case 5
|
||||
serverid = 5
|
||||
Case 6
|
||||
serverid = 6
|
||||
|
||||
End Select
|
||||
|
||||
If cboType.SelectedIndex = 0 Then
|
||||
' <20><><EFBFBD><EFBFBD> <20>˻<EFBFBD>
|
||||
' Flag(1) / ServerID(1) / UID(4)
|
||||
Dim sendb(5) As Byte
|
||||
sendb(0) = 1 ' Flag
|
||||
sendb(1) = serverid ' ServerID
|
||||
|
||||
Dim dwUID As Int32 = 0 ' UID
|
||||
Array.Copy(BitConverter.GetBytes(dwUID), 0, sendb, 2, 4)
|
||||
|
||||
IClientSocket.Send(9, sendb)
|
||||
Else
|
||||
'<27>κа˻<D0B0>
|
||||
' <20><><EFBFBD><EFBFBD> <20>˻<EFBFBD>
|
||||
' Flag(1) / ServerID(1) / UID(4)
|
||||
Dim sendb(5) As Byte
|
||||
sendb(0) = 2 ' Flag
|
||||
sendb(1) = serverid ' ServerID
|
||||
|
||||
Dim dwUID As Int32 = CInt(txtSearchID.Text) ' UID
|
||||
Array.Copy(BitConverter.GetBytes(dwUID), 0, sendb, 2, 4)
|
||||
IClientSocket.Send(9, sendb)
|
||||
End If
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
Private Sub btnReg_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnReg.Click
|
||||
|
||||
Dim ICharRestraintReg As New CharRestraintReg()
|
||||
ICharRestraintReg.ShowDialog()
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub cboType_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cboType.SelectedIndexChanged
|
||||
|
||||
If cboType.SelectedIndex = 1 Then
|
||||
lbluid.Visible = True
|
||||
txtSearchID.Visible = True
|
||||
Else
|
||||
lbluid.Visible = False
|
||||
txtSearchID.Visible = False
|
||||
End If
|
||||
|
||||
|
||||
End Sub
|
||||
|
||||
'<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
||||
Private Sub btnBlockClose_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnBlockClose.Click
|
||||
'<27><><EFBFBD><EFBFBD> Ŭ<><C5AC><EFBFBD><EFBFBD> row<6F><77> <20>ε<EFBFBD><CEB5><EFBFBD><EFBFBD><EFBFBD>ȣ(0<><30><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>Ѵ<EFBFBD>.)
|
||||
|
||||
Dim SelectedCellText As String = grdResult.Item(grdResult.CurrentCell)
|
||||
Dim CurrentIndex As Integer = grdResult.CurrentRowIndex
|
||||
|
||||
Dim encoding As Encoding = encoding.GetEncoding(Code)
|
||||
|
||||
Dim serverid As Byte
|
||||
|
||||
Select Case cboServerID.SelectedIndex
|
||||
Case 0
|
||||
serverid = 0
|
||||
Case 1
|
||||
serverid = 1
|
||||
Case 2
|
||||
serverid = 2
|
||||
Case 3
|
||||
serverid = 3
|
||||
Case 4
|
||||
serverid = 4
|
||||
Case 5
|
||||
serverid = 5
|
||||
Case 6
|
||||
serverid = 6
|
||||
|
||||
End Select
|
||||
|
||||
' <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>
|
||||
' ServerID(1) / UID(4) / CharName(16)
|
||||
Dim sendb(20) As Byte
|
||||
|
||||
sendb(0) = serverid ' ServerID
|
||||
|
||||
Dim dwDeleteUID As Int32 = CInt(grdResult.Item(CurrentIndex, 0)) ' UID - dwDeleteUID <20><> Ÿ<><C5B8><EFBFBD><EFBFBD> <20>ݵ<EFBFBD><DDB5><EFBFBD> int32<33>̾<EFBFBD><CCBE><EFBFBD> <20><>
|
||||
Array.Copy(BitConverter.GetBytes(dwDeleteUID), 0, sendb, 1, 4)
|
||||
|
||||
Dim szDeleteCharName As String = grdResult.Item(CurrentIndex, 2) ' <20><><EFBFBD><EFBFBD> ij<><C4B3><EFBFBD><EFBFBD> <20≯<EFBFBD>
|
||||
encoding.GetBytes(szDeleteCharName, 0, Min(16, szDeleteCharName.Length), sendb, 5)
|
||||
|
||||
IClientSocket.Send(12, sendb)
|
||||
|
||||
End Sub
|
||||
End Class
|
||||
174
Server/ToolProject/RCMS_Tool/CharRestraintReg.resx
Normal file
174
Server/ToolProject/RCMS_Tool/CharRestraintReg.resx
Normal file
@@ -0,0 +1,174 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 1.3
|
||||
|
||||
The primary goals of this format is to allow a simple XML format
|
||||
that is mostly human readable. The generation and parsing of the
|
||||
various data types are done through the TypeConverter classes
|
||||
associated with the data types.
|
||||
|
||||
Example:
|
||||
|
||||
... ado.net/XML headers & schema ...
|
||||
<resheader name="resmimetype">text/microsoft-resx</resheader>
|
||||
<resheader name="version">1.3</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1">this is my long string</data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
[base64 mime encoded serialized .NET Framework object]
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
[base64 mime encoded string representing a byte array form of the .NET Framework object]
|
||||
</data>
|
||||
|
||||
There are any number of "resheader" rows that contain simple
|
||||
name/value pairs.
|
||||
|
||||
Each data row contains a name, and value. The row also contains a
|
||||
type or mimetype. Type corresponds to a .NET class that support
|
||||
text/value conversion through the TypeConverter architecture.
|
||||
Classes that don't support this are serialized and stored with the
|
||||
mimetype set.
|
||||
|
||||
The mimetype is used for serialized objects, and tells the
|
||||
ResXResourceReader how to depersist the object. This is currently not
|
||||
extensible. For a given mimetype the value must be set accordingly:
|
||||
|
||||
Note - application/x-microsoft.net.object.binary.base64 is the format
|
||||
that the ResXResourceWriter will generate, however the reader can
|
||||
read any of the formats listed below.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.binary.base64
|
||||
value : The object must be serialized with
|
||||
: System.Serialization.Formatters.Binary.BinaryFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.soap.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
mimetype: application/x-microsoft.net.object.bytearray.base64
|
||||
value : The object must be serialized into a byte array
|
||||
: using a System.ComponentModel.TypeConverter
|
||||
: and then encoded with base64 encoding.
|
||||
-->
|
||||
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="data">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="resheader">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:choice>
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:schema>
|
||||
<resheader name="resmimetype">
|
||||
<value>text/microsoft-resx</value>
|
||||
</resheader>
|
||||
<resheader name="version">
|
||||
<value>1.3</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<data name="lbltitle.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblcharname.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="cboCharID.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lbluid.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtUID.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="cboServerName.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblservername.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblrestraintway.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="cboRestraintKind.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="GroupBox1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblrestraintfrom.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblrestraintto.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="cboEndTime.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="cboBlockType.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblblockkind.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="btnCommit.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="cboDescription.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblrestraintwhy.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblrestrainttime.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="GroupBox2.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="btnSearch.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="GroupBox3.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="cboType.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblrestraintwide.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="$this.Name">
|
||||
<value>CharRestraintReg</value>
|
||||
</data>
|
||||
</root>
|
||||
531
Server/ToolProject/RCMS_Tool/CharRestraintReg.vb
Normal file
531
Server/ToolProject/RCMS_Tool/CharRestraintReg.vb
Normal file
@@ -0,0 +1,531 @@
|
||||
Imports System.Text
|
||||
|
||||
Public Class CharRestraintReg
|
||||
Inherits System.Windows.Forms.Form
|
||||
|
||||
#Region " Windows Form Designer generated code "
|
||||
|
||||
Public Sub New()
|
||||
MyBase.New()
|
||||
|
||||
'This call is required by the Windows Form Designer.
|
||||
InitializeComponent()
|
||||
|
||||
'Add any initialization after the InitializeComponent() call
|
||||
|
||||
End Sub
|
||||
|
||||
'Form overrides dispose to clean up the component list.
|
||||
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
If disposing Then
|
||||
If Not (components Is Nothing) Then
|
||||
components.Dispose()
|
||||
End If
|
||||
End If
|
||||
MyBase.Dispose(disposing)
|
||||
End Sub
|
||||
|
||||
'Required by the Windows Form Designer
|
||||
Private components As System.ComponentModel.IContainer
|
||||
|
||||
'NOTE: The following procedure is required by the Windows Form Designer
|
||||
'It can be modified using the Windows Form Designer.
|
||||
'Do not modify it using the code editor.
|
||||
Friend WithEvents cboCharID As System.Windows.Forms.ComboBox
|
||||
Friend WithEvents cboServerName As System.Windows.Forms.ComboBox
|
||||
Friend WithEvents GroupBox1 As System.Windows.Forms.GroupBox
|
||||
Friend WithEvents GroupBox2 As System.Windows.Forms.GroupBox
|
||||
Friend WithEvents btnCommit As System.Windows.Forms.Button
|
||||
Friend WithEvents GroupBox3 As System.Windows.Forms.GroupBox
|
||||
Friend WithEvents cboType As System.Windows.Forms.ComboBox
|
||||
Friend WithEvents btnSearch As System.Windows.Forms.Button
|
||||
Friend WithEvents cboBlockType As System.Windows.Forms.ComboBox
|
||||
Friend WithEvents cboRestraintKind As System.Windows.Forms.ComboBox
|
||||
Friend WithEvents cboDescription As System.Windows.Forms.ComboBox
|
||||
Friend WithEvents txtUID As System.Windows.Forms.TextBox
|
||||
Friend WithEvents cboEndTime As System.Windows.Forms.ComboBox
|
||||
Friend WithEvents lblcharname As System.Windows.Forms.Label
|
||||
Friend WithEvents lbluid As System.Windows.Forms.Label
|
||||
Friend WithEvents lblservername As System.Windows.Forms.Label
|
||||
Friend WithEvents lblrestraintway As System.Windows.Forms.Label
|
||||
Friend WithEvents lblrestraintfrom As System.Windows.Forms.Label
|
||||
Friend WithEvents lblrestraintto As System.Windows.Forms.Label
|
||||
Friend WithEvents lblblockkind As System.Windows.Forms.Label
|
||||
Friend WithEvents lblrestraintwhy As System.Windows.Forms.Label
|
||||
Friend WithEvents lblrestrainttime As System.Windows.Forms.Label
|
||||
Friend WithEvents lblrestraintwide As System.Windows.Forms.Label
|
||||
Friend WithEvents lbltitle As System.Windows.Forms.Label
|
||||
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
|
||||
Me.lbltitle = New System.Windows.Forms.Label()
|
||||
Me.lblcharname = New System.Windows.Forms.Label()
|
||||
Me.cboCharID = New System.Windows.Forms.ComboBox()
|
||||
Me.lbluid = New System.Windows.Forms.Label()
|
||||
Me.txtUID = New System.Windows.Forms.TextBox()
|
||||
Me.cboServerName = New System.Windows.Forms.ComboBox()
|
||||
Me.lblservername = New System.Windows.Forms.Label()
|
||||
Me.lblrestraintway = New System.Windows.Forms.Label()
|
||||
Me.cboRestraintKind = New System.Windows.Forms.ComboBox()
|
||||
Me.GroupBox1 = New System.Windows.Forms.GroupBox()
|
||||
Me.lblrestraintfrom = New System.Windows.Forms.Label()
|
||||
Me.lblrestraintto = New System.Windows.Forms.Label()
|
||||
Me.cboEndTime = New System.Windows.Forms.ComboBox()
|
||||
Me.cboBlockType = New System.Windows.Forms.ComboBox()
|
||||
Me.lblblockkind = New System.Windows.Forms.Label()
|
||||
Me.btnCommit = New System.Windows.Forms.Button()
|
||||
Me.cboDescription = New System.Windows.Forms.ComboBox()
|
||||
Me.lblrestraintwhy = New System.Windows.Forms.Label()
|
||||
Me.lblrestrainttime = New System.Windows.Forms.Label()
|
||||
Me.GroupBox2 = New System.Windows.Forms.GroupBox()
|
||||
Me.btnSearch = New System.Windows.Forms.Button()
|
||||
Me.GroupBox3 = New System.Windows.Forms.GroupBox()
|
||||
Me.cboType = New System.Windows.Forms.ComboBox()
|
||||
Me.lblrestraintwide = New System.Windows.Forms.Label()
|
||||
Me.GroupBox1.SuspendLayout()
|
||||
Me.GroupBox2.SuspendLayout()
|
||||
Me.GroupBox3.SuspendLayout()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'lbltitle
|
||||
'
|
||||
Me.lbltitle.AutoSize = True
|
||||
Me.lbltitle.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbltitle.Font = New System.Drawing.Font("<EFBFBD><EFBFBD><EFBFBD><EFBFBD>ü", 14.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
|
||||
Me.lbltitle.Location = New System.Drawing.Point(232, 32)
|
||||
Me.lbltitle.Name = "lbltitle"
|
||||
Me.lbltitle.Size = New System.Drawing.Size(167, 24)
|
||||
Me.lbltitle.TabIndex = 2
|
||||
Me.lbltitle.Text = "ij<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> "
|
||||
'
|
||||
'lblcharname
|
||||
'
|
||||
Me.lblcharname.AutoSize = True
|
||||
Me.lblcharname.Location = New System.Drawing.Point(32, 24)
|
||||
Me.lblcharname.Name = "lblcharname"
|
||||
Me.lblcharname.Size = New System.Drawing.Size(54, 14)
|
||||
Me.lblcharname.TabIndex = 10
|
||||
Me.lblcharname.Text = "ij<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"
|
||||
'
|
||||
'cboCharID
|
||||
'
|
||||
Me.cboCharID.Location = New System.Drawing.Point(104, 16)
|
||||
Me.cboCharID.Name = "cboCharID"
|
||||
Me.cboCharID.Size = New System.Drawing.Size(128, 20)
|
||||
Me.cboCharID.TabIndex = 12
|
||||
'
|
||||
'lbluid
|
||||
'
|
||||
Me.lbluid.AutoSize = True
|
||||
Me.lbluid.Location = New System.Drawing.Point(64, 56)
|
||||
Me.lbluid.Name = "lbluid"
|
||||
Me.lbluid.Size = New System.Drawing.Size(26, 14)
|
||||
Me.lbluid.TabIndex = 13
|
||||
Me.lbluid.Text = "UID"
|
||||
'
|
||||
'txtUID
|
||||
'
|
||||
Me.txtUID.Location = New System.Drawing.Point(104, 48)
|
||||
Me.txtUID.Name = "txtUID"
|
||||
Me.txtUID.Size = New System.Drawing.Size(128, 21)
|
||||
Me.txtUID.TabIndex = 14
|
||||
Me.txtUID.Text = ""
|
||||
'
|
||||
'cboServerName
|
||||
'
|
||||
Me.cboServerName.Location = New System.Drawing.Point(104, 24)
|
||||
Me.cboServerName.Name = "cboServerName"
|
||||
Me.cboServerName.Size = New System.Drawing.Size(128, 20)
|
||||
Me.cboServerName.TabIndex = 15
|
||||
'
|
||||
'lblservername
|
||||
'
|
||||
Me.lblservername.AutoSize = True
|
||||
Me.lblservername.Location = New System.Drawing.Point(24, 27)
|
||||
Me.lblservername.Name = "lblservername"
|
||||
Me.lblservername.Size = New System.Drawing.Size(66, 14)
|
||||
Me.lblservername.TabIndex = 16
|
||||
Me.lblservername.Text = "<EFBFBD><EFBFBD><EFBFBD>Ӽ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"
|
||||
'
|
||||
'lblrestraintway
|
||||
'
|
||||
Me.lblrestraintway.AutoSize = True
|
||||
Me.lblrestraintway.Location = New System.Drawing.Point(32, 72)
|
||||
Me.lblrestraintway.Name = "lblrestraintway"
|
||||
Me.lblrestraintway.Size = New System.Drawing.Size(54, 14)
|
||||
Me.lblrestraintway.TabIndex = 17
|
||||
Me.lblrestraintway.Text = "<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"
|
||||
'
|
||||
'cboRestraintKind
|
||||
'
|
||||
Me.cboRestraintKind.Location = New System.Drawing.Point(104, 64)
|
||||
Me.cboRestraintKind.Name = "cboRestraintKind"
|
||||
Me.cboRestraintKind.Size = New System.Drawing.Size(128, 20)
|
||||
Me.cboRestraintKind.TabIndex = 18
|
||||
'
|
||||
'GroupBox1
|
||||
'
|
||||
Me.GroupBox1.Controls.AddRange(New System.Windows.Forms.Control() {Me.lblrestraintfrom, Me.lblrestraintto, Me.cboEndTime, Me.cboBlockType, Me.lblblockkind, Me.btnCommit, Me.cboDescription, Me.lblrestraintwhy, Me.lblrestrainttime, Me.lblrestraintway, Me.cboRestraintKind, Me.cboCharID, Me.lblcharname})
|
||||
Me.GroupBox1.Location = New System.Drawing.Point(128, 264)
|
||||
Me.GroupBox1.Name = "GroupBox1"
|
||||
Me.GroupBox1.Size = New System.Drawing.Size(352, 192)
|
||||
Me.GroupBox1.TabIndex = 19
|
||||
Me.GroupBox1.TabStop = False
|
||||
'
|
||||
'lblrestraintfrom
|
||||
'
|
||||
Me.lblrestraintfrom.AutoSize = True
|
||||
Me.lblrestraintfrom.Location = New System.Drawing.Point(102, 93)
|
||||
Me.lblrestraintfrom.Name = "lblrestraintfrom"
|
||||
Me.lblrestraintfrom.Size = New System.Drawing.Size(54, 14)
|
||||
Me.lblrestraintfrom.TabIndex = 30
|
||||
Me.lblrestraintfrom.Text = "<EFBFBD><EFBFBD><EFBFBD>ݺ<EFBFBD><EFBFBD><EFBFBD>"
|
||||
'
|
||||
'lblrestraintto
|
||||
'
|
||||
Me.lblrestraintto.AutoSize = True
|
||||
Me.lblrestraintto.Location = New System.Drawing.Point(232, 92)
|
||||
Me.lblrestraintto.Name = "lblrestraintto"
|
||||
Me.lblrestraintto.Size = New System.Drawing.Size(75, 14)
|
||||
Me.lblrestraintto.TabIndex = 29
|
||||
Me.lblrestraintto.Text = "<EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>"
|
||||
'
|
||||
'cboEndTime
|
||||
'
|
||||
Me.cboEndTime.Location = New System.Drawing.Point(158, 88)
|
||||
Me.cboEndTime.Name = "cboEndTime"
|
||||
Me.cboEndTime.Size = New System.Drawing.Size(66, 20)
|
||||
Me.cboEndTime.TabIndex = 28
|
||||
'
|
||||
'cboBlockType
|
||||
'
|
||||
Me.cboBlockType.Location = New System.Drawing.Point(104, 40)
|
||||
Me.cboBlockType.Name = "cboBlockType"
|
||||
Me.cboBlockType.Size = New System.Drawing.Size(128, 20)
|
||||
Me.cboBlockType.TabIndex = 27
|
||||
'
|
||||
'lblblockkind
|
||||
'
|
||||
Me.lblblockkind.AutoSize = True
|
||||
Me.lblblockkind.Location = New System.Drawing.Point(32, 46)
|
||||
Me.lblblockkind.Name = "lblblockkind"
|
||||
Me.lblblockkind.Size = New System.Drawing.Size(54, 14)
|
||||
Me.lblblockkind.TabIndex = 26
|
||||
Me.lblblockkind.Text = "<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"
|
||||
'
|
||||
'btnCommit
|
||||
'
|
||||
Me.btnCommit.Location = New System.Drawing.Point(104, 144)
|
||||
Me.btnCommit.Name = "btnCommit"
|
||||
Me.btnCommit.Size = New System.Drawing.Size(128, 32)
|
||||
Me.btnCommit.TabIndex = 24
|
||||
Me.btnCommit.Text = "<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ϸ<EFBFBD>"
|
||||
'
|
||||
'cboDescription
|
||||
'
|
||||
Me.cboDescription.Location = New System.Drawing.Point(104, 112)
|
||||
Me.cboDescription.Name = "cboDescription"
|
||||
Me.cboDescription.Size = New System.Drawing.Size(232, 20)
|
||||
Me.cboDescription.TabIndex = 21
|
||||
'
|
||||
'lblrestraintwhy
|
||||
'
|
||||
Me.lblrestraintwhy.AutoSize = True
|
||||
Me.lblrestraintwhy.Location = New System.Drawing.Point(32, 120)
|
||||
Me.lblrestraintwhy.Name = "lblrestraintwhy"
|
||||
Me.lblrestraintwhy.Size = New System.Drawing.Size(54, 14)
|
||||
Me.lblrestraintwhy.TabIndex = 20
|
||||
Me.lblrestraintwhy.Text = "<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"
|
||||
'
|
||||
'lblrestrainttime
|
||||
'
|
||||
Me.lblrestrainttime.AutoSize = True
|
||||
Me.lblrestrainttime.Location = New System.Drawing.Point(32, 96)
|
||||
Me.lblrestrainttime.Name = "lblrestrainttime"
|
||||
Me.lblrestrainttime.Size = New System.Drawing.Size(54, 14)
|
||||
Me.lblrestrainttime.TabIndex = 19
|
||||
Me.lblrestrainttime.Text = "ó<EFBFBD><EFBFBD><EFBFBD>ð<EFBFBD>"
|
||||
'
|
||||
'GroupBox2
|
||||
'
|
||||
Me.GroupBox2.Controls.AddRange(New System.Windows.Forms.Control() {Me.btnSearch, Me.lblservername, Me.lbluid, Me.txtUID, Me.cboServerName})
|
||||
Me.GroupBox2.Location = New System.Drawing.Point(128, 128)
|
||||
Me.GroupBox2.Name = "GroupBox2"
|
||||
Me.GroupBox2.Size = New System.Drawing.Size(352, 128)
|
||||
Me.GroupBox2.TabIndex = 20
|
||||
Me.GroupBox2.TabStop = False
|
||||
'
|
||||
'btnSearch
|
||||
'
|
||||
Me.btnSearch.Location = New System.Drawing.Point(104, 80)
|
||||
Me.btnSearch.Name = "btnSearch"
|
||||
Me.btnSearch.Size = New System.Drawing.Size(128, 32)
|
||||
Me.btnSearch.TabIndex = 25
|
||||
Me.btnSearch.Text = "<EFBFBD><EFBFBD>ȸ<EFBFBD>ϱ<EFBFBD>"
|
||||
'
|
||||
'GroupBox3
|
||||
'
|
||||
Me.GroupBox3.Controls.AddRange(New System.Windows.Forms.Control() {Me.cboType, Me.lblrestraintwide})
|
||||
Me.GroupBox3.Location = New System.Drawing.Point(128, 72)
|
||||
Me.GroupBox3.Name = "GroupBox3"
|
||||
Me.GroupBox3.Size = New System.Drawing.Size(352, 56)
|
||||
Me.GroupBox3.TabIndex = 21
|
||||
Me.GroupBox3.TabStop = False
|
||||
'
|
||||
'cboType
|
||||
'
|
||||
Me.cboType.Location = New System.Drawing.Point(104, 24)
|
||||
Me.cboType.Name = "cboType"
|
||||
Me.cboType.Size = New System.Drawing.Size(128, 20)
|
||||
Me.cboType.TabIndex = 18
|
||||
'
|
||||
'lblrestraintwide
|
||||
'
|
||||
Me.lblrestraintwide.AutoSize = True
|
||||
Me.lblrestraintwide.Location = New System.Drawing.Point(18, 28)
|
||||
Me.lblrestraintwide.Name = "lblrestraintwide"
|
||||
Me.lblrestraintwide.Size = New System.Drawing.Size(79, 14)
|
||||
Me.lblrestraintwide.TabIndex = 17
|
||||
Me.lblrestraintwide.Text = "<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"
|
||||
'
|
||||
'CharRestraintReg
|
||||
'
|
||||
Me.AutoScaleBaseSize = New System.Drawing.Size(6, 14)
|
||||
Me.ClientSize = New System.Drawing.Size(576, 517)
|
||||
Me.Controls.AddRange(New System.Windows.Forms.Control() {Me.GroupBox3, Me.GroupBox2, Me.GroupBox1, Me.lbltitle})
|
||||
Me.Name = "CharRestraintReg"
|
||||
Me.Text = "ij<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>"
|
||||
Me.GroupBox1.ResumeLayout(False)
|
||||
Me.GroupBox2.ResumeLayout(False)
|
||||
Me.GroupBox3.ResumeLayout(False)
|
||||
Me.ResumeLayout(False)
|
||||
|
||||
End Sub
|
||||
|
||||
#End Region
|
||||
|
||||
Private Sub CharRestraintReg_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
|
||||
|
||||
'<27><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ư<EFBFBD><C6B0> <20><>Ȱ<EFBFBD><C8B0><EFBFBD>Ȼ<EFBFBD><C8BB>·<EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>.
|
||||
ProcessPacket.ICharRestraintReg = Me
|
||||
|
||||
btnCommit.Enabled = False
|
||||
|
||||
Me.Text = ITextCharRestraintreg.formheader
|
||||
Me.lbltitle.Text = ITextCharRestraintreg.formheader
|
||||
Me.lblblockkind.Text = ITextCharRestraintreg.lblblockkind
|
||||
Me.lblcharname.Text = ITextCharInfo.cboidtype_name
|
||||
Me.lblrestraintfrom.Text = ITextCharRestraintreg.lblrestraintfrom
|
||||
Me.lblrestrainttime.Text = ITextCharRestraintreg.lblrestrainttime
|
||||
Me.lblrestraintto.Text = ITextCharRestraintreg.lblrestraintto
|
||||
Me.lblrestraintway.Text = ITextCharRestraintreg.lblrestraintway
|
||||
Me.lblrestraintwhy.Text = ITextCharRestraintreg.lblrestraintwhy
|
||||
Me.lblrestraintwide.Text = ITextCharRestraintreg.lblrestraintwhy
|
||||
Me.lblservername.Text = ITextCharRestraint.lblserver
|
||||
Me.lbluid.Text = ITextCharInfo.cboidtype_uid
|
||||
Me.btnSearch.Text = ITextButton.btnSearch
|
||||
Me.btnCommit.Text = ITextAdminSetting.chkRestraintReg
|
||||
|
||||
|
||||
cboType.Text = ITextCharRestraintreg.cbowide_text
|
||||
cboType.Items.Add(ITextCharRestraintreg.cbowide_1)
|
||||
cboType.Items.Add(ITextCharRestraintreg.cbowide_2)
|
||||
|
||||
DBConn.SetServerNames(cboServerName)
|
||||
|
||||
GroupBox1.Enabled = False
|
||||
GroupBox2.Enabled = False
|
||||
|
||||
cboBlockType.Items.Add(ITextCharRestraintreg.cboblock_1)
|
||||
cboBlockType.Items.Add(ITextCharRestraintreg.cboblock_2)
|
||||
|
||||
cboBlockType.SelectedIndex = 1
|
||||
|
||||
cboRestraintKind.Enabled = False
|
||||
|
||||
cboDescription.Items.Add(ITextCharRestraintreg.cbowhy_1)
|
||||
cboDescription.Items.Add(ITextCharRestraintreg.cbowhy_2)
|
||||
cboDescription.Items.Add(ITextCharRestraintreg.cbowhy_3)
|
||||
cboDescription.Items.Add(ITextCharRestraintreg.cbowhy_4)
|
||||
cboDescription.Items.Add(ITextCharRestraintreg.cbowhy_5)
|
||||
cboDescription.Items.Add(ITextCharRestraintreg.cbowhy_6)
|
||||
cboDescription.Items.Add(ITextCharRestraintreg.cbowhy_7)
|
||||
cboDescription.SelectedIndex = 0
|
||||
|
||||
cboEndTime.Items.Add("1")
|
||||
cboEndTime.Items.Add("3")
|
||||
cboEndTime.Items.Add("5")
|
||||
cboEndTime.Items.Add("7")
|
||||
cboEndTime.Items.Add("10")
|
||||
cboEndTime.Items.Add("15")
|
||||
cboEndTime.Items.Add("30")
|
||||
|
||||
cboEndTime.SelectedIndex = 0
|
||||
|
||||
'DateTimePicker1.Format = DateTimePickerFormat.Custom
|
||||
'DateTimePicker1.CustomFormat = "yyyy-MM-dd HH:mm:00"
|
||||
|
||||
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub CharRestraintReg_UnLoad(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Closed
|
||||
|
||||
ProcessPacket.ICharRestraintReg = Nothing
|
||||
|
||||
End Sub
|
||||
|
||||
'ij<><C4B3><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20>Ǵ<EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>Ѵ<EFBFBD>.
|
||||
Private Sub cboType_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cboType.SelectedIndexChanged
|
||||
|
||||
Select Case cboType.SelectedIndex
|
||||
Case 0
|
||||
|
||||
GroupBox2.Enabled = True
|
||||
GroupBox1.Enabled = True
|
||||
btnSearch.Enabled = False
|
||||
cboCharID.Enabled = False
|
||||
btnCommit.Enabled = True
|
||||
|
||||
Case 1
|
||||
|
||||
GroupBox2.Enabled = True
|
||||
GroupBox1.Enabled = True
|
||||
btnSearch.Enabled = True
|
||||
cboCharID.Enabled = True
|
||||
btnCommit.Enabled = False
|
||||
|
||||
End Select
|
||||
|
||||
End Sub
|
||||
|
||||
'<27><><EFBFBD><EFBFBD><EFBFBD>ϱ<EFBFBD>............
|
||||
Private Sub btnCommit_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnCommit.Click
|
||||
|
||||
Dim serverid As Byte
|
||||
|
||||
Select Case cboServerName.SelectedIndex
|
||||
Case 0
|
||||
serverid = 0
|
||||
Case 1
|
||||
serverid = 1
|
||||
Case 2
|
||||
serverid = 2
|
||||
Case 3
|
||||
serverid = 3
|
||||
Case 4
|
||||
serverid = 4
|
||||
Case 5
|
||||
serverid = 5
|
||||
Case 6
|
||||
serverid = 6
|
||||
End Select
|
||||
|
||||
Dim BlockKind As Byte
|
||||
|
||||
Select Case cboType.SelectedIndex
|
||||
Case 0
|
||||
BlockKind = 1 '<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
||||
Case 1
|
||||
BlockKind = 2 'ij<><C4B3><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
||||
End Select
|
||||
|
||||
Dim BlcokType As Byte
|
||||
|
||||
Select Case cboBlockType.SelectedIndex
|
||||
Case 0
|
||||
BlcokType = 1 '<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
||||
Case 1
|
||||
BlcokType = 0 '<27>ӽú<D3BD><C3BA><EFBFBD>
|
||||
End Select
|
||||
|
||||
' <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>
|
||||
' ServerID(1) / UID(4) / CharName(16) / BlockType(1) / BlockKind(1) /
|
||||
' BlockFinishDateTime(20) / Description(31)
|
||||
|
||||
Dim encoding As Encoding = encoding.GetEncoding(Code)
|
||||
|
||||
Dim sendb(70) As Byte
|
||||
|
||||
sendb(0) = serverid ' ServerID
|
||||
|
||||
Dim dwUID As Int32 = CInt(txtUID.Text) ' UID - dwUID<49><44> Ÿ<><C5B8><EFBFBD><EFBFBD> <20>ݵ<EFBFBD><DDB5><EFBFBD> int32<33>̾<EFBFBD><CCBE><EFBFBD> <20><>.
|
||||
Array.Copy(BitConverter.GetBytes(dwUID), 0, sendb, 1, 4)
|
||||
|
||||
Dim szCharName As String = cboCharID.Text ' CharName
|
||||
encoding.GetBytes(szCharName, 0, Min(szCharName.Length, 16), sendb, 5)
|
||||
|
||||
sendb(21) = BlockKind ' BlockType
|
||||
sendb(22) = BlcokType ' BlockKind
|
||||
|
||||
encoding.GetBytes(cboEndTime.Text, 0, Min(cboEndTime.Text.Length, 20), sendb, 23)
|
||||
|
||||
Dim szDescription As String = cboDescription.Text ' Description
|
||||
encoding.GetBytes(szDescription, 0, Min(szDescription.Length, 31), sendb, 43)
|
||||
|
||||
IClientSocket.Send(10, sendb)
|
||||
|
||||
Me.Close()
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btnSearch_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnSearch.Click
|
||||
|
||||
Dim serverid As Byte
|
||||
|
||||
Select Case cboServerName.SelectedIndex
|
||||
Case 0
|
||||
serverid = 0
|
||||
Case 1
|
||||
serverid = 1
|
||||
Case 2
|
||||
serverid = 2
|
||||
Case 3
|
||||
serverid = 3
|
||||
Case 4
|
||||
serverid = 4
|
||||
Case 5
|
||||
serverid = 5
|
||||
Case 6
|
||||
serverid = 6
|
||||
End Select
|
||||
|
||||
ICharRestraintReg.cboCharID.Items.Clear()
|
||||
|
||||
Try
|
||||
|
||||
Dim dwUID As Int32 = CInt(txtUID.Text) ' UID - dwUID<49><44> Ÿ<><C5B8><EFBFBD><EFBFBD> <20>ݵ<EFBFBD><DDB5><EFBFBD> int32<33>̾<EFBFBD><CCBE><EFBFBD> <20><>.
|
||||
|
||||
Dim sendb(4) As Byte
|
||||
Array.Copy(BitConverter.GetBytes(dwUID), 0, sendb, 0, 3)
|
||||
sendb(4) = serverid
|
||||
|
||||
btnSearch.Enabled = False
|
||||
|
||||
IClientSocket.Send(13, sendb)
|
||||
|
||||
Catch
|
||||
|
||||
MsgBox("<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Դϴ<EFBFBD>. UID<49><44> <20><><EFBFBD>ڷ<EFBFBD> <20>Է<EFBFBD><D4B7><EFBFBD> <20>ּ<EFBFBD><D6BC><EFBFBD>. <20>Ǵ<EFBFBD> <20><>Ʈ<EFBFBD><C6AE>ũ <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20>ֽ<EFBFBD><D6BD>ϴ<EFBFBD>.", MsgBoxStyle.Critical)
|
||||
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
Private Sub cboBlockType_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cboBlockType.SelectedIndexChanged
|
||||
|
||||
Select Case cboBlockType.SelectedIndex
|
||||
Case 0 '<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
||||
|
||||
cboEndTime.Hide()
|
||||
cboEndTime.SelectedIndex = cboEndTime.MaxLength - 1
|
||||
|
||||
Case 1 '<27>ӽú<D3BD><C3BA><EFBFBD>
|
||||
|
||||
cboEndTime.Show()
|
||||
|
||||
End Select
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
End Class
|
||||
436
Server/ToolProject/RCMS_Tool/ClientSocket.vb
Normal file
436
Server/ToolProject/RCMS_Tool/ClientSocket.vb
Normal file
@@ -0,0 +1,436 @@
|
||||
Imports System.IO
|
||||
Imports System.Object
|
||||
Imports System.Text
|
||||
Imports System.Net
|
||||
Imports System.Net.Sockets
|
||||
Imports System.UInt16
|
||||
|
||||
|
||||
Public Class ClientSocket
|
||||
|
||||
Const m_nHeaderSize = 12
|
||||
Private m_bIsConnected As Boolean
|
||||
|
||||
Public ReadOnly Property IsConnected() As Boolean
|
||||
Get
|
||||
Return m_bIsConnected
|
||||
End Get
|
||||
End Property
|
||||
|
||||
Public Delegate Sub ProcessPacket(ByVal contents() As Byte, ByVal nPacketCMD As Byte, ByVal errorCode As Int16)
|
||||
Public Delegate Sub ProcessDisconnect()
|
||||
|
||||
Private m_TCPSocket As TcpClient
|
||||
|
||||
Private m_RecvCallBack As AsyncCallback
|
||||
Private m_ReceivedData() As Byte
|
||||
Private m_nReceived As Int32
|
||||
|
||||
Private m_ProcessTable As Hashtable
|
||||
Private m_DisconnectProcess As ProcessDisconnect
|
||||
|
||||
Private m_MainLoop As Object
|
||||
|
||||
Private Class AsyncReceived
|
||||
|
||||
End Class
|
||||
|
||||
|
||||
Public Sub New()
|
||||
|
||||
m_TCPSocket = New TcpClient()
|
||||
m_ProcessTable = New Hashtable()
|
||||
|
||||
ReDim m_ReceivedData(65535)
|
||||
|
||||
End Sub
|
||||
|
||||
Public Sub Connect(ByVal HostName As String, ByVal Port As Integer, _
|
||||
ByVal mainLoop As Object, ByVal disconnProcess As ProcessDisconnect)
|
||||
|
||||
Try
|
||||
|
||||
m_MainLoop = mainLoop
|
||||
|
||||
m_DisconnectProcess = disconnProcess
|
||||
m_TCPSocket.Connect(HostName, Port)
|
||||
|
||||
m_RecvCallBack = New AsyncCallback(AddressOf Me.RecvCallBack)
|
||||
|
||||
' <20><EFBFBD> <20>Է<EFBFBD> <20><><EFBFBD><EFBFBD>
|
||||
Recv()
|
||||
|
||||
m_bIsConnected = True
|
||||
|
||||
Catch
|
||||
|
||||
If False = m_DisconnectProcess.Equals(Nothing) Then
|
||||
m_DisconnectProcess.Invoke()
|
||||
End If
|
||||
|
||||
m_bIsConnected = False
|
||||
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
Public Sub AddProcess(ByVal packetCommand As Byte, ByVal fnProcess As ProcessPacket)
|
||||
If False = fnProcess.Equals(Nothing) Then
|
||||
m_ProcessTable.Add(packetCommand, fnProcess)
|
||||
End If
|
||||
End Sub
|
||||
|
||||
|
||||
Public Sub Close()
|
||||
m_TCPSocket.Close()
|
||||
End Sub
|
||||
|
||||
|
||||
Public Sub Send(ByVal packetCommand As Byte, ByVal contents() As Byte)
|
||||
|
||||
Dim nPacketLength As Int16 = contents.GetLength(0) + m_nHeaderSize
|
||||
Dim Packet(nPacketLength) As Byte
|
||||
|
||||
Packet(0) = CByte(255)
|
||||
Packet(1) = packetCommand
|
||||
Array.Copy(BitConverter.GetBytes(nPacketLength), 0, Packet, 2, 2)
|
||||
|
||||
' Wrap Header
|
||||
EncryptHeader(Packet, 1, m_nHeaderSize - 1, 0, 0)
|
||||
|
||||
Array.Copy(contents, 0, Packet, m_nHeaderSize, contents.GetLength(0))
|
||||
|
||||
Try
|
||||
|
||||
m_TCPSocket.GetStream.Write(Packet, 0, nPacketLength)
|
||||
|
||||
Catch
|
||||
|
||||
If False = m_DisconnectProcess.Equals(Nothing) And True = m_bIsConnected Then
|
||||
m_DisconnectProcess.Invoke()
|
||||
End If
|
||||
|
||||
m_bIsConnected = False
|
||||
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
Private Sub Recv()
|
||||
|
||||
Dim asyncReceived As AsyncReceived = New AsyncReceived()
|
||||
m_TCPSocket.GetStream.BeginRead(m_ReceivedData, m_nReceived, _
|
||||
m_ReceivedData.GetUpperBound(0) - m_nReceived, m_RecvCallBack, asyncReceived)
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
Private Sub RecvCallBack(ByVal ar As IAsyncResult)
|
||||
|
||||
Try
|
||||
' <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> ó<><C3B3><EFBFBD>Ѵ<EFBFBD>.
|
||||
m_nReceived += m_TCPSocket.GetStream.EndRead(ar)
|
||||
|
||||
Catch ex As Exception
|
||||
|
||||
If False = m_DisconnectProcess.Equals(Nothing) And True = m_bIsConnected Then
|
||||
m_DisconnectProcess.Invoke()
|
||||
End If
|
||||
|
||||
m_bIsConnected = False
|
||||
|
||||
End Try
|
||||
|
||||
Dim nProcessed As Int32 = 0
|
||||
Dim nPacketCommand As Byte = 0
|
||||
Dim nPacketLength As Int16 = 0
|
||||
Dim nCopy As Int32 = 0
|
||||
|
||||
While m_nHeaderSize <= m_nReceived - nProcessed
|
||||
|
||||
' <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20>м<EFBFBD><D0BC>Ѵ<EFBFBD>
|
||||
If 255 <> m_ReceivedData(nProcessed) Then
|
||||
Exit While
|
||||
End If
|
||||
|
||||
' <20><><EFBFBD≯<EFBFBD> <20>м<EFBFBD><D0BC>Ѵ<EFBFBD>
|
||||
DecryptHeader(m_ReceivedData, nProcessed + 1, m_nHeaderSize - 1, 0, 0)
|
||||
|
||||
nPacketCommand = m_ReceivedData(nProcessed + 1)
|
||||
nPacketLength = BitConverter.ToInt16(m_ReceivedData, nProcessed + 2)
|
||||
|
||||
' <20><><EFBFBD><EFBFBD> <20><> <20><EFBFBD><DEBE><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> Ż<><C5BB><EFBFBD>Ѵ<EFBFBD>.
|
||||
If m_nReceived < nProcessed + nPacketLength Then
|
||||
EncryptHeader(m_ReceivedData, nProcessed + 1, m_nHeaderSize - 1, 0, 0)
|
||||
Exit While
|
||||
End If
|
||||
|
||||
Dim process As ProcessPacket = m_ProcessTable(nPacketCommand)
|
||||
If False = process.Equals(Nothing) Then
|
||||
|
||||
Dim contents(nPacketLength - m_nHeaderSize - 1) As Byte
|
||||
|
||||
Array.Copy(m_ReceivedData, nProcessed + m_nHeaderSize, _
|
||||
contents, 0, nPacketLength - m_nHeaderSize)
|
||||
|
||||
Dim params() As Object = {contents, nPacketCommand, BitConverter.ToInt16(m_ReceivedData, nProcessed + 8)}
|
||||
m_MainLoop.Invoke(process, params)
|
||||
|
||||
End If
|
||||
|
||||
nProcessed += nPacketLength
|
||||
|
||||
End While
|
||||
|
||||
' <20><><EFBFBD><EFBFBD> ó<><C3B3><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20>κ<EFBFBD><CEBA><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>Ѵ<EFBFBD>.
|
||||
If 0 <> nProcessed Then
|
||||
|
||||
Array.Copy(m_ReceivedData, nProcessed, m_ReceivedData, 0, m_nReceived - nProcessed)
|
||||
m_nReceived -= nProcessed
|
||||
|
||||
End If
|
||||
|
||||
Try
|
||||
' <20>ٽ<EFBFBD> Recv<63><76> Pending<6E>Ѵ<EFBFBD>.
|
||||
Recv()
|
||||
|
||||
Catch ex As Exception
|
||||
|
||||
If False = m_DisconnectProcess.Equals(Nothing) And True = m_bIsConnected Then
|
||||
m_DisconnectProcess.Invoke()
|
||||
End If
|
||||
|
||||
m_bIsConnected = False
|
||||
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
' <20><>ȣȭ <20><><EFBFBD><EFBFBD> <20>ڵ<EFBFBD>
|
||||
Private Sub EncryptHeader(ByRef Data() As Byte, ByVal nStartPos As Integer, ByVal nLength As Integer, _
|
||||
ByVal nPageVer As Integer, ByVal nPageNum As Integer)
|
||||
|
||||
If Data.GetLength(0) < nLength Then
|
||||
Exit Sub
|
||||
End If
|
||||
|
||||
Dim Pos As Integer = 0
|
||||
|
||||
For Pos = nStartPos To nLength + nStartPos - 1
|
||||
|
||||
Data(Pos) = Data(Pos) Xor m_XORTable(nPageVer, nPageNum, (Pos - nStartPos) Mod BIT_COUNT)
|
||||
Data(Pos) = Int(Int(Data(Pos) And &H80) / (2 ^ 7)) Or Int(Int(Data(Pos) * 2) And &HFE)
|
||||
|
||||
Next
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub DecryptHeader(ByRef Data() As Byte, ByVal nStartPos As Integer, ByVal nLength As Integer, _
|
||||
ByVal nPageVer As Integer, ByVal nPageNum As Integer)
|
||||
|
||||
If Data.GetLength(0) < nLength Then
|
||||
Exit Sub
|
||||
End If
|
||||
|
||||
Dim Pos As Integer = 0
|
||||
|
||||
For Pos = nStartPos To nLength + nStartPos - 1
|
||||
|
||||
Data(Pos) = Int(Int((Data(Pos) And &H1) * (2 ^ 7)) And &H80) Or (Int(Data(Pos) / 2) And &H7F)
|
||||
Data(Pos) = Data(Pos) Xor m_XORTable(nPageVer, nPageNum, (Pos - nStartPos) Mod BIT_COUNT)
|
||||
|
||||
Next
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
Dim BIT_COUNT As Integer = 40
|
||||
Dim CODE_PAGE As Integer = 10
|
||||
|
||||
Dim m_XORTable(,,) As Byte = {{{ _
|
||||
&H82, &H53, &H43, &H4C, &H2B, _
|
||||
&HD, &H37, &HD7, &HD9, &HD8, _
|
||||
&H1B, &H6D, &HA0, &HC3, &H2B, _
|
||||
&HEE, &H45, &H88, &H1A, &HA6, _
|
||||
&H18, &H1D, &H9D, &H38, &H2A, _
|
||||
&H55, &H3, &H1D, &HCD, &HA6, _
|
||||
&H73, &H7, &HED, &H8D, &HC5, _
|
||||
&HDB, &HA3, &HBD, &HB6, &HD5}, _
|
||||
_
|
||||
{&H34, &HB5, &HB2, &H3D, &H7D, _
|
||||
&H43, &H8C, &HC0, &H21, &H25, _
|
||||
&HCD, &HB6, &H53, &H76, &HCE, _
|
||||
&H5D, &HD4, &H87, &HCA, &H84, _
|
||||
&H81, &HCB, &H5E, &H4, &HBA, _
|
||||
&H69, &H3E, &H65, &HDE, &H21, _
|
||||
&H8A, &H63, &H62, &H71, &H90, _
|
||||
&H87, &HA, &H52, &H28, &H44}, _
|
||||
_
|
||||
{&HA3, &H49, &HDC, &HEA, &H9, _
|
||||
&HB7, &H1, &HA4, &HA1, &H11, _
|
||||
&H11, &H8E, &H80, &H35, &H5B, _
|
||||
&HDD, &H38, &HD5, &H4E, &H36, _
|
||||
&HC, &HA2, &HBB, &H5, &H36, _
|
||||
&H57, &H2E, &H98, &HBE, &H88, _
|
||||
&H3C, &H28, &H43, &H63, &HA0, _
|
||||
&HE9, &HE1, &H6D, &H51, &HCB}, _
|
||||
_
|
||||
{&H4D, &H62, &H84, &H43, &H89, _
|
||||
&HC7, &H89, &H83, &H65, &H29, _
|
||||
&H53, &H95, &H7C, &HC0, &HA1, _
|
||||
&HC, &HDB, &HD7, &H4, &HD8, _
|
||||
&H6A, &HD1, &H73, &H1D, &H21, _
|
||||
&H67, &H86, &H8D, &HA4, &HA0, _
|
||||
&H34, &HBD, &H31, &H20, &H61, _
|
||||
&HE, &HE9, &H63, &HB4, &HC0}, _
|
||||
_
|
||||
{&HC7, &H36, &H1B, &H41, &H23, _
|
||||
&H9C, &HD1, &H8C, &H25, &H53, _
|
||||
&H42, &H2E, &H45, &H6D, &H42, _
|
||||
&H7B, &H4E, &H5B, &HEB, &H24, _
|
||||
&H33, &H74, &H52, &H28, &HC6, _
|
||||
&H2A, &HC3, &H16, &H60, &HA5, _
|
||||
&H45, &H35, &HDB, &H9A, &H54, _
|
||||
&H97, &HE2, &HEE, &H9B, &HDE}, _
|
||||
_
|
||||
{&HE0, &HC3, &H84, &H41, &HED, _
|
||||
&H45, &H4C, &H69, &HD9, &H28, _
|
||||
&H55, &H27, &H8E, &H3A, &H3C, _
|
||||
&H8E, &H84, &H97, &H14, &HE6, _
|
||||
&H58, &H51, &H26, &HD, &HE2, _
|
||||
&H9E, &H66, &H7C, &HD, &H1, _
|
||||
&H7D, &H17, &H4C, &H8, &HDD, _
|
||||
&H97, &H1C, &H7B, &HCE, &H5D}, _
|
||||
_
|
||||
{&H54, &H37, &H7C, &HC, &H8E, _
|
||||
&H27, &H7A, &H78, &H2E, &HE6, _
|
||||
&H6D, &H25, &H62, &H62, &H98, _
|
||||
&H20, &H2E, &H23, &H15, &H61, _
|
||||
&H7D, &H97, &H50, &H7, &H20, _
|
||||
&H7A, &H4, &H29, &H62, &H90, _
|
||||
&H6B, &HE9, &HE6, &H22, &H72, _
|
||||
&H38, &H56, &HC9, &H6, &H2E}, _
|
||||
_
|
||||
{&H3B, &H47, &H8, &H2D, &H21, _
|
||||
&H42, &H7, &H69, &H4A, &H57, _
|
||||
&H8B, &H79, &HE7, &H56, &H27, _
|
||||
&H23, &H24, &H85, &H47, &H74, _
|
||||
&H75, &H85, &HA9, &HEB, &H10, _
|
||||
&HCB, &H17, &H85, &H4B, &H5E, _
|
||||
&H20, &H78, &HD0, &H7D, &H86, _
|
||||
&H5E, &H14, &H7E, &H64, &H50}, _
|
||||
_
|
||||
{&H69, &H52, &H4A, &HBD, &H8C, _
|
||||
&H9B, &HD6, &H63, &HBD, &H26, _
|
||||
&H86, &H32, &H95, &HA4, &H2, _
|
||||
&H9B, &H1, &H14, &H49, &H78, _
|
||||
&H88, &H57, &H3A, &H1, &H4A, _
|
||||
&HBC, &H50, &HCD, &H31, &H39, _
|
||||
&H71, &H30, &H5B, &H9C, &H4D, _
|
||||
&H21, &H67, &H82, &HE8, &H5C}, _
|
||||
_
|
||||
{&H66, &H10, &HA9, &H7D, &HD2, _
|
||||
&H36, &HE2, &HB1, &H28, &H20, _
|
||||
&HD5, &HE7, &HD5, &HE, &HD4, _
|
||||
&HC, &H2C, &H77, &H80, &HE, _
|
||||
&HA6, &H37, &HBE, &H61, &HAD, _
|
||||
&HD6, &H17, &H65, &H13, &H70, _
|
||||
&HAE, &H40, &H3B, &H52, &HEE, _
|
||||
&H53, &H84, &HEB, &H4, &HD}}, _
|
||||
_
|
||||
{{&H49, &H8C, &H77, &HC0, &HC0, _
|
||||
&H64, &H54, &HB, &H22, &HBD, _
|
||||
&H82, &H93, &H9A, &H23, &H8D, _
|
||||
&HE4, &HC8, &H9D, &HB3, &H50, _
|
||||
&H44, &HB1, &HE2, &H9E, &H15, _
|
||||
&H7A, &HA1, &HC, &H24, &HE3, _
|
||||
&H1E, &HA, &HA, &H73, &H6A, _
|
||||
&HA5, &H8B, &H3A, &H53, &H33}, _
|
||||
_
|
||||
{&HB0, &HE6, &HB7, &H51, &H70, _
|
||||
&HDA, &HD6, &H29, &HAA, &H10, _
|
||||
&HB5, &H8A, &H38, &H37, &H4E, _
|
||||
&H7A, &H3B, &H74, &H7B, &H63, _
|
||||
&H41, &H7C, &H21, &H65, &H5E, _
|
||||
&H26, &H95, &H44, &H75, &HA3, _
|
||||
&H74, &HDD, &HB4, &H33, &H9E, _
|
||||
&H54, &H3C, &H95, &H5E, &H34}, _
|
||||
_
|
||||
{&H10, &H19, &H43, &H64, &H78, _
|
||||
&H2B, &HA6, &H60, &H7D, &HCD, _
|
||||
&HA9, &H28, &HB8, &H85, &HE, _
|
||||
&H66, &HC7, &H3C, &H28, &HDC, _
|
||||
&HA1, &H4D, &H60, &H9B, &HC7, _
|
||||
&HD3, &H74, &H93, &HE6, &HC3, _
|
||||
&H97, &H76, &H12, &HA4, &HCB, _
|
||||
&HB9, &H22, &H51, &HB9, &H79}, _
|
||||
_
|
||||
{&H5C, &H68, &HDB, &HE6, &H59, _
|
||||
&H57, &H95, &HCD, &HAE, &HCA, _
|
||||
&H67, &HB8, &H37, &H90, &HBA, _
|
||||
&H54, &H98, &H95, &H73, &H8E, _
|
||||
&H47, &HC1, &H40, &HBA, &H80, _
|
||||
&H26, &H10, &HAA, &H60, &H64, _
|
||||
&HD8, &H69, &HC7, &HD, &H2B, _
|
||||
&H28, &HA6, &HBA, &H1, &H4A}, _
|
||||
_
|
||||
{&HEE, &H28, &H65, &HC4, &H9D, _
|
||||
&H41, &H8D, &H91, &H6C, &H91, _
|
||||
&H7E, &H80, &HC3, &HD1, &HAE, _
|
||||
&HB6, &H92, &H41, &H66, &H13, _
|
||||
&H72, &H20, &H26, &HA1, &H72, _
|
||||
&H5, &H29, &H8, &H88, &H30, _
|
||||
&H40, &H6D, &H5A, &H41, &H1, _
|
||||
&H7A, &HDB, &H2C, &HEE, &HC3}, _
|
||||
_
|
||||
{&H5C, &H3, &H38, &HD8, &H95, _
|
||||
&HE7, &HB4, &H67, &H30, &H51, _
|
||||
&H21, &H68, &H78, &H89, &H68, _
|
||||
&HB, &HE3, &HB0, &H28, &HB3, _
|
||||
&HA9, &H38, &H18, &HE4, &H59, _
|
||||
&H43, &HC9, &H52, &H75, &H4, _
|
||||
&H15, &H7, &H97, &H14, &H7, _
|
||||
&H27, &HDA, &HE5, &HD9, &HDB}, _
|
||||
_
|
||||
{&HDB, &H8, &H27, &HA3, &H64, _
|
||||
&HDC, &H42, &HE3, &H3D, &HD, _
|
||||
&H26, &HA2, &HC3, &H5E, &H3E, _
|
||||
&HA7, &H47, &HE4, &H1C, &H73, _
|
||||
&H13, &H99, &H9E, &HBA, &HD3, _
|
||||
&H8, &H73, &H88, &H3, &H1, _
|
||||
&H24, &H2E, &H9, &HBD, &H3A, _
|
||||
&H6E, &H3C, &HB6, &HA2, &H22}, _
|
||||
_
|
||||
{&HE7, &H27, &H60, &H20, &H85, _
|
||||
&HDA, &HEA, &H84, &H86, &H41, _
|
||||
&H67, &H1C, &H83, &HBE, &H7A, _
|
||||
&H61, &H67, &H1, &H18, &H30, _
|
||||
&HC6, &H37, &HBC, &H51, &HBC, _
|
||||
&H78, &HA1, &H53, &H53, &H58, _
|
||||
&H9B, &H32, &H5, &H67, &H6B, _
|
||||
&HC7, &H3A, &H7C, &HA8, &HE5}, _
|
||||
_
|
||||
{&H70, &H10, &H29, &H88, &H94, _
|
||||
&HC0, &HEE, &H8D, &H52, &H20, _
|
||||
&HD9, &HC3, &H3C, &HB3, &H43, _
|
||||
&H74, &H83, &HC8, &HC5, &HAA, _
|
||||
&H90, &H58, &HC, &HD0, &HBC, _
|
||||
&H2A, &HED, &H4, &H5, &H8E, _
|
||||
&H27, &HDE, &H9C, &H37, &H57, _
|
||||
&H2A, &H93, &H63, &H1B, &H9E}, _
|
||||
_
|
||||
{&HC3, &H52, &HDB, &HE9, &H63, _
|
||||
&H9A, &H87, &H18, &H6D, &HBE, _
|
||||
&H1B, &H37, &H6A, &HEA, &H1, _
|
||||
&H2, &H1, &HB5, &H74, &H71, _
|
||||
&HA5, &H9A, &H9A, &H3A, &H11, _
|
||||
&H8B, &H62, &HD7, &HB0, &H6, _
|
||||
&HC, &HA0, &H10, &H9, &H97, _
|
||||
&H5A, &HEB, &HEA, &H18, &HB8}}}
|
||||
|
||||
End Class
|
||||
|
||||
|
||||
433
Server/ToolProject/RCMS_Tool/DBAgent.vb
Normal file
433
Server/ToolProject/RCMS_Tool/DBAgent.vb
Normal file
@@ -0,0 +1,433 @@
|
||||
#If False Then
|
||||
***********************************************************************
|
||||
* .netXpert DataAccess Component Version 1.0
|
||||
* Written By Funnyfox
|
||||
* Last Comment 2001.11.4
|
||||
***********************************************************************
|
||||
#End If
|
||||
|
||||
Imports System.Data
|
||||
Imports System.Data.SqlClient
|
||||
'Imports System.EnterpriseServices ' Serviced Component <20><> ȣ<><C8A3><EFBFBD>ϱ<EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> Namespce
|
||||
Imports System.Configuration.ConfigurationSettings 'Config File <20><><EFBFBD><EFBFBD>(AppSettings <20><>)<29><> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> Namesapce
|
||||
Imports System.Runtime.InteropServices 'Interop Namespace
|
||||
|
||||
'**********************************************************************************
|
||||
' Transaction <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> Support
|
||||
' COM+ <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ڿ<EFBFBD><DABF><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>. Default => " "(space)
|
||||
' JIT Activation <20><><EFBFBD><EFBFBD>
|
||||
' ClassInterface <20><> AutoDual ( COM+ Service <20>ֿܼ<DCBC><D6BF><EFBFBD> Interface <20><> <20><> <20><> <20>ֵ<EFBFBD><D6B5><EFBFBD> )
|
||||
'**********************************************************************************
|
||||
|
||||
|
||||
Public Class DBAgent
|
||||
'Connection Field
|
||||
Private m_Connection As SqlConnection
|
||||
|
||||
'Connection <20><> <20><><EFBFBD><EFBFBD><EFBFBD>Ͽ<EFBFBD> Return
|
||||
Private Function MakeConnection(ByVal ConnectionString As String) As SqlConnection
|
||||
Dim sqlConn As SqlConnection
|
||||
|
||||
Try
|
||||
sqlConn = New SqlConnection(ConnectionString)
|
||||
Catch Ex As Exception
|
||||
'ErrorUtil.WriteExceptionIntoEventLog(Ex)
|
||||
Ex.ToString()
|
||||
End Try
|
||||
Return sqlConn
|
||||
End Function
|
||||
|
||||
|
||||
'Connection String Property
|
||||
Property ConnectionString() As String
|
||||
Set(ByVal Value As String)
|
||||
m_Connection = MakeConnection(Value)
|
||||
End Set
|
||||
Get
|
||||
If m_Connection Is Nothing Then
|
||||
Return GetConnection().ConnectionString
|
||||
Else
|
||||
Return m_Connection.ConnectionString
|
||||
End If
|
||||
End Get
|
||||
End Property
|
||||
|
||||
|
||||
'************************************************************************************
|
||||
' Query <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20>Բ<EFBFBD>, <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>̺<EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>ͼ<EFBFBD><CDBC><EFBFBD> <20>Ķ<EFBFBD><C4B6><EFBFBD><EFBFBD>ͷ<EFBFBD> <20>Ѱ<EFBFBD>,
|
||||
' <20><><EFBFBD><EFBFBD><EFBFBD>ͼ¿<CDBC> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> ä<><C3A4><EFBFBD><EFBFBD>
|
||||
'************************************************************************************
|
||||
|
||||
Public Overloads Function FillDataSet(ByVal strQuery As String, ByVal strAlias As String, ByRef dsDataSet As DataSet) As DataSet
|
||||
Dim sqlAdapter As SqlDataAdapter = New SqlDataAdapter(strQuery, GetConnection())
|
||||
Try
|
||||
sqlAdapter.Fill(dsDataSet, strAlias)
|
||||
Catch Ex As Exception
|
||||
ErrorUtil.WriteExceptionIntoEventLog(Ex)
|
||||
End Try
|
||||
|
||||
Return dsDataSet
|
||||
End Function
|
||||
|
||||
'************************************************************************************
|
||||
' Query <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20>Բ<EFBFBD>, <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>̺<EFBFBD><CCBA><EFBFBD><EFBFBD><EFBFBD> <20>ѱ<EFBFBD><D1B1><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>ͼ<EFBFBD><CDBC><EFBFBD> <20><><EFBFBD><EFBFBD>(Untyped) <20>ǵ<EFBFBD><C7B5><EFBFBD><EFBFBD><EFBFBD>.
|
||||
'************************************************************************************
|
||||
Public Overloads Function FillDataSet(ByVal strQuery As String, ByVal strAlias As String) As DataSet
|
||||
Dim sqlAdapter As SqlDataAdapter = New SqlDataAdapter(strQuery, GetConnection())
|
||||
Dim oDs As New DataSet()
|
||||
Try
|
||||
sqlAdapter.Fill(oDs, strAlias)
|
||||
Catch Ex As Exception
|
||||
ErrorUtil.WriteExceptionIntoEventLog(Ex)
|
||||
End Try
|
||||
|
||||
Return oDs
|
||||
End Function
|
||||
|
||||
'**************************************************************************************************
|
||||
' SP<53≯<EFBFBD><CCB8><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>ͼ<EFBFBD> <20><EFBFBD><D7B8><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> ä<><C3A4> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>̺<EFBFBD><CCBA><EFBFBD><EFBFBD><EFBFBD> <20>Ķ<EFBFBD><C4B6><EFBFBD><EFBFBD>͵<EFBFBD><CDB5><EFBFBD> <20>ѱ<EFBFBD><D1B1><EFBFBD>(clsParam<61><6D>ü),
|
||||
' <20>̿<EFBFBD> <20>ش<EFBFBD><D8B4>ϴ<EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>ͼ¿<CDBC> ä<><C3A4> <20>ǵ<EFBFBD><C7B5><EFBFBD><EFBFBD><EFBFBD>.
|
||||
'**************************************************************************************************
|
||||
Public Overloads Function FillDataSet(ByVal SPName As String, ByRef dsDataSet As DataSet, ByVal strAlias As String, ByVal ParamArray objParams() As clsParam) As DataSet
|
||||
Dim sqlComm As SqlCommand = New SqlCommand(SPName, GetConnection())
|
||||
Dim oEachParams As clsParam
|
||||
Dim SqlAdapter As SqlDataAdapter = New SqlDataAdapter()
|
||||
|
||||
Try
|
||||
sqlComm.CommandType = CommandType.StoredProcedure
|
||||
sqlComm.CommandText = SPName
|
||||
|
||||
For Each oEachParams In objParams
|
||||
sqlComm.Parameters.Add(MakeParameter(oEachParams))
|
||||
Next
|
||||
|
||||
SqlAdapter.SelectCommand = sqlComm
|
||||
SqlAdapter.Fill(dsDataSet, strAlias)
|
||||
|
||||
Catch Ex As Exception
|
||||
ErrorUtil.WriteExceptionIntoEventLog(Ex)
|
||||
End Try
|
||||
|
||||
Return dsDataSet
|
||||
End Function
|
||||
|
||||
'**************************************************************************************************
|
||||
' SP<53≯<EFBFBD><CCB8><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> ä<><C3A4> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>̺<EFBFBD><CCBA><EFBFBD><EFBFBD><EFBFBD> <20>Ķ<EFBFBD><C4B6><EFBFBD><EFBFBD>͵<EFBFBD><CDB5><EFBFBD> <20>ѱ<EFBFBD><D1B1><EFBFBD>(clsParam<61><6D>ü),
|
||||
' <20>̿<EFBFBD> <20>ش<EFBFBD><D8B4>ϴ<EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>ͼ<EFBFBD><CDBC><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>Ͽ<EFBFBD> <20><> <20><><EFBFBD><EFBFBD> ä<><C3A4> <20><><EFBFBD><EFBFBD><EFBFBD>ͼ<EFBFBD><CDBC><EFBFBD> <20>ǵ<EFBFBD><C7B5><EFBFBD><EFBFBD><EFBFBD>.
|
||||
'**************************************************************************************************
|
||||
Public Overloads Function FillDataSet(ByVal SPName As String, ByVal strAlias As String, ByVal ParamArray objParams() As clsParam) As DataSet
|
||||
Dim sqlComm As SqlCommand = New SqlCommand(SPName, GetConnection())
|
||||
Dim oEachParams As clsParam
|
||||
Dim SqlAdapter As SqlDataAdapter = New SqlDataAdapter()
|
||||
Dim oDs As New DataSet()
|
||||
|
||||
Try
|
||||
sqlComm.CommandType = CommandType.StoredProcedure
|
||||
sqlComm.CommandText = SPName
|
||||
|
||||
For Each oEachParams In objParams
|
||||
sqlComm.Parameters.Add(MakeParameter(oEachParams))
|
||||
Next
|
||||
|
||||
SqlAdapter.SelectCommand = sqlComm
|
||||
SqlAdapter.Fill(oDs, strAlias)
|
||||
|
||||
Catch Ex As Exception
|
||||
ErrorUtil.WriteExceptionIntoEventLog(Ex)
|
||||
End Try
|
||||
Return oDs
|
||||
End Function
|
||||
|
||||
'**************************************************************************************************
|
||||
' Insert / update /delete Query <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> SP <20><> ȣ<><C8A3><EFBFBD>Ҷ<EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>ϸ<EFBFBD>, SP <20><><EFBFBD><EFBFBD> <20>䱸<EFBFBD>Ǵ<EFBFBD> <20>Ķ<EFBFBD><C4B6><EFBFBD><EFBFBD>͵<EFBFBD>(clsParam <20><>ü)
|
||||
' <20><> <20>Ķ<EFBFBD><C4B6><EFBFBD><EFBFBD>ͷ<EFBFBD> <20>ѱ<EFBFBD><D1B1><EFBFBD> SP<53><50> ȣ<><C8A3><EFBFBD>Ǹ<EFBFBD> <20>̿<EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD>ڵ<EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20>ǵ<EFBFBD><C7B5><EFBFBD><EFBFBD><EFBFBD>.
|
||||
'**************************************************************************************************
|
||||
Public Overloads Function ExecuteSpNonQuery(ByVal SPName As String, ByVal ParamArray objParams() As clsParam) As Integer
|
||||
Dim sqlComm As SqlCommand = New SqlCommand(SPName, GetConnection())
|
||||
Dim oEachParams As clsParam
|
||||
Dim intRet As Integer
|
||||
Try
|
||||
sqlComm.CommandType = CommandType.StoredProcedure
|
||||
sqlComm.CommandText = SPName
|
||||
|
||||
For Each oEachParams In objParams
|
||||
sqlComm.Parameters.Add(MakeParameter(oEachParams))
|
||||
Next
|
||||
|
||||
sqlComm.Connection.Open()
|
||||
intRet = sqlComm.ExecuteNonQuery()
|
||||
If Not (sqlComm.Connection.State = ConnectionState.Closed) Then sqlComm.Connection.Close()
|
||||
Return intRet
|
||||
Catch Ex As Exception
|
||||
ErrorUtil.WriteExceptionIntoEventLog(Ex)
|
||||
Return 0
|
||||
End Try
|
||||
End Function
|
||||
|
||||
|
||||
'**************************************************************************************************
|
||||
' Insert / update /delete Query <20><><EFBFBD><EFBFBD> ȣ<><C8A3><EFBFBD>Ҷ<EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>ϸ<EFBFBD> <20>̿<EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD>ڵ<EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20>ǵ<EFBFBD><C7B5><EFBFBD><EFBFBD><EFBFBD>.
|
||||
'**************************************************************************************************
|
||||
Public Overloads Function ExecuteNonQuery(ByVal strQuery As String) As Integer
|
||||
Dim sqlComm As SqlCommand = New SqlCommand(strQuery, GetConnection())
|
||||
Dim oEachParams As clsParam
|
||||
Dim intRet As Integer
|
||||
Try
|
||||
sqlComm.CommandType = CommandType.Text
|
||||
sqlComm.CommandText = strQuery
|
||||
sqlComm.Connection.Open()
|
||||
intRet = sqlComm.ExecuteNonQuery()
|
||||
If Not (sqlComm.Connection.State = ConnectionState.Closed) Then sqlComm.Connection.Close()
|
||||
Return intRet
|
||||
Catch Ex As Exception
|
||||
ErrorUtil.WriteExceptionIntoEventLog(Ex)
|
||||
Return 0
|
||||
End Try
|
||||
End Function
|
||||
|
||||
|
||||
|
||||
'************************************************************************************
|
||||
' SP <20><><EFBFBD><EFBFBD> clsParam Object<63><74> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20>Ķ<EFBFBD><C4B6><EFBFBD><EFBFBD><EFBFBD> <20><>ü<EFBFBD><C3BC> <20><><EFBFBD>Ͽ<EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>,
|
||||
' DataReader <20><> <20>ǵ<EFBFBD><C7B5><EFBFBD><EFBFBD><EFBFBD>.
|
||||
'************************************************************************************
|
||||
Public Overloads Function ReturnDataReader(ByVal SPName As String, ByVal ParamArray objParams() As clsParam) As SqlDataReader
|
||||
Dim sqlComm As SqlCommand = New SqlCommand(SPName, GetConnection())
|
||||
Dim oEachParams As clsParam
|
||||
Dim sqlReader As SqlDataReader
|
||||
Try
|
||||
sqlComm.CommandType = CommandType.StoredProcedure
|
||||
sqlComm.CommandText = SPName
|
||||
|
||||
For Each oEachParams In objParams
|
||||
sqlComm.Parameters.Add(MakeParameter(oEachParams))
|
||||
Next
|
||||
|
||||
sqlComm.Connection.Open()
|
||||
'DataReader <20><>ü<EFBFBD><C3BC> close <20>ϸ<EFBFBD> <20>̿<EFBFBD> <20>ش<EFBFBD><D8B4>ϴ<EFBFBD> Connection <20><> <20>ڵ<EFBFBD><DAB5><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
||||
sqlReader = sqlComm.ExecuteReader(CommandBehavior.CloseConnection)
|
||||
Catch Ex As Exception
|
||||
ErrorUtil.WriteExceptionIntoEventLog(Ex)
|
||||
End Try
|
||||
Return sqlReader
|
||||
End Function
|
||||
|
||||
'************************************************************************************
|
||||
' Sql Query <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>Ͽ<EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> DataReader <20><>ü<EFBFBD><C3BC> <20><><EFBFBD><EFBFBD> <20>ǵ<EFBFBD><C7B5><EFBFBD><EFBFBD><EFBFBD>.
|
||||
'************************************************************************************
|
||||
Public Overloads Function ReturnDataReader(ByVal strQuery As String) As SqlDataReader
|
||||
|
||||
Dim sqlComm As SqlCommand = New SqlCommand()
|
||||
Dim sqlReader As SqlDataReader
|
||||
Try
|
||||
sqlComm.Connection = GetConnection()
|
||||
sqlComm.CommandType = CommandType.Text
|
||||
sqlComm.CommandText = strQuery
|
||||
|
||||
sqlComm.Connection.Open()
|
||||
'DataReader <20><>ü<EFBFBD><C3BC> close <20>ϸ<EFBFBD> <20>̿<EFBFBD> <20>ش<EFBFBD><D8B4>ϴ<EFBFBD> Connection <20><> <20>ڵ<EFBFBD><DAB5><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
||||
sqlReader = sqlComm.ExecuteReader(CommandBehavior.CloseConnection)
|
||||
Catch Ex As Exception
|
||||
ErrorUtil.WriteExceptionIntoEventLog(Ex)
|
||||
End Try
|
||||
Return sqlReader
|
||||
End Function
|
||||
|
||||
'************************************************************************************
|
||||
' SP <20><><EFBFBD><EFBFBD> clsParam Object<63><74> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20>Ķ<EFBFBD><C4B6><EFBFBD><EFBFBD><EFBFBD> <20><>ü<EFBFBD><C3BC> <20><><EFBFBD>Ͽ<EFBFBD> SP<53><50> <20><><EFBFBD><EFBFBD>,
|
||||
' <20>Ķ<EFBFBD><C4B6><EFBFBD><EFBFBD><EFBFBD> <20>÷<EFBFBD><C3B7><EFBFBD><EFBFBD><EFBFBD> <20>ǵ<EFBFBD><C7B5><EFBFBD><EFBFBD><EFBFBD>(Return Value).
|
||||
'************************************************************************************
|
||||
Public Function ReturnParameter(ByVal SPName As String, ByVal ParamArray objParams() As clsParam) As SqlParameterCollection
|
||||
|
||||
Dim sqlComm As SqlCommand = New SqlCommand(SPName, GetConnection())
|
||||
Dim oEachParams As clsParam
|
||||
Try
|
||||
sqlComm.CommandType = CommandType.StoredProcedure
|
||||
sqlComm.CommandText = SPName
|
||||
If Not (objParams Is Nothing) Then
|
||||
For Each oEachParams In objParams
|
||||
sqlComm.Parameters.Add(MakeParameter(oEachParams))
|
||||
Next
|
||||
End If
|
||||
|
||||
sqlComm.Connection.Open()
|
||||
sqlComm.ExecuteNonQuery()
|
||||
If Not (sqlComm.Connection.State = ConnectionState.Closed) Then sqlComm.Connection.Close()
|
||||
Catch Ex As Exception
|
||||
ErrorUtil.WriteExceptionIntoEventLog(Ex)
|
||||
End Try
|
||||
Return sqlComm.Parameters
|
||||
End Function
|
||||
|
||||
|
||||
'************************************************************************************
|
||||
' SP <20><><EFBFBD><EFBFBD> clsParam Object<63><74> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20>Ķ<EFBFBD><C4B6><EFBFBD><EFBFBD><EFBFBD> <20><>ü<EFBFBD><C3BC> <20><><EFBFBD>Ͽ<EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>,
|
||||
' Scalar <20><><EFBFBD><EFBFBD> <20>ǵ<EFBFBD><C7B5><EFBFBD><EFBFBD><EFBFBD>.
|
||||
'************************************************************************************
|
||||
Public Overloads Function ReturnScalarValue(ByVal SPName As String, ByVal ParamArray objParams() As clsParam) As Object
|
||||
Dim sqlComm As SqlCommand = New SqlCommand(SPName, GetConnection())
|
||||
Dim oEachParams As clsParam
|
||||
Dim objRet As Object
|
||||
Try
|
||||
sqlComm.CommandType = CommandType.StoredProcedure
|
||||
sqlComm.CommandText = SPName
|
||||
If Not (objParams Is Nothing) Then
|
||||
For Each oEachParams In objParams
|
||||
sqlComm.Parameters.Add(MakeParameter(oEachParams))
|
||||
Next
|
||||
End If
|
||||
sqlComm.Connection.Open()
|
||||
objRet = sqlComm.ExecuteScalar()
|
||||
If Not (sqlComm.Connection.State = ConnectionState.Closed) Then sqlComm.Connection.Close()
|
||||
Catch Ex As Exception
|
||||
ErrorUtil.WriteExceptionIntoEventLog(Ex)
|
||||
End Try
|
||||
Return objRet
|
||||
End Function
|
||||
|
||||
|
||||
Public Overloads Function ReturnScalarValue(ByVal strQuery As String) As Object
|
||||
'************************************************************************************
|
||||
' Query <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD>Ͽ<EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>,Scalar <20><><EFBFBD><EFBFBD> <20>ǵ<EFBFBD><C7B5><EFBFBD><EFBFBD><EFBFBD>.
|
||||
'************************************************************************************
|
||||
Dim sqlComm As SqlCommand = New SqlCommand(strQuery, GetConnection())
|
||||
Dim objRet As Object
|
||||
Try
|
||||
sqlComm.CommandType = CommandType.Text
|
||||
sqlComm.Connection.Open()
|
||||
objRet = sqlComm.ExecuteScalar()
|
||||
If Not (sqlComm.Connection.State = ConnectionState.Closed) Then sqlComm.Connection.Close()
|
||||
Catch Ex As Exception
|
||||
ErrorUtil.WriteExceptionIntoEventLog(Ex)
|
||||
End Try
|
||||
Return objRet
|
||||
End Function
|
||||
|
||||
'Connection <20><>ü<EFBFBD><C3BC> <20>ǵ<EFBFBD><C7B5><EFBFBD>, m_Connection <20><> <20><><EFBFBD><EFBFBD><EFBFBD>Ǿ<EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> m_Connection<6F><6E> Connection <20><>ü<EFBFBD><C3BC>
|
||||
'<27><><EFBFBD><EFBFBD><EFBFBD>Ͽ<EFBFBD> Assign.
|
||||
Private Function GetConnection() As SqlConnection
|
||||
If m_Connection Is Nothing Then
|
||||
m_Connection = MakeConnection(System.Configuration.ConfigurationSettings.AppSettings("ConnectionString"))
|
||||
End If
|
||||
Return m_Connection
|
||||
End Function
|
||||
|
||||
'clsParam <20><>ü<EFBFBD><C3BC> <20><><EFBFBD>Ͽ<EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20>Ķ<EFBFBD><C4B6><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20>Ͽ<EFBFBD> SqlParameter <20><>ü<EFBFBD><C3BC> <20><><EFBFBD><EFBFBD><EFBFBD>Ѵ<EFBFBD>.
|
||||
Private Function MakeParameter(ByVal oParams As clsParam) As SqlParameter
|
||||
Dim MakedParameter As SqlParameter = New SqlParameter()
|
||||
With MakedParameter
|
||||
.ParameterName = oParams.ParamName
|
||||
.SqlDbType = oParams.ParamType
|
||||
.Size = oParams.ParamSize
|
||||
.Value = oParams.ParamValue
|
||||
.Direction = oParams.ParamDirection
|
||||
.Precision = oParams.ParamPrecision
|
||||
.Scale = oParams.ParamScale
|
||||
End With
|
||||
Return MakedParameter
|
||||
End Function
|
||||
End Class
|
||||
|
||||
|
||||
'***********************************************************
|
||||
' SqlCommand <20><> Parameter <20><>ü <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD>Ƴ<EFBFBD><C6B3><EFBFBD> <20><><EFBFBD><EFBFBD> Ŭ<><C5AC><EFBFBD><EFBFBD>
|
||||
'***********************************************************
|
||||
Public Class clsParam
|
||||
Private m_ParamName As String '<27>Ķ<EFBFBD><C4B6><EFBFBD><EFBFBD><EFBFBD> <20><>
|
||||
Private m_ParamType As SqlDbType '<27>Ķ<EFBFBD><C4B6><EFBFBD><EFBFBD><EFBFBD> <20><>Ÿ<EFBFBD><C5B8>
|
||||
Private m_ParamSize As Integer '<27>Ķ<EFBFBD><C4B6><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
||||
Private m_ParamValue As Object '<27>Ķ<EFBFBD><C4B6><EFBFBD><EFBFBD><EFBFBD> <20><>
|
||||
Private m_ParamDirection As ParameterDirection ' <20>Ķ<EFBFBD><C4B6><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>(input / output)
|
||||
Private m_ParamPrecision As Byte 'Precision
|
||||
Private m_ParamScale As Byte 'Scale
|
||||
|
||||
ReadOnly Property ParamName() As String
|
||||
Get
|
||||
Return m_ParamName
|
||||
End Get
|
||||
End Property
|
||||
|
||||
ReadOnly Property ParamType() As SqlDbType
|
||||
Get
|
||||
Return m_ParamType
|
||||
End Get
|
||||
End Property
|
||||
|
||||
ReadOnly Property ParamSize() As Integer
|
||||
Get
|
||||
Return m_ParamSize
|
||||
End Get
|
||||
End Property
|
||||
|
||||
ReadOnly Property ParamValue() As Object
|
||||
Get
|
||||
Return m_ParamValue
|
||||
End Get
|
||||
End Property
|
||||
|
||||
ReadOnly Property ParamDirection() As ParameterDirection
|
||||
Get
|
||||
Return m_ParamDirection
|
||||
End Get
|
||||
End Property
|
||||
|
||||
ReadOnly Property ParamScale() As Byte
|
||||
Get
|
||||
Return m_ParamPrecision
|
||||
End Get
|
||||
End Property
|
||||
|
||||
ReadOnly Property ParamPrecision() As Byte
|
||||
Get
|
||||
Return m_ParamScale
|
||||
End Get
|
||||
End Property
|
||||
|
||||
|
||||
'Scale <20><> Precision <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20>ʿ<EFBFBD><CABF><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>
|
||||
Public Sub New(ByVal ParamName As String, ByVal ParamType As SqlDbType, ByVal ParamSize As Integer, _
|
||||
ByVal ParamValue As Object, ByVal ParamDirection As ParameterDirection)
|
||||
Me.m_ParamName = ParamName
|
||||
Me.m_ParamType = ParamType
|
||||
Me.m_ParamSize = ParamSize
|
||||
Me.m_ParamValue = ParamValue
|
||||
Me.m_ParamDirection = ParamDirection
|
||||
Me.m_ParamScale = 0
|
||||
Me.m_ParamPrecision = 0
|
||||
End Sub
|
||||
|
||||
'Scale <20><> Presicion <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20>ʿ<EFBFBD><CABF><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>, <20><><EFBFBD><EFBFBD> <20>Ķ<EFBFBD><C4B6><EFBFBD><EFBFBD>Ͱ<EFBFBD> Input Ÿ<><C5B8><EFBFBD>϶<EFBFBD> <20><><EFBFBD><EFBFBD>
|
||||
Public Sub New(ByVal ParamName As String, ByVal ParamType As SqlDbType, ByVal ParamSize As Integer, _
|
||||
ByVal ParamValue As Object)
|
||||
Me.m_ParamName = ParamName
|
||||
Me.m_ParamType = ParamType
|
||||
Me.m_ParamSize = ParamSize
|
||||
Me.m_ParamValue = ParamValue
|
||||
Me.m_ParamDirection = ParameterDirection.Input
|
||||
Me.m_ParamScale = 0
|
||||
Me.m_ParamPrecision = 0
|
||||
End Sub
|
||||
|
||||
'<27><><EFBFBD><EFBFBD> <20>Ķ<EFBFBD><C4B6><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20>Է<EFBFBD><D4B7>ؾ<EFBFBD> <20><> <20><><EFBFBD><EFBFBD>
|
||||
Public Sub New(ByVal ParamName As String, ByVal ParamType As SqlDbType, ByVal ParamSize As Integer, _
|
||||
ByVal ParamValue As Object, ByVal ParamScale As Byte, ByVal ParamPrecision As Byte)
|
||||
Me.m_ParamName = ParamName
|
||||
Me.m_ParamType = ParamType
|
||||
Me.m_ParamSize = ParamSize
|
||||
Me.m_ParamValue = ParamValue
|
||||
Me.m_ParamDirection = ParameterDirection.Input
|
||||
Me.m_ParamScale = ParamScale
|
||||
Me.m_ParamPrecision = ParamPrecision
|
||||
End Sub
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
End Class
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
475
Server/ToolProject/RCMS_Tool/DBConn.vb
Normal file
475
Server/ToolProject/RCMS_Tool/DBConn.vb
Normal file
@@ -0,0 +1,475 @@
|
||||
|
||||
Imports System.Net.Sockets
|
||||
Imports System.IO
|
||||
Imports System.Text
|
||||
|
||||
Module DBConn
|
||||
|
||||
''<27><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>ͺ<EFBFBD><CDBA>̽<EFBFBD><CCBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>Ҷ<EFBFBD> <20><><EFBFBD><EFBFBD>.
|
||||
'Public RYL_Conn As String = "server=192.168.1.55;database=Gama;uid=sa;pwd=1234"
|
||||
'Public IDBAgent As New DBAgent()
|
||||
|
||||
'<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>
|
||||
Public AdminKind As String
|
||||
Public IClientSocket As New ClientSocket()
|
||||
Public ds As New DataSet()
|
||||
|
||||
'<27><><EFBFBD><EFBFBD><EFBFBD>۹迭<DBB9><E8BFAD><EFBFBD><EFBFBD>
|
||||
Public ItemArray() As Byte
|
||||
|
||||
'TableIndex
|
||||
Public Const AdminTableIndex As Int32 = 0
|
||||
Public Const CharItemListIndex As Int32 = 1
|
||||
Public Const CharRestraintIndex As Int32 = 2
|
||||
Public Const CurrentUserIndex As Int32 = 3
|
||||
Public Const LastUserIndex As Int32 = 4
|
||||
|
||||
'<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ʈ
|
||||
Public Const Test As String = "<EFBFBD><EFBFBD>Ʈ"
|
||||
Public Const Solpis As String = "<EFBFBD><EFBFBD><EFBFBD>ǽ<EFBFBD>Ƽ<EFBFBD><EFBFBD>"
|
||||
Public Const Karte As String = "ī<EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ʈ"
|
||||
Public Const Iranshya As String = "<EFBFBD>̶<EFBFBD><EFBFBD><EFBFBD>"
|
||||
Public Const Hiland As String = "<EFBFBD><EFBFBD><EFBFBD>̷<EFBFBD><EFBFBD><EFBFBD>"
|
||||
Public Const Aldia As String = "<EFBFBD>˵<EFBFBD><EFBFBD><EFBFBD>"
|
||||
Public Const Yunite As String = "<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"
|
||||
|
||||
'<27><><EFBFBD><EFBFBD><EFBFBD>ڵ<EFBFBD>
|
||||
Public Const Code As Integer = 949
|
||||
|
||||
Public SERVER As String
|
||||
Public CHARNAME As String
|
||||
|
||||
'CharItemFormType = 1 --edit
|
||||
'CharItemFormType = 0 --create
|
||||
Public CharItemFormType As Boolean
|
||||
|
||||
Private Structure myData
|
||||
Dim ColumnName As String
|
||||
Dim ReadOnlyType As Boolean
|
||||
End Structure
|
||||
|
||||
'<27><EFBFBD><EEBFB5> <20><><EFBFBD><EFBFBD>
|
||||
Public Structure ToolAdminRight
|
||||
Dim charEdit As Boolean
|
||||
Dim charLocation As Boolean
|
||||
Dim charseeItem As Boolean
|
||||
Dim ItemCreate As Boolean
|
||||
Dim ItemEdit As Boolean
|
||||
Dim ItemDel As Boolean
|
||||
Dim RestraintReg As Boolean
|
||||
Dim RestraintRelease As Boolean
|
||||
Dim currentUserLogin As Boolean
|
||||
Dim lastUserLogin As Boolean
|
||||
Dim DoingLogout As Boolean
|
||||
End Structure
|
||||
|
||||
|
||||
Public Sub Initialize()
|
||||
|
||||
MakeAdminTable()
|
||||
MakeCharItemTable()
|
||||
MakeCharRestraintTable()
|
||||
MakeCurrentUserTable()
|
||||
MakeLastUserTable()
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
'<27><><EFBFBD>̺<EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
||||
Private Sub MakeAdminTable()
|
||||
|
||||
Dim myAdminTable As New DataTable("AdminSearch")
|
||||
Dim myDataColumn As New DataColumn()
|
||||
|
||||
myDataColumn.DataType = System.Type.GetType("System.String")
|
||||
myDataColumn.ColumnName = "strAdminID"
|
||||
myDataColumn.ReadOnly = True
|
||||
myAdminTable.Columns.Add(myDataColumn)
|
||||
|
||||
myDataColumn = New DataColumn()
|
||||
myDataColumn.DataType = System.Type.GetType("System.String")
|
||||
myDataColumn.ColumnName = "strPasswd"
|
||||
myDataColumn.ReadOnly = True
|
||||
myAdminTable.Columns.Add(myDataColumn)
|
||||
|
||||
myDataColumn = New DataColumn()
|
||||
myDataColumn.DataType = System.Type.GetType("System.String")
|
||||
myDataColumn.ColumnName = "strLevel"
|
||||
myDataColumn.ReadOnly = True
|
||||
myAdminTable.Columns.Add(myDataColumn)
|
||||
|
||||
myDataColumn = New DataColumn()
|
||||
myDataColumn.DataType = System.Type.GetType("System.String")
|
||||
myDataColumn.ColumnName = "strName"
|
||||
myDataColumn.ReadOnly = True
|
||||
myAdminTable.Columns.Add(myDataColumn)
|
||||
|
||||
myDataColumn = New DataColumn()
|
||||
myDataColumn.DataType = System.Type.GetType("System.String")
|
||||
myDataColumn.ColumnName = "strIp"
|
||||
myDataColumn.ReadOnly = True
|
||||
myAdminTable.Columns.Add(myDataColumn)
|
||||
|
||||
myDataColumn = New DataColumn()
|
||||
myDataColumn.DataType = System.Type.GetType("System.String")
|
||||
myDataColumn.ColumnName = "dateRegit"
|
||||
myDataColumn.ReadOnly = True
|
||||
myAdminTable.Columns.Add(myDataColumn)
|
||||
|
||||
ds.Tables.Add(myAdminTable)
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
Private Sub MakeCharItemTable()
|
||||
|
||||
Dim myCharItemTable As New DataTable("CharItemList")
|
||||
Dim myDataColumn As New DataColumn()
|
||||
|
||||
Dim ColumnName(59) As myData
|
||||
|
||||
ColumnName(0).ColumnName = "ItemIndex"
|
||||
ColumnName(0).ReadOnlyType = True
|
||||
ColumnName(1).ColumnName = "ItemTypeID"
|
||||
ColumnName(1).ReadOnlyType = True
|
||||
ColumnName(2).ColumnName = "ItemName"
|
||||
ColumnName(2).ReadOnlyType = True
|
||||
ColumnName(3).ColumnName = "ItemType"
|
||||
ColumnName(3).ReadOnlyType = True
|
||||
ColumnName(4).ColumnName = "ItemWhere"
|
||||
ColumnName(4).ReadOnlyType = True
|
||||
ColumnName(5).ColumnName = "ItemX"
|
||||
ColumnName(5).ReadOnlyType = True
|
||||
ColumnName(6).ColumnName = "ItemY"
|
||||
ColumnName(6).ReadOnlyType = True
|
||||
ColumnName(7).ColumnName = "ItemZ"
|
||||
ColumnName(7).ReadOnlyType = True
|
||||
|
||||
ColumnName(8).ColumnName = "SizeX"
|
||||
ColumnName(8).ReadOnlyType = True
|
||||
ColumnName(9).ColumnName = "SizeY"
|
||||
ColumnName(9).ReadOnlyType = True
|
||||
ColumnName(10).ColumnName = "Amount"
|
||||
ColumnName(10).ReadOnlyType = True
|
||||
|
||||
ColumnName(11).ColumnName = "WhetherAmount"
|
||||
ColumnName(11).ReadOnlyType = True
|
||||
ColumnName(12).ColumnName = "RuneSocket"
|
||||
ColumnName(12).ReadOnlyType = True
|
||||
ColumnName(13).ColumnName = "MaxDurability"
|
||||
ColumnName(13).ReadOnlyType = True
|
||||
|
||||
ColumnName(14).ColumnName = "CurSocketNum"
|
||||
ColumnName(14).ReadOnlyType = True
|
||||
ColumnName(15).ColumnName = "MaxSocketNum"
|
||||
ColumnName(15).ReadOnlyType = True
|
||||
ColumnName(16).ColumnName = "MaterialType"
|
||||
ColumnName(16).ReadOnlyType = True
|
||||
|
||||
Dim nCount As Int32
|
||||
For nCount = 17 To 24
|
||||
ColumnName(nCount).ColumnName = "Socket" + (nCount - 17).ToString
|
||||
ColumnName(nCount).ReadOnlyType = True
|
||||
Next
|
||||
|
||||
For nCount = 25 To 59
|
||||
ColumnName(nCount).ColumnName = "Attribute" + (nCount - 25).ToString
|
||||
ColumnName(nCount).ReadOnlyType = True
|
||||
Next
|
||||
|
||||
For nCount = 0 To 59
|
||||
myDataColumn = New DataColumn()
|
||||
myDataColumn.DataType = System.Type.GetType("System.String")
|
||||
myDataColumn.ColumnName = ColumnName(nCount).ColumnName
|
||||
myDataColumn.ReadOnly = ColumnName(nCount).ReadOnlyType
|
||||
myCharItemTable.Columns.Add(myDataColumn)
|
||||
Next
|
||||
|
||||
ds.Tables.Add(myCharItemTable)
|
||||
|
||||
End Sub
|
||||
|
||||
'<27><><EFBFBD>̺<EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
||||
Private Sub MakeCharRestraintTable()
|
||||
|
||||
Dim myCharRestraintTable As New DataTable("CharRestraint")
|
||||
Dim myDataColumn As New DataColumn()
|
||||
|
||||
' Create first column and add to the DataTable.
|
||||
myDataColumn = New DataColumn()
|
||||
myDataColumn.DataType = System.Type.GetType("System.String")
|
||||
myDataColumn.ColumnName = "UID"
|
||||
myDataColumn.ReadOnly = True
|
||||
'myDataColumn.Unique = True
|
||||
' Add the column to the DataColumnCollection.
|
||||
myCharRestraintTable.Columns.Add(myDataColumn)
|
||||
|
||||
myDataColumn = New DataColumn()
|
||||
myDataColumn.DataType = System.Type.GetType("System.String")
|
||||
myDataColumn.ColumnName = "strClientID"
|
||||
myDataColumn.ReadOnly = True
|
||||
'myDataColumn.Unique = True
|
||||
' Add the column to the DataColumnCollection.
|
||||
myCharRestraintTable.Columns.Add(myDataColumn)
|
||||
|
||||
myDataColumn = New DataColumn()
|
||||
myDataColumn.DataType = System.Type.GetType("System.String")
|
||||
myDataColumn.ColumnName = "strCharacterID"
|
||||
myDataColumn.ReadOnly = True
|
||||
'myDataColumn.Unique = True
|
||||
' Add the column to the DataColumnCollection.
|
||||
myCharRestraintTable.Columns.Add(myDataColumn)
|
||||
|
||||
myDataColumn = New DataColumn()
|
||||
myDataColumn.DataType = System.Type.GetType("System.String")
|
||||
myDataColumn.ColumnName = "BlockType"
|
||||
myDataColumn.ReadOnly = True
|
||||
'myDataColumn.Unique = True
|
||||
' Add the column to the DataColumnCollection.
|
||||
myCharRestraintTable.Columns.Add(myDataColumn)
|
||||
|
||||
myDataColumn = New DataColumn()
|
||||
myDataColumn.DataType = System.Type.GetType("System.String")
|
||||
myDataColumn.ColumnName = "BlockKind"
|
||||
myDataColumn.ReadOnly = True
|
||||
'myDataColumn.Unique = True
|
||||
' Add the column to the DataColumnCollection.
|
||||
myCharRestraintTable.Columns.Add(myDataColumn)
|
||||
|
||||
myDataColumn = New DataColumn()
|
||||
myDataColumn.DataType = System.Type.GetType("System.String")
|
||||
myDataColumn.ColumnName = "Blocked"
|
||||
myDataColumn.ReadOnly = True
|
||||
'myDataColumn.Unique = True
|
||||
' Add the column to the DataColumnCollection.
|
||||
myCharRestraintTable.Columns.Add(myDataColumn)
|
||||
|
||||
myDataColumn = New DataColumn()
|
||||
myDataColumn.DataType = System.Type.GetType("System.String")
|
||||
myDataColumn.ColumnName = "EndTime"
|
||||
myDataColumn.ReadOnly = True
|
||||
'myDataColumn.Unique = True
|
||||
' Add the column to the DataColumnCollection.
|
||||
myCharRestraintTable.Columns.Add(myDataColumn)
|
||||
|
||||
myDataColumn = New DataColumn()
|
||||
myDataColumn.DataType = System.Type.GetType("System.String")
|
||||
myDataColumn.ColumnName = "adminid"
|
||||
myDataColumn.ReadOnly = True
|
||||
|
||||
myCharRestraintTable.Columns.Add(myDataColumn)
|
||||
|
||||
myDataColumn = New DataColumn()
|
||||
myDataColumn.DataType = System.Type.GetType("System.String")
|
||||
myDataColumn.ColumnName = "discription"
|
||||
myDataColumn.ReadOnly = True
|
||||
myCharRestraintTable.Columns.Add(myDataColumn)
|
||||
|
||||
ds.Tables.Add(myCharRestraintTable)
|
||||
End Sub
|
||||
|
||||
'<27><><EFBFBD>̺<EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
||||
Private Sub MakeCurrentUserTable()
|
||||
|
||||
Dim myCurrentUserTable As New DataTable("CurrentUser")
|
||||
Dim myDataColumn As New DataColumn()
|
||||
|
||||
myDataColumn = New DataColumn()
|
||||
myDataColumn.DataType = System.Type.GetType("System.String")
|
||||
myDataColumn.ColumnName = "strClientID"
|
||||
myDataColumn.ReadOnly = True
|
||||
myCurrentUserTable.Columns.Add(myDataColumn)
|
||||
|
||||
myDataColumn = New DataColumn()
|
||||
myDataColumn.DataType = System.Type.GetType("System.String")
|
||||
myDataColumn.ColumnName = "strIP"
|
||||
myDataColumn.ReadOnly = True
|
||||
myCurrentUserTable.Columns.Add(myDataColumn)
|
||||
|
||||
myDataColumn = New DataColumn()
|
||||
myDataColumn.DataType = System.Type.GetType("System.String")
|
||||
myDataColumn.ColumnName = "intCRMIndex"
|
||||
myDataColumn.ReadOnly = True
|
||||
myCurrentUserTable.Columns.Add(myDataColumn)
|
||||
|
||||
myDataColumn = New DataColumn()
|
||||
myDataColumn.DataType = System.Type.GetType("System.String")
|
||||
myDataColumn.ColumnName = "UID"
|
||||
myDataColumn.ReadOnly = True
|
||||
myCurrentUserTable.Columns.Add(myDataColumn)
|
||||
|
||||
myDataColumn = New DataColumn()
|
||||
myDataColumn.DataType = System.Type.GetType("System.String")
|
||||
myDataColumn.ColumnName = "LoginTime"
|
||||
myDataColumn.ReadOnly = True
|
||||
myCurrentUserTable.Columns.Add(myDataColumn)
|
||||
|
||||
myDataColumn = New DataColumn()
|
||||
myDataColumn.DataType = System.Type.GetType("System.String")
|
||||
myDataColumn.ColumnName = "ServerID"
|
||||
myDataColumn.ReadOnly = True
|
||||
myCurrentUserTable.Columns.Add(myDataColumn)
|
||||
|
||||
myDataColumn = New DataColumn()
|
||||
myDataColumn.DataType = System.Type.GetType("System.String")
|
||||
myDataColumn.ColumnName = "BillType"
|
||||
myDataColumn.ReadOnly = True
|
||||
myCurrentUserTable.Columns.Add(myDataColumn)
|
||||
|
||||
ds.Tables.Add(myCurrentUserTable)
|
||||
End Sub
|
||||
|
||||
|
||||
'<27><><EFBFBD>̺<EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
||||
Private Sub MakeLastUserTable()
|
||||
|
||||
Dim myLastUserTable As New DataTable("LastUser")
|
||||
Dim myDataColumn As New DataColumn()
|
||||
|
||||
myDataColumn = New DataColumn()
|
||||
myDataColumn.DataType = System.Type.GetType("System.String")
|
||||
myDataColumn.ColumnName = "strClientID"
|
||||
'myDataColumn.ColumnName = "<22>Ѱ<EFBFBD><D1B0>Ӱ<EFBFBD><D3B0><EFBFBD>"
|
||||
myDataColumn.ReadOnly = True
|
||||
myLastUserTable.Columns.Add(myDataColumn)
|
||||
|
||||
myDataColumn = New DataColumn()
|
||||
myDataColumn.DataType = System.Type.GetType("System.String")
|
||||
myDataColumn.ColumnName = "strIP"
|
||||
'myDataColumn.ColumnName = "<22><><EFBFBD><EFBFBD>IP"
|
||||
myDataColumn.ReadOnly = True
|
||||
myLastUserTable.Columns.Add(myDataColumn)
|
||||
|
||||
myDataColumn = New DataColumn()
|
||||
myDataColumn.DataType = System.Type.GetType("System.String")
|
||||
myDataColumn.ColumnName = "intCRMIndex"
|
||||
'myDataColumn.ColumnName = "<22>ǽù<C7BD>"
|
||||
myDataColumn.ReadOnly = True
|
||||
myLastUserTable.Columns.Add(myDataColumn)
|
||||
|
||||
myDataColumn = New DataColumn()
|
||||
myDataColumn.DataType = System.Type.GetType("System.String")
|
||||
myDataColumn.ColumnName = "UID"
|
||||
'myDataColumn.ColumnName = "<22><><EFBFBD><EFBFBD><EFBFBD>ε<EFBFBD><CEB5><EFBFBD>"
|
||||
myDataColumn.ReadOnly = True
|
||||
myLastUserTable.Columns.Add(myDataColumn)
|
||||
|
||||
myDataColumn = New DataColumn()
|
||||
myDataColumn.DataType = System.Type.GetType("System.String")
|
||||
myDataColumn.ColumnName = "LoginTime"
|
||||
'myDataColumn.ColumnName = "<22><><EFBFBD>ӽð<D3BD>"
|
||||
myDataColumn.ReadOnly = True
|
||||
myLastUserTable.Columns.Add(myDataColumn)
|
||||
|
||||
myDataColumn = New DataColumn()
|
||||
myDataColumn.DataType = System.Type.GetType("System.String")
|
||||
myDataColumn.ColumnName = "LogOutTime"
|
||||
'myDataColumn.ColumnName = "<22>ƿ<EFBFBD><C6BF>ð<EFBFBD>"
|
||||
myDataColumn.ReadOnly = True
|
||||
myLastUserTable.Columns.Add(myDataColumn)
|
||||
|
||||
myDataColumn = New DataColumn()
|
||||
myDataColumn.DataType = System.Type.GetType("System.String")
|
||||
myDataColumn.ColumnName = "ServerID"
|
||||
'myDataColumn.ColumnName = "<22><><EFBFBD>Ӽ<EFBFBD><D3BC><EFBFBD>"
|
||||
myDataColumn.ReadOnly = True
|
||||
myLastUserTable.Columns.Add(myDataColumn)
|
||||
|
||||
myDataColumn = New DataColumn()
|
||||
myDataColumn.DataType = System.Type.GetType("System.String")
|
||||
myDataColumn.ColumnName = "BillType"
|
||||
'myDataColumn.ColumnName = "<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"
|
||||
myDataColumn.ReadOnly = True
|
||||
myLastUserTable.Columns.Add(myDataColumn)
|
||||
|
||||
ds.Tables.Add(myLastUserTable)
|
||||
|
||||
End Sub
|
||||
|
||||
Public Sub SetServerNames(ByRef ServerListCombobox As ComboBox)
|
||||
|
||||
ServerListCombobox.Items.Add(Test)
|
||||
ServerListCombobox.Items.Add(Solpis)
|
||||
ServerListCombobox.Items.Add(Karte)
|
||||
ServerListCombobox.Items.Add(Iranshya)
|
||||
ServerListCombobox.Items.Add(Hiland)
|
||||
ServerListCombobox.Items.Add(Aldia)
|
||||
ServerListCombobox.Items.Add(Yunite)
|
||||
ServerListCombobox.SelectedIndex = 0
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
''------------------------------------
|
||||
''<27><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>ϱ<EFBFBD> <20><>ư
|
||||
''ByVal Query As String
|
||||
''------------------------------------
|
||||
'Public Function ExcelPrint(ByVal tblCustomer As DataTable) As Boolean
|
||||
|
||||
' '<27><><EFBFBD><EFBFBD> <20>۾<EFBFBD><DBBE><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ϱ<EFBFBD>
|
||||
' Dim excelApp As Excel.Application
|
||||
' Dim rowIndex As Integer = 1
|
||||
' Dim colIndex As Integer = 0
|
||||
|
||||
' 'Me.Cursor.Current = Cursors.WaitCursor
|
||||
|
||||
' Try
|
||||
' '------------------------------------------
|
||||
' ' <20><><EFBFBD>ο<EFBFBD> <20><EFBFBD> <20><><EFBFBD>α<CEB1> <20><><EFBFBD><EFBFBD>
|
||||
' '------------------------------------------
|
||||
' excelApp = New Excel.Application()
|
||||
|
||||
' '------------------------------------------
|
||||
' ' <20><><EFBFBD><EFBFBD> <20><>Ʈ <20>߰<EFBFBD>
|
||||
' '------------------------------------------
|
||||
' excelApp.Workbooks.Add()
|
||||
|
||||
' '------------------------------------------
|
||||
' ' Customers <20><><EFBFBD>̺<EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ʈ<EFBFBD><C6AE> <20>´<DEB4>.
|
||||
' '------------------------------------------
|
||||
|
||||
' 'strquery = tbox_query.Text
|
||||
' 'tblCustomer = Me.GetDataTable(Query, "table")
|
||||
|
||||
' '------------------------------------------
|
||||
' ' <20><EFBFBD><D7BC><EFBFBD> ù<><C3B9>° <20><><EFBFBD><EFBFBD> <20>÷<EFBFBD><C3B7><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> ä<><C3A4><EFBFBD><EFBFBD>
|
||||
' '------------------------------------------
|
||||
' Dim col As DataColumn
|
||||
' For Each col In tblCustomer.Columns
|
||||
' colIndex += 1
|
||||
' excelApp.Cells(1, colIndex) = col.ColumnName
|
||||
' Next
|
||||
|
||||
' '------------------------------------------
|
||||
' ' <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><EFBFBD><D7BC><EFBFBD> ä<><C3A4><EFBFBD>ִ´<D6B4>.
|
||||
' '------------------------------------------
|
||||
' Dim row As DataRow
|
||||
' For Each row In tblCustomer.Rows
|
||||
' rowIndex += 1
|
||||
' colIndex = 0
|
||||
' For Each col In tblCustomer.Columns
|
||||
' colIndex += 1
|
||||
' excelApp.Cells(rowIndex, colIndex) = row(col).ToString
|
||||
' Next
|
||||
' Next
|
||||
|
||||
' excelApp.Visible = True
|
||||
' Catch exp As Exception
|
||||
' MessageBox.Show(exp.ToString)
|
||||
|
||||
' If Not excelApp Is Nothing Then
|
||||
' excelApp.Application.Quit()
|
||||
' excelApp = Nothing
|
||||
' End If
|
||||
' End Try
|
||||
|
||||
' 'Me.Cursor.Current = Cursors.Default
|
||||
|
||||
'End Function
|
||||
|
||||
|
||||
|
||||
End Module
|
||||
30
Server/ToolProject/RCMS_Tool/ErrorUtil.vb
Normal file
30
Server/ToolProject/RCMS_Tool/ErrorUtil.vb
Normal file
@@ -0,0 +1,30 @@
|
||||
Imports System.Environment
|
||||
|
||||
Public Class ErrorUtil
|
||||
'Exception <20><> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> EventLog <20><> <20><><EFBFBD><EFBFBD><EFBFBD>Ѵ<EFBFBD>
|
||||
Public Shared Sub WriteExceptionIntoEventLog(ByVal objException As Exception)
|
||||
Dim oEventLog As EventLog = New EventLog()
|
||||
|
||||
'Server Version <20><> <20><> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><EFBFBD><DFBB><EFBFBD> <20><>ǻ<EFBFBD><C7BB> <20>ľ<EFBFBD>
|
||||
Dim strComputer As String = Environment.GetEnvironmentVariable("COMPUTERNAME")
|
||||
|
||||
If Not oEventLog.SourceExists("BankDotNet") Then
|
||||
oEventLog.CreateEventSource("BankDotNet", "Application")
|
||||
End If
|
||||
oEventLog.Source = "BankDotNet"
|
||||
|
||||
oEventLog.WriteEntry(strComputer + "<EFBFBD><EFBFBD> " + objException.Source + "<EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><EFBFBD><DFBB>Ͽ<EFBFBD><CFBF><EFBFBD><EFBFBD>ϴ<EFBFBD>." _
|
||||
+ vbCrLf + objException.Message + vbCrLf + objException.StackTrace, EventLogEntryType.Error)
|
||||
End Sub
|
||||
|
||||
'Message <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20>ҽ<EFBFBD><D2BD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>Ѵ<EFBFBD>
|
||||
Public Shared Sub WriteEventLog(ByVal Message As String, ByVal Source As String)
|
||||
Dim oEventLog As EventLog = New EventLog()
|
||||
If Not oEventLog.SourceExists(Source) Then
|
||||
oEventLog.CreateEventSource(Source, "Application")
|
||||
End If
|
||||
oEventLog.Source = Source
|
||||
oEventLog.WriteEntry(Message)
|
||||
End Sub
|
||||
End Class
|
||||
|
||||
114
Server/ToolProject/RCMS_Tool/LogItem.resx
Normal file
114
Server/ToolProject/RCMS_Tool/LogItem.resx
Normal file
@@ -0,0 +1,114 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 1.3
|
||||
|
||||
The primary goals of this format is to allow a simple XML format
|
||||
that is mostly human readable. The generation and parsing of the
|
||||
various data types are done through the TypeConverter classes
|
||||
associated with the data types.
|
||||
|
||||
Example:
|
||||
|
||||
... ado.net/XML headers & schema ...
|
||||
<resheader name="resmimetype">text/microsoft-resx</resheader>
|
||||
<resheader name="version">1.3</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1">this is my long string</data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
[base64 mime encoded serialized .NET Framework object]
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
[base64 mime encoded string representing a byte array form of the .NET Framework object]
|
||||
</data>
|
||||
|
||||
There are any number of "resheader" rows that contain simple
|
||||
name/value pairs.
|
||||
|
||||
Each data row contains a name, and value. The row also contains a
|
||||
type or mimetype. Type corresponds to a .NET class that support
|
||||
text/value conversion through the TypeConverter architecture.
|
||||
Classes that don't support this are serialized and stored with the
|
||||
mimetype set.
|
||||
|
||||
The mimetype is used for serialized objects, and tells the
|
||||
ResXResourceReader how to depersist the object. This is currently not
|
||||
extensible. For a given mimetype the value must be set accordingly:
|
||||
|
||||
Note - application/x-microsoft.net.object.binary.base64 is the format
|
||||
that the ResXResourceWriter will generate, however the reader can
|
||||
read any of the formats listed below.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.binary.base64
|
||||
value : The object must be serialized with
|
||||
: System.Serialization.Formatters.Binary.BinaryFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.soap.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
mimetype: application/x-microsoft.net.object.bytearray.base64
|
||||
value : The object must be serialized into a byte array
|
||||
: using a System.ComponentModel.TypeConverter
|
||||
: and then encoded with base64 encoding.
|
||||
-->
|
||||
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="data">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="resheader">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:choice>
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:schema>
|
||||
<resheader name="resmimetype">
|
||||
<value>text/microsoft-resx</value>
|
||||
</resheader>
|
||||
<resheader name="version">
|
||||
<value>1.3</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<data name="lbltitle.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="GroupBox1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="TextBox1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="Label1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="$this.Name">
|
||||
<value>LogItem</value>
|
||||
</data>
|
||||
</root>
|
||||
94
Server/ToolProject/RCMS_Tool/LogItem.vb
Normal file
94
Server/ToolProject/RCMS_Tool/LogItem.vb
Normal file
@@ -0,0 +1,94 @@
|
||||
Public Class LogItem
|
||||
Inherits System.Windows.Forms.Form
|
||||
|
||||
#Region " Windows Form Designer generated code "
|
||||
|
||||
Public Sub New()
|
||||
MyBase.New()
|
||||
|
||||
'This call is required by the Windows Form Designer.
|
||||
InitializeComponent()
|
||||
|
||||
'Add any initialization after the InitializeComponent() call
|
||||
|
||||
End Sub
|
||||
|
||||
'Form overrides dispose to clean up the component list.
|
||||
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
If disposing Then
|
||||
If Not (components Is Nothing) Then
|
||||
components.Dispose()
|
||||
End If
|
||||
End If
|
||||
MyBase.Dispose(disposing)
|
||||
End Sub
|
||||
|
||||
'Required by the Windows Form Designer
|
||||
Private components As System.ComponentModel.IContainer
|
||||
|
||||
'NOTE: The following procedure is required by the Windows Form Designer
|
||||
'It can be modified using the Windows Form Designer.
|
||||
'Do not modify it using the code editor.
|
||||
Friend WithEvents lbltitle As System.Windows.Forms.Label
|
||||
Friend WithEvents GroupBox1 As System.Windows.Forms.GroupBox
|
||||
Friend WithEvents TextBox1 As System.Windows.Forms.TextBox
|
||||
Friend WithEvents Label1 As System.Windows.Forms.Label
|
||||
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
|
||||
Me.lbltitle = New System.Windows.Forms.Label()
|
||||
Me.GroupBox1 = New System.Windows.Forms.GroupBox()
|
||||
Me.TextBox1 = New System.Windows.Forms.TextBox()
|
||||
Me.Label1 = New System.Windows.Forms.Label()
|
||||
Me.GroupBox1.SuspendLayout()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'lbltitle
|
||||
'
|
||||
Me.lbltitle.AutoSize = True
|
||||
Me.lbltitle.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbltitle.Font = New System.Drawing.Font("GulimChe", 14.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
|
||||
Me.lbltitle.Location = New System.Drawing.Point(296, 40)
|
||||
Me.lbltitle.Name = "lbltitle"
|
||||
Me.lbltitle.Size = New System.Drawing.Size(90, 24)
|
||||
Me.lbltitle.TabIndex = 2
|
||||
Me.lbltitle.Text = "lblTitle"
|
||||
'
|
||||
'GroupBox1
|
||||
'
|
||||
Me.GroupBox1.Controls.AddRange(New System.Windows.Forms.Control() {Me.Label1, Me.TextBox1})
|
||||
Me.GroupBox1.Location = New System.Drawing.Point(88, 72)
|
||||
Me.GroupBox1.Name = "GroupBox1"
|
||||
Me.GroupBox1.Size = New System.Drawing.Size(504, 80)
|
||||
Me.GroupBox1.TabIndex = 3
|
||||
Me.GroupBox1.TabStop = False
|
||||
'
|
||||
'TextBox1
|
||||
'
|
||||
Me.TextBox1.Location = New System.Drawing.Point(160, 32)
|
||||
Me.TextBox1.Name = "TextBox1"
|
||||
Me.TextBox1.Size = New System.Drawing.Size(128, 21)
|
||||
Me.TextBox1.TabIndex = 0
|
||||
Me.TextBox1.Text = "TextBox1"
|
||||
'
|
||||
'Label1
|
||||
'
|
||||
Me.Label1.Location = New System.Drawing.Point(32, 32)
|
||||
Me.Label1.Name = "Label1"
|
||||
Me.Label1.TabIndex = 1
|
||||
Me.Label1.Text = "<EFBFBD>˻<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"
|
||||
'
|
||||
'LogItem
|
||||
'
|
||||
Me.AutoScaleBaseSize = New System.Drawing.Size(6, 14)
|
||||
Me.ClientSize = New System.Drawing.Size(640, 421)
|
||||
Me.Controls.AddRange(New System.Windows.Forms.Control() {Me.GroupBox1, Me.lbltitle})
|
||||
Me.Name = "LogItem"
|
||||
Me.Text = " "
|
||||
Me.GroupBox1.ResumeLayout(False)
|
||||
Me.ResumeLayout(False)
|
||||
|
||||
End Sub
|
||||
|
||||
#End Region
|
||||
|
||||
|
||||
End Class
|
||||
120
Server/ToolProject/RCMS_Tool/Login.resx
Normal file
120
Server/ToolProject/RCMS_Tool/Login.resx
Normal file
@@ -0,0 +1,120 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 1.3
|
||||
|
||||
The primary goals of this format is to allow a simple XML format
|
||||
that is mostly human readable. The generation and parsing of the
|
||||
various data types are done through the TypeConverter classes
|
||||
associated with the data types.
|
||||
|
||||
Example:
|
||||
|
||||
... ado.net/XML headers & schema ...
|
||||
<resheader name="resmimetype">text/microsoft-resx</resheader>
|
||||
<resheader name="version">1.3</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1">this is my long string</data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
[base64 mime encoded serialized .NET Framework object]
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
[base64 mime encoded string representing a byte array form of the .NET Framework object]
|
||||
</data>
|
||||
|
||||
There are any number of "resheader" rows that contain simple
|
||||
name/value pairs.
|
||||
|
||||
Each data row contains a name, and value. The row also contains a
|
||||
type or mimetype. Type corresponds to a .NET class that support
|
||||
text/value conversion through the TypeConverter architecture.
|
||||
Classes that don't support this are serialized and stored with the
|
||||
mimetype set.
|
||||
|
||||
The mimetype is used for serialized objects, and tells the
|
||||
ResXResourceReader how to depersist the object. This is currently not
|
||||
extensible. For a given mimetype the value must be set accordingly:
|
||||
|
||||
Note - application/x-microsoft.net.object.binary.base64 is the format
|
||||
that the ResXResourceWriter will generate, however the reader can
|
||||
read any of the formats listed below.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.binary.base64
|
||||
value : The object must be serialized with
|
||||
: System.Serialization.Formatters.Binary.BinaryFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.soap.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
mimetype: application/x-microsoft.net.object.bytearray.base64
|
||||
value : The object must be serialized into a byte array
|
||||
: using a System.ComponentModel.TypeConverter
|
||||
: and then encoded with base64 encoding.
|
||||
-->
|
||||
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="data">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="resheader">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:choice>
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:schema>
|
||||
<resheader name="resmimetype">
|
||||
<value>text/microsoft-resx</value>
|
||||
</resheader>
|
||||
<resheader name="version">
|
||||
<value>1.3</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<data name="lblID.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblpass.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtID.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtPwd.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="btn_Login.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="btnCancel.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="$this.Name">
|
||||
<value>Login</value>
|
||||
</data>
|
||||
</root>
|
||||
165
Server/ToolProject/RCMS_Tool/Login.vb
Normal file
165
Server/ToolProject/RCMS_Tool/Login.vb
Normal file
@@ -0,0 +1,165 @@
|
||||
Imports System.Net
|
||||
Imports System.Text
|
||||
|
||||
Public Class Login
|
||||
Inherits System.Windows.Forms.Form
|
||||
|
||||
#Region " Windows Form <20><><EFBFBD><EFBFBD><EFBFBD>̳ʿ<CCB3><CABF><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20>ڵ<EFBFBD> "
|
||||
|
||||
Public Sub New()
|
||||
MyBase.New()
|
||||
|
||||
'<27><> ȣ<><C8A3><EFBFBD><EFBFBD> Windows Form <20><><EFBFBD><EFBFBD><EFBFBD>̳ʿ<CCB3> <20>ʿ<EFBFBD><CABF>մϴ<D5B4>.
|
||||
InitializeComponent()
|
||||
|
||||
'InitializeComponent()<29><> ȣ<><C8A3><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20>ʱ<EFBFBD>ȭ <20>۾<EFBFBD><DBBE><EFBFBD> <20>߰<EFBFBD><DFB0>Ͻʽÿ<CABD>.
|
||||
|
||||
End Sub
|
||||
|
||||
'Form<72><6D> Dispose<73><65> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ͽ<EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>մϴ<D5B4>.
|
||||
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
If disposing Then
|
||||
If Not (components Is Nothing) Then
|
||||
components.Dispose()
|
||||
End If
|
||||
End If
|
||||
MyBase.Dispose(disposing)
|
||||
End Sub
|
||||
|
||||
'Windows Form <20><><EFBFBD><EFBFBD><EFBFBD>̳ʿ<CCB3> <20>ʿ<EFBFBD><CABF>մϴ<D5B4>.
|
||||
Private components As System.ComponentModel.IContainer
|
||||
|
||||
'<27><><EFBFBD><EFBFBD>: <20><><EFBFBD><EFBFBD> <20><><EFBFBD>ν<EFBFBD><CEBD><EFBFBD><EFBFBD><EFBFBD> Windows Form <20><><EFBFBD><EFBFBD><EFBFBD>̳ʿ<CCB3> <20>ʿ<EFBFBD><CABF>մϴ<D5B4>.
|
||||
'Windows Form <20><><EFBFBD><EFBFBD><EFBFBD>̳ʸ<CCB3> <20><><EFBFBD><EFBFBD><EFBFBD>Ͽ<EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20>ֽ<EFBFBD><D6BD>ϴ<EFBFBD>.
|
||||
'<27>ڵ<EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>⸦ <20><><EFBFBD><EFBFBD><EFBFBD>Ͽ<EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD>ʽÿ<CABD>.
|
||||
Friend WithEvents btn_Login As System.Windows.Forms.Button
|
||||
Friend WithEvents txtID As System.Windows.Forms.TextBox
|
||||
Friend WithEvents txtPwd As System.Windows.Forms.TextBox
|
||||
Friend WithEvents btnCancel As System.Windows.Forms.Button
|
||||
Friend WithEvents lblID As System.Windows.Forms.Label
|
||||
Friend WithEvents lblpass As System.Windows.Forms.Label
|
||||
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
|
||||
Me.lblID = New System.Windows.Forms.Label()
|
||||
Me.lblpass = New System.Windows.Forms.Label()
|
||||
Me.txtID = New System.Windows.Forms.TextBox()
|
||||
Me.txtPwd = New System.Windows.Forms.TextBox()
|
||||
Me.btn_Login = New System.Windows.Forms.Button()
|
||||
Me.btnCancel = New System.Windows.Forms.Button()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'lblID
|
||||
'
|
||||
Me.lblID.AutoSize = True
|
||||
Me.lblID.Font = New System.Drawing.Font("Gulim", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
|
||||
Me.lblID.Location = New System.Drawing.Point(110, 56)
|
||||
Me.lblID.Name = "lblID"
|
||||
Me.lblID.Size = New System.Drawing.Size(52, 18)
|
||||
Me.lblID.TabIndex = 0
|
||||
Me.lblID.Text = "<EFBFBD><EFBFBD><EFBFBD>̵<EFBFBD>"
|
||||
'
|
||||
'lblpass
|
||||
'
|
||||
Me.lblpass.AutoSize = True
|
||||
Me.lblpass.Font = New System.Drawing.Font("Gulim", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
|
||||
Me.lblpass.Location = New System.Drawing.Point(96, 88)
|
||||
Me.lblpass.Name = "lblpass"
|
||||
Me.lblpass.Size = New System.Drawing.Size(68, 18)
|
||||
Me.lblpass.TabIndex = 1
|
||||
Me.lblpass.Text = "<EFBFBD>н<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"
|
||||
'
|
||||
'txtID
|
||||
'
|
||||
Me.txtID.Location = New System.Drawing.Point(184, 56)
|
||||
Me.txtID.Name = "txtID"
|
||||
Me.txtID.Size = New System.Drawing.Size(104, 21)
|
||||
Me.txtID.TabIndex = 0
|
||||
Me.txtID.Text = ""
|
||||
'
|
||||
'txtPwd
|
||||
'
|
||||
Me.txtPwd.Location = New System.Drawing.Point(184, 88)
|
||||
Me.txtPwd.Name = "txtPwd"
|
||||
Me.txtPwd.PasswordChar = Microsoft.VisualBasic.ChrW(42)
|
||||
Me.txtPwd.Size = New System.Drawing.Size(104, 21)
|
||||
Me.txtPwd.TabIndex = 1
|
||||
Me.txtPwd.Text = ""
|
||||
'
|
||||
'btn_Login
|
||||
'
|
||||
Me.btn_Login.Location = New System.Drawing.Point(168, 128)
|
||||
Me.btn_Login.Name = "btn_Login"
|
||||
Me.btn_Login.Size = New System.Drawing.Size(72, 32)
|
||||
Me.btn_Login.TabIndex = 2
|
||||
Me.btn_Login.Text = "<EFBFBD>α<EFBFBD><EFBFBD><EFBFBD>"
|
||||
'
|
||||
'btnCancel
|
||||
'
|
||||
Me.btnCancel.Location = New System.Drawing.Point(256, 128)
|
||||
Me.btnCancel.Name = "btnCancel"
|
||||
Me.btnCancel.Size = New System.Drawing.Size(72, 32)
|
||||
Me.btnCancel.TabIndex = 3
|
||||
Me.btnCancel.Text = "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"
|
||||
'
|
||||
'Login
|
||||
'
|
||||
Me.AutoScaleBaseSize = New System.Drawing.Size(6, 14)
|
||||
Me.ClientSize = New System.Drawing.Size(448, 229)
|
||||
Me.Controls.AddRange(New System.Windows.Forms.Control() {Me.btnCancel, Me.btn_Login, Me.txtPwd, Me.txtID, Me.lblpass, Me.lblID})
|
||||
Me.MaximizeBox = False
|
||||
Me.MinimizeBox = False
|
||||
Me.Name = "Login"
|
||||
Me.SizeGripStyle = System.Windows.Forms.SizeGripStyle.Hide
|
||||
Me.Text = "<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ڷα<EFBFBD><EFBFBD><EFBFBD>"
|
||||
Me.ResumeLayout(False)
|
||||
|
||||
End Sub
|
||||
|
||||
#End Region
|
||||
|
||||
'<27>α<EFBFBD><CEB1><EFBFBD><EFBFBD>ϱ<EFBFBD>
|
||||
Private Sub btn_Login_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn_Login.Click
|
||||
|
||||
If txtID.Text = "" Then
|
||||
MsgBox(ITextMSG.msg_login, MsgBoxStyle.OKOnly, ITextMSG.msg_error)
|
||||
Exit Sub
|
||||
End If
|
||||
|
||||
If txtPwd.Text = "" Then
|
||||
MsgBox(ITextMSG.msg_pass, MsgBoxStyle.OKOnly, ITextMSG.msg_error)
|
||||
Exit Sub
|
||||
End If
|
||||
|
||||
'send <20><>Ŷ <20><><EFBFBD><EFBFBD><EFBFBD>Ѵ<EFBFBD>.
|
||||
Dim sendb(31) As Byte
|
||||
Encoding.GetEncoding(Code).GetBytes(txtID.Text, 0, txtID.Text.Length, sendb, 0)
|
||||
Encoding.GetEncoding(Code).GetBytes(txtPwd.Text, 0, txtPwd.Text.Length, sendb, 16)
|
||||
IClientSocket.Send(1, sendb)
|
||||
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
'<27><><EFBFBD>ϼ<EFBFBD><CFBC><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>ϱ<EFBFBD>
|
||||
Private Sub Login_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
|
||||
|
||||
'<27>ִ<EFBFBD> <20>Է¹<D4B7><C2B9><EFBFBD> <20><><EFBFBD>ڼ<EFBFBD><DABC><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>Ѵ<EFBFBD>.
|
||||
txtID.MaxLength = 15
|
||||
txtPwd.MaxLength = 15
|
||||
|
||||
Me.Text = ITextLogin.formheader
|
||||
lblID.Text = ITextLogin.lblid
|
||||
lblpass.Text = ITextLogin.lblpass
|
||||
|
||||
btn_Login.Text = ITextButton.btnLogin
|
||||
btnCancel.Text = ITextButton.btnEnd
|
||||
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btnCancel_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnCancel.Click
|
||||
'<27><>ü<EFBFBD><C3BC><EFBFBD><EFBFBD><EFBFBD>ϱ<EFBFBD>
|
||||
Application.Exit()
|
||||
End Sub
|
||||
|
||||
|
||||
End Class
|
||||
1146
Server/ToolProject/RCMS_Tool/ProcessPacket.vb
Normal file
1146
Server/ToolProject/RCMS_Tool/ProcessPacket.vb
Normal file
File diff suppressed because it is too large
Load Diff
260
Server/ToolProject/RCMS_Tool/RCMS_Tool.vbproj
Normal file
260
Server/ToolProject/RCMS_Tool/RCMS_Tool.vbproj
Normal file
@@ -0,0 +1,260 @@
|
||||
<VisualStudioProject>
|
||||
<VisualBasic
|
||||
ProjectType = "Local"
|
||||
ProductVersion = "7.10.3077"
|
||||
SchemaVersion = "2.0"
|
||||
ProjectGuid = "{B759893A-C8AE-4E08-9204-7FCC2F862FC2}"
|
||||
SccProjectName = "SAK"
|
||||
SccLocalPath = "SAK"
|
||||
SccAuxPath = "SAK"
|
||||
SccProvider = "SAK"
|
||||
>
|
||||
<Build>
|
||||
<Settings
|
||||
ApplicationIcon = ""
|
||||
AssemblyKeyContainerName = ""
|
||||
AssemblyName = "RCMS_Tool"
|
||||
AssemblyOriginatorKeyFile = ""
|
||||
AssemblyOriginatorKeyMode = "None"
|
||||
DefaultClientScript = "JScript"
|
||||
DefaultHTMLPageLayout = "Grid"
|
||||
DefaultTargetSchema = "IE50"
|
||||
DelaySign = "false"
|
||||
OutputType = "WinExe"
|
||||
OptionCompare = "Binary"
|
||||
OptionExplicit = "On"
|
||||
OptionStrict = "Off"
|
||||
RootNamespace = "RCMS_Tool"
|
||||
StartupObject = "RCMS_Tool.RylMDI"
|
||||
>
|
||||
<Config
|
||||
Name = "Debug"
|
||||
BaseAddress = "285212672"
|
||||
ConfigurationOverrideFile = ""
|
||||
DefineConstants = ""
|
||||
DefineDebug = "true"
|
||||
DefineTrace = "true"
|
||||
DebugSymbols = "true"
|
||||
IncrementalBuild = "true"
|
||||
Optimize = "false"
|
||||
OutputPath = "bin\"
|
||||
RegisterForComInterop = "false"
|
||||
RemoveIntegerChecks = "false"
|
||||
TreatWarningsAsErrors = "false"
|
||||
WarningLevel = "1"
|
||||
/>
|
||||
<Config
|
||||
Name = "Release"
|
||||
BaseAddress = "285212672"
|
||||
ConfigurationOverrideFile = ""
|
||||
DefineConstants = ""
|
||||
DefineDebug = "false"
|
||||
DefineTrace = "true"
|
||||
DebugSymbols = "false"
|
||||
IncrementalBuild = "false"
|
||||
Optimize = "true"
|
||||
OutputPath = "bin\"
|
||||
RegisterForComInterop = "false"
|
||||
RemoveIntegerChecks = "false"
|
||||
TreatWarningsAsErrors = "false"
|
||||
WarningLevel = "1"
|
||||
/>
|
||||
</Settings>
|
||||
<References>
|
||||
<Reference
|
||||
Name = "System"
|
||||
AssemblyName = "System"
|
||||
/>
|
||||
<Reference
|
||||
Name = "System.Data"
|
||||
AssemblyName = "System.Data"
|
||||
/>
|
||||
<Reference
|
||||
Name = "System.Drawing"
|
||||
AssemblyName = "System.Drawing"
|
||||
/>
|
||||
<Reference
|
||||
Name = "System.Windows.Forms"
|
||||
AssemblyName = "System.Windows.Forms"
|
||||
/>
|
||||
<Reference
|
||||
Name = "System.XML"
|
||||
AssemblyName = "System.Xml"
|
||||
/>
|
||||
</References>
|
||||
<Imports>
|
||||
<Import Namespace = "Microsoft.VisualBasic" />
|
||||
<Import Namespace = "System" />
|
||||
<Import Namespace = "System.Collections" />
|
||||
<Import Namespace = "System.Data" />
|
||||
<Import Namespace = "System.Drawing" />
|
||||
<Import Namespace = "System.Diagnostics" />
|
||||
<Import Namespace = "System.Windows.Forms" />
|
||||
</Imports>
|
||||
</Build>
|
||||
<Files>
|
||||
<Include>
|
||||
<File
|
||||
RelPath = "AdminInfo.vb"
|
||||
SubType = "Form"
|
||||
BuildAction = "Compile"
|
||||
/>
|
||||
<File
|
||||
RelPath = "AdminInfo.resx"
|
||||
DependentUpon = "AdminInfo.vb"
|
||||
BuildAction = "EmbeddedResource"
|
||||
/>
|
||||
<File
|
||||
RelPath = "AdminSetting.vb"
|
||||
SubType = "Form"
|
||||
BuildAction = "Compile"
|
||||
/>
|
||||
<File
|
||||
RelPath = "AdminSetting.resx"
|
||||
DependentUpon = "AdminSetting.vb"
|
||||
BuildAction = "EmbeddedResource"
|
||||
/>
|
||||
<File
|
||||
RelPath = "adminToolString.vb"
|
||||
SubType = "Code"
|
||||
BuildAction = "Compile"
|
||||
/>
|
||||
<File
|
||||
RelPath = "AssemblyInfo.vb"
|
||||
SubType = "Code"
|
||||
BuildAction = "Compile"
|
||||
/>
|
||||
<File
|
||||
RelPath = "CharInfo.vb"
|
||||
SubType = "Form"
|
||||
BuildAction = "Compile"
|
||||
/>
|
||||
<File
|
||||
RelPath = "CharInfo.resx"
|
||||
DependentUpon = "CharInfo.vb"
|
||||
BuildAction = "EmbeddedResource"
|
||||
/>
|
||||
<File
|
||||
RelPath = "CharItemInfo.vb"
|
||||
SubType = "Form"
|
||||
BuildAction = "Compile"
|
||||
/>
|
||||
<File
|
||||
RelPath = "CharItemInfo.resx"
|
||||
DependentUpon = "CharItemInfo.vb"
|
||||
BuildAction = "EmbeddedResource"
|
||||
/>
|
||||
<File
|
||||
RelPath = "CharItemInfoDetail.vb"
|
||||
SubType = "Form"
|
||||
BuildAction = "Compile"
|
||||
/>
|
||||
<File
|
||||
RelPath = "CharItemInfoDetail.resx"
|
||||
DependentUpon = "CharItemInfoDetail.vb"
|
||||
BuildAction = "EmbeddedResource"
|
||||
/>
|
||||
<File
|
||||
RelPath = "CharRestraint.vb"
|
||||
SubType = "Form"
|
||||
BuildAction = "Compile"
|
||||
/>
|
||||
<File
|
||||
RelPath = "CharRestraint.resx"
|
||||
DependentUpon = "CharRestraint.vb"
|
||||
BuildAction = "EmbeddedResource"
|
||||
/>
|
||||
<File
|
||||
RelPath = "CharRestraintReg.vb"
|
||||
SubType = "Form"
|
||||
BuildAction = "Compile"
|
||||
/>
|
||||
<File
|
||||
RelPath = "CharRestraintReg.resx"
|
||||
DependentUpon = "CharRestraintReg.vb"
|
||||
BuildAction = "EmbeddedResource"
|
||||
/>
|
||||
<File
|
||||
RelPath = "ClientSocket.vb"
|
||||
SubType = "Code"
|
||||
BuildAction = "Compile"
|
||||
/>
|
||||
<File
|
||||
RelPath = "DBAgent.vb"
|
||||
SubType = "Code"
|
||||
BuildAction = "Compile"
|
||||
/>
|
||||
<File
|
||||
RelPath = "DBConn.vb"
|
||||
SubType = "Code"
|
||||
BuildAction = "Compile"
|
||||
/>
|
||||
<File
|
||||
RelPath = "ErrorUtil.vb"
|
||||
SubType = "Code"
|
||||
BuildAction = "Compile"
|
||||
/>
|
||||
<File
|
||||
RelPath = "Login.vb"
|
||||
SubType = "Form"
|
||||
BuildAction = "Compile"
|
||||
/>
|
||||
<File
|
||||
RelPath = "Login.resx"
|
||||
DependentUpon = "Login.vb"
|
||||
BuildAction = "EmbeddedResource"
|
||||
/>
|
||||
<File
|
||||
RelPath = "LogItem.vb"
|
||||
SubType = "Form"
|
||||
BuildAction = "Compile"
|
||||
/>
|
||||
<File
|
||||
RelPath = "LogItem.resx"
|
||||
DependentUpon = "LogItem.vb"
|
||||
BuildAction = "EmbeddedResource"
|
||||
/>
|
||||
<File
|
||||
RelPath = "ProcessPacket.vb"
|
||||
SubType = "Code"
|
||||
BuildAction = "Compile"
|
||||
/>
|
||||
<File
|
||||
RelPath = "RylMDI.vb"
|
||||
SubType = "Form"
|
||||
BuildAction = "Compile"
|
||||
/>
|
||||
<File
|
||||
RelPath = "RylMDI.resx"
|
||||
DependentUpon = "RylMDI.vb"
|
||||
BuildAction = "EmbeddedResource"
|
||||
/>
|
||||
<File
|
||||
RelPath = "TextString.xml"
|
||||
BuildAction = "Content"
|
||||
/>
|
||||
<File
|
||||
RelPath = "UserLastLogOut.vb"
|
||||
SubType = "Form"
|
||||
BuildAction = "Compile"
|
||||
/>
|
||||
<File
|
||||
RelPath = "UserLastLogOut.resx"
|
||||
DependentUpon = "UserLastLogOut.vb"
|
||||
BuildAction = "EmbeddedResource"
|
||||
/>
|
||||
<File
|
||||
RelPath = "UserLogin.vb"
|
||||
SubType = "Form"
|
||||
BuildAction = "Compile"
|
||||
/>
|
||||
<File
|
||||
RelPath = "UserLogin.resx"
|
||||
DependentUpon = "UserLogin.vb"
|
||||
BuildAction = "EmbeddedResource"
|
||||
/>
|
||||
</Include>
|
||||
</Files>
|
||||
</VisualBasic>
|
||||
</VisualStudioProject>
|
||||
|
||||
141
Server/ToolProject/RCMS_Tool/RylMDI.resx
Normal file
141
Server/ToolProject/RCMS_Tool/RylMDI.resx
Normal file
@@ -0,0 +1,141 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 1.3
|
||||
|
||||
The primary goals of this format is to allow a simple XML format
|
||||
that is mostly human readable. The generation and parsing of the
|
||||
various data types are done through the TypeConverter classes
|
||||
associated with the data types.
|
||||
|
||||
Example:
|
||||
|
||||
... ado.net/XML headers & schema ...
|
||||
<resheader name="resmimetype">text/microsoft-resx</resheader>
|
||||
<resheader name="version">1.3</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1">this is my long string</data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
[base64 mime encoded serialized .NET Framework object]
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
[base64 mime encoded string representing a byte array form of the .NET Framework object]
|
||||
</data>
|
||||
|
||||
There are any number of "resheader" rows that contain simple
|
||||
name/value pairs.
|
||||
|
||||
Each data row contains a name, and value. The row also contains a
|
||||
type or mimetype. Type corresponds to a .NET class that support
|
||||
text/value conversion through the TypeConverter architecture.
|
||||
Classes that don't support this are serialized and stored with the
|
||||
mimetype set.
|
||||
|
||||
The mimetype is used for serialized objects, and tells the
|
||||
ResXResourceReader how to depersist the object. This is currently not
|
||||
extensible. For a given mimetype the value must be set accordingly:
|
||||
|
||||
Note - application/x-microsoft.net.object.binary.base64 is the format
|
||||
that the ResXResourceWriter will generate, however the reader can
|
||||
read any of the formats listed below.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.binary.base64
|
||||
value : The object must be serialized with
|
||||
: System.Serialization.Formatters.Binary.BinaryFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.soap.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
mimetype: application/x-microsoft.net.object.bytearray.base64
|
||||
value : The object must be serialized into a byte array
|
||||
: using a System.ComponentModel.TypeConverter
|
||||
: and then encoded with base64 encoding.
|
||||
-->
|
||||
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="data">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="resheader">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:choice>
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:schema>
|
||||
<resheader name="resmimetype">
|
||||
<value>text/microsoft-resx</value>
|
||||
</resheader>
|
||||
<resheader name="version">
|
||||
<value>1.3</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<data name="MainMenu1.Location" type="System.Drawing.Point, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>17, 17</value>
|
||||
</data>
|
||||
<data name="MainMenu1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="mnu_1_ToolAdm.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="mnu_1_1_ToolAdminSearch.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="mnu_2_UserAdmin.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="mnu_2_1_UserCheck.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="mnu_2_2_lastUserCheck.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="mnu_3_CharAdmin.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="mnu_3_1_Charinfo.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="mnu_3_2_CharItemInfo.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="mnu_3_3_CharRestraint.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="mnu_4_ItemLogAdm.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="mnu_4_1_ItemLog.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="$this.Name">
|
||||
<value>RylMDI</value>
|
||||
</data>
|
||||
</root>
|
||||
301
Server/ToolProject/RCMS_Tool/RylMDI.vb
Normal file
301
Server/ToolProject/RCMS_Tool/RylMDI.vb
Normal file
@@ -0,0 +1,301 @@
|
||||
Imports System.Threading
|
||||
Imports System.Text
|
||||
|
||||
Public Class RylMDI
|
||||
Inherits System.Windows.Forms.Form
|
||||
|
||||
#Region " Windows Form <20><><EFBFBD><EFBFBD><EFBFBD>̳ʿ<CCB3><CABF><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20>ڵ<EFBFBD> "
|
||||
|
||||
Public Sub New()
|
||||
MyBase.New()
|
||||
|
||||
'<27><> ȣ<><C8A3><EFBFBD><EFBFBD> Windows Form <20><><EFBFBD><EFBFBD><EFBFBD>̳ʿ<CCB3> <20>ʿ<EFBFBD><CABF>մϴ<D5B4>.
|
||||
InitializeComponent()
|
||||
|
||||
'InitializeComponent()<29><> ȣ<><C8A3><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20>ʱ<EFBFBD>ȭ <20>۾<EFBFBD><DBBE><EFBFBD> <20>߰<EFBFBD><DFB0>Ͻʽÿ<CABD>.
|
||||
|
||||
End Sub
|
||||
|
||||
'Form<72><6D> Dispose<73><65> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ͽ<EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>մϴ<D5B4>.
|
||||
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
If disposing Then
|
||||
If Not (components Is Nothing) Then
|
||||
components.Dispose()
|
||||
End If
|
||||
End If
|
||||
|
||||
MyBase.Dispose(disposing)
|
||||
|
||||
End Sub
|
||||
|
||||
'Windows Form <20><><EFBFBD><EFBFBD><EFBFBD>̳ʿ<CCB3> <20>ʿ<EFBFBD><CABF>մϴ<D5B4>.
|
||||
Private components As System.ComponentModel.IContainer
|
||||
|
||||
'<27><><EFBFBD><EFBFBD>: <20><><EFBFBD><EFBFBD> <20><><EFBFBD>ν<EFBFBD><CEBD><EFBFBD><EFBFBD><EFBFBD> Windows Form <20><><EFBFBD><EFBFBD><EFBFBD>̳ʿ<CCB3> <20>ʿ<EFBFBD><CABF>մϴ<D5B4>.
|
||||
'Windows Form <20><><EFBFBD><EFBFBD><EFBFBD>̳ʸ<CCB3> <20><><EFBFBD><EFBFBD><EFBFBD>Ͽ<EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20>ֽ<EFBFBD><D6BD>ϴ<EFBFBD>.
|
||||
'<27>ڵ<EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>⸦ <20><><EFBFBD><EFBFBD><EFBFBD>Ͽ<EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD>ʽÿ<CABD>.
|
||||
Friend WithEvents MainMenu1 As System.Windows.Forms.MainMenu
|
||||
Friend WithEvents mnu_1_ToolAdm As System.Windows.Forms.MenuItem
|
||||
Friend WithEvents mnu_1_1_ToolAdminSearch As System.Windows.Forms.MenuItem
|
||||
Friend WithEvents mnu_2_UserAdmin As System.Windows.Forms.MenuItem
|
||||
Friend WithEvents mnu_3_CharAdmin As System.Windows.Forms.MenuItem
|
||||
Friend WithEvents mnu_3_3_CharRestraint As System.Windows.Forms.MenuItem
|
||||
Friend WithEvents mnu_2_1_UserCheck As System.Windows.Forms.MenuItem
|
||||
Friend WithEvents mnu_3_2_CharItemInfo As System.Windows.Forms.MenuItem
|
||||
Friend WithEvents mnu_3_1_Charinfo As System.Windows.Forms.MenuItem
|
||||
Friend WithEvents mnu_2_2_lastUserCheck As System.Windows.Forms.MenuItem
|
||||
Friend WithEvents mnu_4_ItemLogAdm As System.Windows.Forms.MenuItem
|
||||
Friend WithEvents mnu_4_1_ItemLog As System.Windows.Forms.MenuItem
|
||||
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
|
||||
Me.MainMenu1 = New System.Windows.Forms.MainMenu()
|
||||
Me.mnu_1_ToolAdm = New System.Windows.Forms.MenuItem()
|
||||
Me.mnu_1_1_ToolAdminSearch = New System.Windows.Forms.MenuItem()
|
||||
Me.mnu_2_UserAdmin = New System.Windows.Forms.MenuItem()
|
||||
Me.mnu_2_1_UserCheck = New System.Windows.Forms.MenuItem()
|
||||
Me.mnu_2_2_lastUserCheck = New System.Windows.Forms.MenuItem()
|
||||
Me.mnu_3_CharAdmin = New System.Windows.Forms.MenuItem()
|
||||
Me.mnu_3_1_Charinfo = New System.Windows.Forms.MenuItem()
|
||||
Me.mnu_3_2_CharItemInfo = New System.Windows.Forms.MenuItem()
|
||||
Me.mnu_3_3_CharRestraint = New System.Windows.Forms.MenuItem()
|
||||
Me.mnu_4_ItemLogAdm = New System.Windows.Forms.MenuItem()
|
||||
Me.mnu_4_1_ItemLog = New System.Windows.Forms.MenuItem()
|
||||
'
|
||||
'MainMenu1
|
||||
'
|
||||
Me.MainMenu1.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.mnu_1_ToolAdm, Me.mnu_2_UserAdmin, Me.mnu_3_CharAdmin, Me.mnu_4_ItemLogAdm})
|
||||
'
|
||||
'mnu_1_ToolAdm
|
||||
'
|
||||
Me.mnu_1_ToolAdm.Index = 0
|
||||
Me.mnu_1_ToolAdm.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.mnu_1_1_ToolAdminSearch})
|
||||
Me.mnu_1_ToolAdm.Text = "<EFBFBD><EFBFBD>ڰ<EFBFBD><EFBFBD><EFBFBD>"
|
||||
'
|
||||
'mnu_1_1_ToolAdminSearch
|
||||
'
|
||||
Me.mnu_1_1_ToolAdminSearch.Index = 0
|
||||
Me.mnu_1_1_ToolAdminSearch.Text = "<EFBFBD><EFBFBD>ڰ<EFBFBD><EFBFBD><EFBFBD>"
|
||||
'
|
||||
'mnu_2_UserAdmin
|
||||
'
|
||||
Me.mnu_2_UserAdmin.Index = 1
|
||||
Me.mnu_2_UserAdmin.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.mnu_2_1_UserCheck, Me.mnu_2_2_lastUserCheck})
|
||||
Me.mnu_2_UserAdmin.Text = "<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"
|
||||
'
|
||||
'mnu_2_1_UserCheck
|
||||
'
|
||||
Me.mnu_2_1_UserCheck.Index = 0
|
||||
Me.mnu_2_1_UserCheck.Text = "<EFBFBD><EFBFBD><EFBFBD>ӿ<EFBFBD><EFBFBD><EFBFBD> / <20><><EFBFBD><EFBFBD><EFBFBD>αƿ<D7BE>"
|
||||
'
|
||||
'mnu_2_2_lastUserCheck
|
||||
'
|
||||
Me.mnu_2_2_lastUserCheck.Index = 1
|
||||
Me.mnu_2_2_lastUserCheck.Text = "<EFBFBD><EFBFBD><EFBFBD>Ż<EFBFBD><EFBFBD>볻<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"
|
||||
'
|
||||
'mnu_3_CharAdmin
|
||||
'
|
||||
Me.mnu_3_CharAdmin.Index = 2
|
||||
Me.mnu_3_CharAdmin.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.mnu_3_1_Charinfo, Me.mnu_3_2_CharItemInfo, Me.mnu_3_3_CharRestraint})
|
||||
Me.mnu_3_CharAdmin.Text = "ij<EFBFBD><EFBFBD><EFBFBD>Ͱ<EFBFBD><EFBFBD><EFBFBD>"
|
||||
'
|
||||
'mnu_3_1_Charinfo
|
||||
'
|
||||
Me.mnu_3_1_Charinfo.Index = 0
|
||||
Me.mnu_3_1_Charinfo.Text = "ij<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"
|
||||
'
|
||||
'mnu_3_2_CharItemInfo
|
||||
'
|
||||
Me.mnu_3_2_CharItemInfo.Index = 1
|
||||
Me.mnu_3_2_CharItemInfo.Text = "<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>۰<EFBFBD><EFBFBD><EFBFBD>"
|
||||
'
|
||||
'mnu_3_3_CharRestraint
|
||||
'
|
||||
Me.mnu_3_3_CharRestraint.Index = 2
|
||||
Me.mnu_3_3_CharRestraint.Text = "ij<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"
|
||||
'
|
||||
'mnu_4_ItemLogAdm
|
||||
'
|
||||
Me.mnu_4_ItemLogAdm.Index = 3
|
||||
Me.mnu_4_ItemLogAdm.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.mnu_4_1_ItemLog})
|
||||
Me.mnu_4_ItemLogAdm.Text = "<EFBFBD>αװ<EFBFBD><EFBFBD><EFBFBD>"
|
||||
'
|
||||
'mnu_4_1_ItemLog
|
||||
'
|
||||
Me.mnu_4_1_ItemLog.Index = 0
|
||||
Me.mnu_4_1_ItemLog.Text = "<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>۷α<EFBFBD><EFBFBD><EFBFBD>"
|
||||
'
|
||||
'RylMDI
|
||||
'
|
||||
Me.AutoScaleBaseSize = New System.Drawing.Size(6, 14)
|
||||
Me.ClientSize = New System.Drawing.Size(792, 397)
|
||||
Me.IsMdiContainer = True
|
||||
Me.Menu = Me.MainMenu1
|
||||
Me.Name = "RylMDI"
|
||||
Me.Text = "RylMDI"
|
||||
|
||||
End Sub
|
||||
|
||||
#End Region
|
||||
|
||||
'<27><EFBFBD><EEBFB5> <20><><EFBFBD><EFBFBD>
|
||||
'<27><><EFBFBD><EFBFBD>....
|
||||
|
||||
Public IAdminInfo As AdminInfo
|
||||
Public ILogin As Login
|
||||
'<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
||||
Public IUserLogin As UserLogin
|
||||
'ij<><C4B3><EFBFBD>Ͱ<EFBFBD><CDB0><EFBFBD>
|
||||
Public ICharinfo As CharInfo
|
||||
Public ICharItemInfo As CharItemInfo
|
||||
Public ICharRestraint As CharRestraint
|
||||
Public IUserLastLogOut As UserLastLogOut
|
||||
|
||||
Public Sub Disconnected()
|
||||
MsgBox(ITextMSG.msg_disconn)
|
||||
End Sub
|
||||
|
||||
'<27><><EFBFBD><EFBFBD>...
|
||||
Private Sub RylMDI_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
|
||||
|
||||
|
||||
ProcessPacket.IRylMDI = Me
|
||||
Me.WindowState = FormWindowState.Maximized
|
||||
|
||||
READXML()
|
||||
|
||||
Me.Text = ITextRylMDI.formheader
|
||||
Me.mnu_1_ToolAdm.Text = ITextRylMDI.title_1
|
||||
Me.mnu_1_1_ToolAdminSearch.Text = ITextRylMDI.title_1
|
||||
Me.mnu_2_UserAdmin.Text = ITextRylMDI.title_2
|
||||
Me.mnu_2_1_UserCheck.Text = ITextRylMDI.title_2_1
|
||||
Me.mnu_2_2_lastUserCheck.Text = ITextRylMDI.title_2_2
|
||||
Me.mnu_3_CharAdmin.Text = ITextRylMDI.title_3
|
||||
Me.mnu_3_1_Charinfo.Text = ITextRylMDI.title_3_1
|
||||
Me.mnu_3_2_CharItemInfo.Text = ITextRylMDI.title_3_2
|
||||
Me.mnu_3_3_CharRestraint.Text = ITextRylMDI.title_3_3
|
||||
|
||||
|
||||
DBConn.Initialize()
|
||||
|
||||
'<27><><EFBFBD><EFBFBD><EFBFBD>ϱ<EFBFBD>.
|
||||
|
||||
'<27><EFBFBD>
|
||||
IClientSocket.Connect("220.73.177.132", 10113, Me, New ClientSocket.ProcessDisconnect(AddressOf Me.Disconnected))
|
||||
|
||||
'<27>系<EFBFBD><EFBFBD>Ʈ
|
||||
'IClientSocket.Connect("203.239.143.36", 10113, Me, New ClientSocket.ProcessDisconnect(AddressOf Me.Disconnected))
|
||||
|
||||
'sparrowhaw's Test
|
||||
'IClientSocket.Connect("192.168.1.10", 10113, Me, New ClientSocket.ProcessDisconnect(AddressOf Me.Disconnected))
|
||||
|
||||
ProcessPacket.InitializeHandler()
|
||||
|
||||
'<27><><EFBFBD><EFBFBD> <20><> ó<><C3B3><EFBFBD>ϴ<EFBFBD> <20>ڵ鷯 <20><><EFBFBD><EFBFBD>
|
||||
|
||||
''<27><EFBFBD>ڰ<EFBFBD><DAB0><EFBFBD>
|
||||
'mnu_1_1_ToolAdminSearch.Enabled = False
|
||||
''<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
||||
'mnu_2_UserAdmin.Enabled = False
|
||||
''ij<><C4B3><EFBFBD>Ͱ<EFBFBD><CDB0><EFBFBD>
|
||||
'mnu_3_CharAdmin.Enabled = False
|
||||
|
||||
'<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>
|
||||
mnu_3_2_CharItemInfo.Enabled = False
|
||||
|
||||
ILogin = New Login()
|
||||
ILogin.StartPosition = FormStartPosition.CenterParent
|
||||
ILogin.ControlBox = False
|
||||
|
||||
ILogin.ShowDialog()
|
||||
ILogin.MdiParent = Me
|
||||
|
||||
End Sub
|
||||
|
||||
'all program exit
|
||||
Private Sub RylMDI_UnLoad(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Closed
|
||||
Application.Exit()
|
||||
End Sub
|
||||
|
||||
|
||||
'<27><EFBFBD><EEBFB5> <20><>ȸ
|
||||
Private Sub mnu_1_1_ToolAdminSearch_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles mnu_1_1_ToolAdminSearch.Click
|
||||
|
||||
If AdminKind = "T" Then
|
||||
|
||||
If IAdminInfo Is Nothing Then
|
||||
IAdminInfo = New AdminInfo()
|
||||
IAdminInfo.MdiParent = Me
|
||||
IAdminInfo.Show()
|
||||
|
||||
IAdminInfo.WindowState = FormWindowState.Maximized
|
||||
|
||||
End If
|
||||
|
||||
IAdminInfo.Activate()
|
||||
Else
|
||||
MsgBox(ITextMSG.msg_permit)
|
||||
End If
|
||||
End Sub
|
||||
|
||||
|
||||
'ij<><C4B3><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>ϱ<EFBFBD>
|
||||
Private Sub mnu_3_3_CharRestraint_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles mnu_3_3_CharRestraint.Click
|
||||
If ICharRestraint Is Nothing Then
|
||||
ICharRestraint = New CharRestraint()
|
||||
ICharRestraint.MdiParent = Me
|
||||
ICharRestraint.Show()
|
||||
|
||||
ICharRestraint.WindowState = FormWindowState.Maximized
|
||||
|
||||
End If
|
||||
|
||||
ICharRestraint.Activate()
|
||||
End Sub
|
||||
|
||||
'<27><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>α<EFBFBD><CEB1><EFBFBD> <20><><EFBFBD><EFBFBD>üũ <20><> <20><><EFBFBD><EFBFBD> <20><><EFBFBD>Ӳ<EFBFBD><D3B2><EFBFBD>
|
||||
Private Sub mnu_2_1_UserCheck_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles mnu_2_1_UserCheck.Click
|
||||
|
||||
If IUserLogin Is Nothing Then
|
||||
IUserLogin = New UserLogin()
|
||||
IUserLogin.MdiParent = Me
|
||||
IUserLogin.Show()
|
||||
|
||||
IUserLogin.WindowState = FormWindowState.Maximized
|
||||
|
||||
End If
|
||||
|
||||
IUserLogin.Activate()
|
||||
End Sub
|
||||
|
||||
|
||||
'ij<><C4B3><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
||||
Private Sub mnu_3_1_Charinfo_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles mnu_3_1_Charinfo.Click
|
||||
If ICharinfo Is Nothing Then
|
||||
ICharinfo = New CharInfo()
|
||||
ICharinfo.MdiParent = Me
|
||||
ICharinfo.Show()
|
||||
ICharinfo.WindowState = FormWindowState.Maximized
|
||||
End If
|
||||
ICharinfo.Activate()
|
||||
End Sub
|
||||
|
||||
'<27><><EFBFBD><EFBFBD><EFBFBD>۰<EFBFBD><DBB0><EFBFBD>
|
||||
Private Sub mnu_3_2_CharItemInfo_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles mnu_3_2_CharItemInfo.Click
|
||||
'If ICharItemInfo Is Nothing Then
|
||||
' ICharItemInfo = New CharItemInfo()
|
||||
' ICharItemInfo.MdiParent = Me
|
||||
' ICharItemInfo.Show()
|
||||
' ICharItemInfo.WindowState = FormWindowState.Maximized
|
||||
'End If
|
||||
'ICharItemInfo.Activate()
|
||||
End Sub
|
||||
|
||||
Private Sub mnu_2_2_lastUserCheck_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles mnu_2_2_lastUserCheck.Click
|
||||
If IUserLastLogOut Is Nothing Then
|
||||
IUserLastLogOut = New UserLastLogOut()
|
||||
IUserLastLogOut.MdiParent = Me
|
||||
IUserLastLogOut.Show()
|
||||
IUserLastLogOut.WindowState = FormWindowState.Maximized
|
||||
End If
|
||||
IUserLastLogOut.Activate()
|
||||
End Sub
|
||||
End Class
|
||||
269
Server/ToolProject/RCMS_Tool/TextString.xml
Normal file
269
Server/ToolProject/RCMS_Tool/TextString.xml
Normal file
@@ -0,0 +1,269 @@
|
||||
<?xml version="1.0" encoding="utf-8" standalone="no"?>
|
||||
<Form>
|
||||
<TextAdminInfo>
|
||||
<cbosearchtypeitem_total>전체</cbosearchtypeitem_total>
|
||||
<cbosearchtypeitem_adminid>관리자ID</cbosearchtypeitem_adminid>
|
||||
<admininfo_header>운영자관리</admininfo_header>
|
||||
<adminInfo_title>운영자관리</adminInfo_title>
|
||||
<admin_adminid>운영자ID</admin_adminid>
|
||||
<admininfo_name>성명</admininfo_name>
|
||||
<admininfo_pass>패스워드</admininfo_pass>
|
||||
<admininfo_pass2>패스워드확인</admininfo_pass2>
|
||||
<admininfo_ip>아이피</admininfo_ip>
|
||||
<admininfo_rights>권한</admininfo_rights>
|
||||
<cboadminkind_admin>관리자</cboadminkind_admin>
|
||||
<cboadminkind_subadmin>운영파트장</cboadminkind_subadmin>
|
||||
<cboadminkind_part>일반운영자</cboadminkind_part>
|
||||
</TextAdminInfo>
|
||||
<TextButton>
|
||||
<btnSearch>찾기</btnSearch>
|
||||
<btnDelete>삭제</btnDelete>
|
||||
<btnEdit>수정</btnEdit>
|
||||
<btnCreate>생성</btnCreate>
|
||||
<btnCreate_Real>ID등록</btnCreate_Real>
|
||||
<btnSetting>권한설정</btnSetting>
|
||||
<btnLogin>접속</btnLogin>
|
||||
<btnEnd>종료</btnEnd>
|
||||
<btnSeeItem>소유아이템보기</btnSeeItem>
|
||||
<btnCommit>수정완료</btnCommit>
|
||||
<btnSearchCharinfo>캐릭별검색</btnSearchCharinfo>
|
||||
<btnMove>위치변경</btnMove>
|
||||
<btnClose>창닫기</btnClose>
|
||||
<btnLogout>강제로그아웃</btnLogout>
|
||||
</TextButton>
|
||||
<TextMSG>
|
||||
<msg_success>성공</msg_success>
|
||||
<msg_faild>실패</msg_faild>
|
||||
<msg_error>오류</msg_error>
|
||||
<msg_confirm>확인</msg_confirm>
|
||||
<msg_inputadminid>검색하고 싶은 검색어를 입력해주세요</msg_inputadminid >
|
||||
<msg_regadmin>등록할 관리자 아이디를 입력해주세요</msg_regadmin>
|
||||
<msg_passadmin>빈 암호이거나 암호확인이 틀렸습니다.다시 비밀번호를 입력해주세요</msg_passadmin>
|
||||
<msg_confirmdel>아이디를 정말 삭제하시겠습니까?</msg_confirmdel>
|
||||
<msg_cancel>취소하였습니다</msg_cancel>
|
||||
<msg_confirmedit>수정할 아이디를 선택해주세요</msg_confirmedit>
|
||||
<msg_disconn>서버와의 접속이 끊어졌습니다.</msg_disconn>
|
||||
<msg_login>아이디를 입력해 주세요</msg_login>
|
||||
<msg_pass>패스워드를 입력해 주세요</msg_pass>
|
||||
<msg_commit>캐릭터 수정이 있었습니다.수정안된 상태로 종료합니다. 창 닫기를 취소하시려면 확인, 창을 닫으시려면 취소 버튼을 눌러주세요.</msg_commit>
|
||||
<msg_charedit>캐릭터를 에디터하시겠습니까?</msg_charedit>
|
||||
<msg_changelocation>캐릭터 위치를 변경하겠습니까?</msg_changelocation>
|
||||
<msg_selectchar>검색하고 싶은 캐릭터를 리스트박스에서 선택해주세요</msg_selectchar>
|
||||
<msg_permit>사용권한이 없는 계정으로 로그인 하셨습니다</msg_permit>
|
||||
<msg_itemchange>해당 아이템을 변경하시겠습니까?</msg_itemchange>
|
||||
<msg_itemdel>해당 아이템을 정말 삭제하시겠습니까?</msg_itemdel>
|
||||
<msg_itemcreate>해당 아이템을 정말 생성하시겠습니까?</msg_itemcreate>
|
||||
<msg_logout>계정을 강제 로그아웃 시키겠습니까?</msg_logout>
|
||||
</TextMSG>
|
||||
<TextAdminSetting>
|
||||
<form_header>운영자권한설정</form_header>
|
||||
<lbltitle>운영자권한설정</lbltitle>
|
||||
<grbcharadmin>캐릭터 관리</grbcharadmin>
|
||||
<chkCharedit>정보수정</chkCharedit>
|
||||
<chkCharlocation>좌표이동</chkCharlocation>
|
||||
<chkCharSeeItem>소유아이템보기</chkCharSeeItem>
|
||||
<grbrestraint>캐릭터 제재관리</grbrestraint>
|
||||
<chkRestraintReg>제재등록</chkRestraintReg>
|
||||
<chkRestraintRelease>제재해제</chkRestraintRelease>
|
||||
<grbitemadmin>아이템 관리</grbitemadmin>
|
||||
<chkItemReg>아이템생성</chkItemReg>
|
||||
<chkItemedit>아이템수정</chkItemedit>
|
||||
<chkItemDelete>아이템삭제</chkItemDelete>
|
||||
<grblogout>강제 접속 끊기</grblogout>
|
||||
<chkCurrentLogin>현재 로그인 체크</chkCurrentLogin>
|
||||
<chkLastLogin>과거 로그 기록 검색</chkLastLogin>
|
||||
<chkDoingLogout>강제로그아웃하기</chkDoingLogout>
|
||||
</TextAdminSetting>
|
||||
<TextLogin>
|
||||
<formheader>사용자 접속하기</formheader>
|
||||
<lbllogin>로그인</lbllogin>
|
||||
<lblpass>패스워드</lblpass>
|
||||
</TextLogin>
|
||||
<TextCharInfo>
|
||||
<formheader>캐릭터 정보관리</formheader>
|
||||
<lbltitle>캐릭터 정보보기</lbltitle>
|
||||
<grbsearch>정보조회</grbsearch>
|
||||
<cboidtype_uid>UID</cboidtype_uid>
|
||||
<cboidtype_name>캐릭터명</cboidtype_name>
|
||||
<grbcharinfo>상세정보</grbcharinfo>
|
||||
<lblcid>CID</lblcid>
|
||||
<lblmw>성별</lblmw>
|
||||
<lblhead>머리</lblhead>
|
||||
<lblkind>종족</lblkind>
|
||||
<lblface>얼굴</lblface>
|
||||
<lblclass>클래스</lblclass>
|
||||
<lblmi>마일리지</lblmi>
|
||||
<lblfame>명성</lblfame>
|
||||
<lblmoney>돈</lblmoney>
|
||||
<lblguild>길드</lblguild>
|
||||
<lblparty>파티</lblparty>
|
||||
<lblip>IP</lblip>
|
||||
<lbllevel>레벨</lbllevel>
|
||||
<lblstr>STR</lblstr>
|
||||
<lbldex>DEX</lbldex>
|
||||
<lblcon>CON</lblcon>
|
||||
<lblini>INI</lblini>
|
||||
<lblwis>WIS</lblwis>
|
||||
<lblhp>HP</lblhp>
|
||||
<lblmp>MP</lblmp>
|
||||
<lblexp>EXP</lblexp>
|
||||
<grblocation>위치좌표</grblocation>
|
||||
<lblx>좌표X</lblx>
|
||||
<lbly>좌표Y</lbly>
|
||||
<lblz>좌표Z</lblz>
|
||||
</TextCharInfo>
|
||||
<TextItemInfo>
|
||||
<formheader>아이템 관리</formheader>
|
||||
<cboitemwhere_1>장비</cboitemwhere_1>
|
||||
<cboitemwhere_2>인벤토리</cboitemwhere_2>
|
||||
<cboitemwhere_3>임시</cboitemwhere_3>
|
||||
<cboitemwhere_4>업그레이드창</cboitemwhere_4>
|
||||
<cboitemwhere_5>교환창</cboitemwhere_5>
|
||||
<cboitemwhere_6>창고</cboitemwhere_6>
|
||||
</TextItemInfo>
|
||||
<TextCharRestraint>
|
||||
<formheader>캐릭터제재</formheader>
|
||||
<lblserver>서버선택</lblserver>
|
||||
<lblsearchwide>조회범위선택</lblsearchwide>
|
||||
<lbluid>UID(유저인덱스)</lbluid>
|
||||
<cboType_1>전체검색</cboType_1>
|
||||
<cboType_2>부분검색</cboType_2>
|
||||
</TextCharRestraint>
|
||||
<TextRylMDI>
|
||||
<formheader>CRMTool</formheader>
|
||||
<title_1>운영자관리</title_1>
|
||||
<title_2>유저관리</title_2>
|
||||
<title_2_1>접속여부 / 강제로그아웃</title_2_1>
|
||||
<title_2_2>과거사용내역보기</title_2_2>
|
||||
<title_3>캐릭터관리</title_3>
|
||||
<title_3_1>캐릭터정보</title_3_1>
|
||||
<title_3_2>아이템관리</title_3_2>
|
||||
<title_3_3>캐릭터제재</title_3_3>
|
||||
</TextRylMDI>
|
||||
<TextUserLogOut>
|
||||
<formheader_last>과거 로그인/로그아웃 기록</formheader_last>
|
||||
<formheader_curr>로그인 체크 / 강제 로그아웃</formheader_curr>
|
||||
<lblhanaccount>한게임계정</lblhanaccount>
|
||||
</TextUserLogOut>
|
||||
<TextCharRestraintreg>
|
||||
<formheader>캐릭터제재 등록</formheader>
|
||||
<lblrestraintwide>제재범위선택</lblrestraintwide>
|
||||
<cbowide_text>--선택해주세요--</cbowide_text>
|
||||
<cbowide_1>계정블럭</cbowide_1>
|
||||
<cbowide_2>캐릭블럭</cbowide_2>
|
||||
<lblblockkind>블럭종류</lblblockkind>
|
||||
<cboblock_1>영구블럭</cboblock_1>
|
||||
<cboblock_2>임시블럭</cboblock_2>
|
||||
<lblrestraintway>제재방법</lblrestraintway>
|
||||
<lblrestrainttime>처리시간</lblrestrainttime>
|
||||
<lblrestraintfrom>지금부터</lblrestraintfrom>
|
||||
<lblrestraintto>일 동안 블럭</lblrestraintto>
|
||||
<lblrestraintwhy>제재사유</lblrestraintwhy>
|
||||
<cbowhy_1>인격침해</cbowhy_1>
|
||||
<cbowhy_2>성적수치심유발</cbowhy_2>
|
||||
<cbowhy_3>부모님욕설</cbowhy_3>
|
||||
<cbowhy_4>비방/욕설</cbowhy_4>
|
||||
<cbowhy_5>허위해킹/복구/사기신고</cbowhy_5>
|
||||
<cbowhy_6>버그플레이</cbowhy_6>
|
||||
<cbowhy_7>불법프로그램사용및해포</cbowhy_7>
|
||||
</TextCharRestraintreg>
|
||||
<TextCharItemInfoDetail>
|
||||
<formheader>아이템 상세정보</formheader>
|
||||
<grbcharinfo>소유캐릭터정보</grbcharinfo>
|
||||
<lblserver>서버명</lblserver>
|
||||
<grbiteminfo_1>아이템기본정보</grbiteminfo_1>
|
||||
<lblitemnum>아이템번호</lblitemnum>
|
||||
<lblitemname>아이템이름</lblitemname>
|
||||
<lblequip>장비여부</lblequip>
|
||||
<lblitemprototype>아이템ProtoType</lblitemprototype>
|
||||
<lblitemtype>아이템Type</lblitemtype>
|
||||
<lblitemwhere>아이템장소</lblitemwhere>
|
||||
<lblitemxyz>아이템위치</lblitemxyz>
|
||||
<lblitemsize>아이템크기</lblitemsize>
|
||||
<grbiteminfo_2>아이템 속성정보1</grbiteminfo_2>
|
||||
<lblrunesocket>RuneSocket</lblrunesocket>
|
||||
<lblmaxdurability>MaxDurability</lblmaxdurability>
|
||||
<lblcurrsocket>CurrSocket</lblcurrsocket>
|
||||
<lblmaxsocket>MaxSocket</lblmaxsocket>
|
||||
<lblmaterial>Material</lblmaterial>
|
||||
<lblsocket1>Socket1</lblsocket1>
|
||||
<lblsocket2>Socket2</lblsocket2>
|
||||
<lblsocket3>Socket3</lblsocket3>
|
||||
<lblsocket4>Socket4</lblsocket4>
|
||||
<lblsocket5>Socket5</lblsocket5>
|
||||
<lblsocket6>Socket6</lblsocket6>
|
||||
<lblsocket7>Socket7</lblsocket7>
|
||||
<lblsocket8>Socket8</lblsocket8>
|
||||
<grbiteminfo_3>아이템 속성정보2</grbiteminfo_3>
|
||||
<lblcritical_type>CRITICAL_TYPE(크리티컬종류)</lblcritical_type>
|
||||
<lblcritical_percentage>CRITICAL_PERCENTAGE(크리티컬확률)</lblcritical_percentage>
|
||||
<lblmin_damage>MIN_DAMAGE(최소데미지)</lblmin_damage>
|
||||
<lblmax_damage>MAX_DAMAGE(최대데미지)</lblmax_damage>
|
||||
<lbldrc>DRC</lbldrc>
|
||||
<lbloffence_revision>OFFENCE_REVISION(공격보정)</lbloffence_revision>
|
||||
<lbldefence>DEFENCE(방어)</lbldefence>
|
||||
<lbldefence_revision>DEFENCE_REVISION(방어보정)</lbldefence_revision>
|
||||
<lblmagic_resistantage>MAGIC_RESISTANCE(마법저항력)</lblmagic_resistantage>
|
||||
<lblblocking_percentage>BLOCKING_PERCENTAGE(방어확률)</lblblocking_percentage>
|
||||
<lblmax_hp>MAX_HP(HP최대치증가)</lblmax_hp>
|
||||
<lblmax_mp>MAX_MP(MP최대치증가)</lblmax_mp>
|
||||
<lblhp_regent_amount>HP_REGEN_AMOUNT(HP회복)</lblhp_regent_amount>
|
||||
<lblmp_regen_amount>MP_REGEN_AMOUNT(MP회복)</lblmp_regen_amount>
|
||||
<lblfire_attack>FIRE_ATTACK(불 속성)</lblfire_attack>
|
||||
<lbllightning_attack>LIGHTNING_ATTACK(번개속성)</lbllightning_attack>
|
||||
<lblcold_attack>COLD_ATTACK(냉기속성)</lblcold_attack>
|
||||
<lbldrain_attack>DRAIN_ATTACK(흡수속성)</lbldrain_attack>
|
||||
<lblpoison_attack>POISON_ATTACK(독속성)</lblpoison_attack>
|
||||
<lblfire_resistance>FIRE_RESISTANCE(불저항성)</lblfire_resistance>
|
||||
<lbllightning_resistance>LIGHTNING_RESISTANCE(번개저항성)</lbllightning_resistance>
|
||||
<lblcold_resistance>COLD_RESISTANCE(냉기저항성)</lblcold_resistance>
|
||||
<lbldrain_resistance>DRAIN_RESISTANCE(흡수저항성)</lbldrain_resistance>
|
||||
<lblpoison_resistance>POISON_RESISTANCE(독저항성)</lblpoison_resistance>
|
||||
<lbladd_str>ADD_STR(STR증가)</lbladd_str>
|
||||
<lbladd_dex>ADD_DEX(DEX증가)</lbladd_dex>
|
||||
<lbladd_con>ADD_CON(CON증가)</lbladd_con>
|
||||
<lbladd_int>ADD_INT(INT증가)</lbladd_int>
|
||||
<lbladd_wis>ADD_WIS(WIS증가)</lbladd_wis>
|
||||
<lblamount_1>갯수</lblamount_1>
|
||||
<lblamount_2>내구도</lblamount_2>
|
||||
</TextCharItemInfoDetail>
|
||||
|
||||
<TextProcessPacket>
|
||||
<msg_error_1>관리자 로그인에 실패하였습니다</msg_error_1>
|
||||
<msg_success_1>관리자 등록을 성공하였습니다</msg_success_1>
|
||||
<msg_error_2>관리자 등록을 실패하였습니다. 다시 확인해주세요</msg_error_2>
|
||||
<msg_error_3>관리자가 존재하지 않습니다. 아이디를 확인하고 다시 검색해주세요</msg_error_3>
|
||||
<msg_error_4>관리자가 존재하지 않습니다. 관리자가 한명도 없습니다</msg_error_4>
|
||||
<msg_success_2>관리자정보를 변경하였습니다.</msg_success_2>
|
||||
<msg_error_5>관리자정보를 변경하는데 실패하였습니다. 다시 확인해주세요</msg_error_5>
|
||||
<msg_success_3>해당 관리자를 삭제하였습니다</msg_success_3>
|
||||
<msg_error_6>해당 관리자를 삭제하는데 실패하였습니다. 다시 확인해주세요</msg_error_6>
|
||||
<msg_error_7>현재 접속중인 유저가 아닙니다.다시 확인해 주세요</msg_error_7>
|
||||
<msg_success_4>해당 유저를 강제 로그아웃 시켰습니다</msg_success_4>
|
||||
<msg_error_8>해당 유저를 강제 로그아웃을 실패하였습니다. 다시 확인해주세요</msg_error_8>
|
||||
<msg_success_5>해당 유저의 제재에 성공하였습니다</msg_success_5>
|
||||
<msg_error_9>해당 유저의 제재에 실패하였습니다.</msg_error_9>
|
||||
<msg_success_6>해당 유저의 제재 해제에 성공하였습니다</msg_success_6>
|
||||
<msg_error_10>해당 유저의 제재 해제에 실패하였습니다</msg_error_10>
|
||||
<msg_error_11>캐릭터가 존재하지 않습니다</msg_error_11>
|
||||
<msg_success_7>캐릭터 정보 얻어 오기 성공</msg_success_7>
|
||||
<msg_error_12>캐릭터 정보 얻어 오기 실패</msg_error_12>
|
||||
<msg_success_8>아이템 최종 업데이트에 성공하였습니다</msg_success_8>
|
||||
<msg_error_13>아이템 최종 업데이트를 실패하였습니다</msg_error_13>
|
||||
<msg_success_9>캐릭터 데이터 업데이트에 성공하였습니다</msg_success_9>
|
||||
<msg_error_14>캐릭터 데이터 업데이트를 실패하였습니다</msg_error_14>
|
||||
<msg_success_10>캐릭터 마지막 위치 업데이트에 성공하였습니다</msg_success_10>
|
||||
<msg_error_15>캐릭터 마지막 위치 업데이트를 실패하였습니다</msg_error_15>
|
||||
<msg_success_11>아이템 생성을 성공하였습니다</msg_success_11>
|
||||
<msg_error_16>아이템 생성을 실패하였습니다</msg_error_16>
|
||||
<msg_success_12>아이템 업데이트를 성공하였습니다</msg_success_12>
|
||||
<msg_error_17>아이템 업데이트를 실패하였습니다</msg_error_17>
|
||||
<msg_success_13>아이템 삭제를 성공하였습니다</msg_success_13>
|
||||
<msg_error_18>아이템 삭제를 실패하였습니다</msg_error_18>
|
||||
<msg_error_19>운영자 권한을 얻어오거나 세팅하는 데 실패하였습니다</msg_error_19>
|
||||
</TextProcessPacket>
|
||||
|
||||
|
||||
</Form>
|
||||
|
||||
|
||||
120
Server/ToolProject/RCMS_Tool/UserLastLogOut.resx
Normal file
120
Server/ToolProject/RCMS_Tool/UserLastLogOut.resx
Normal file
@@ -0,0 +1,120 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 1.3
|
||||
|
||||
The primary goals of this format is to allow a simple XML format
|
||||
that is mostly human readable. The generation and parsing of the
|
||||
various data types are done through the TypeConverter classes
|
||||
associated with the data types.
|
||||
|
||||
Example:
|
||||
|
||||
... ado.net/XML headers & schema ...
|
||||
<resheader name="resmimetype">text/microsoft-resx</resheader>
|
||||
<resheader name="version">1.3</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1">this is my long string</data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
[base64 mime encoded serialized .NET Framework object]
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
[base64 mime encoded string representing a byte array form of the .NET Framework object]
|
||||
</data>
|
||||
|
||||
There are any number of "resheader" rows that contain simple
|
||||
name/value pairs.
|
||||
|
||||
Each data row contains a name, and value. The row also contains a
|
||||
type or mimetype. Type corresponds to a .NET class that support
|
||||
text/value conversion through the TypeConverter architecture.
|
||||
Classes that don't support this are serialized and stored with the
|
||||
mimetype set.
|
||||
|
||||
The mimetype is used for serialized objects, and tells the
|
||||
ResXResourceReader how to depersist the object. This is currently not
|
||||
extensible. For a given mimetype the value must be set accordingly:
|
||||
|
||||
Note - application/x-microsoft.net.object.binary.base64 is the format
|
||||
that the ResXResourceWriter will generate, however the reader can
|
||||
read any of the formats listed below.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.binary.base64
|
||||
value : The object must be serialized with
|
||||
: System.Serialization.Formatters.Binary.BinaryFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.soap.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
mimetype: application/x-microsoft.net.object.bytearray.base64
|
||||
value : The object must be serialized into a byte array
|
||||
: using a System.ComponentModel.TypeConverter
|
||||
: and then encoded with base64 encoding.
|
||||
-->
|
||||
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="data">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="resheader">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:choice>
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:schema>
|
||||
<resheader name="resmimetype">
|
||||
<value>text/microsoft-resx</value>
|
||||
</resheader>
|
||||
<resheader name="version">
|
||||
<value>1.3</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<data name="lbltitle.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="grb_1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblhanaccount.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="btnSearch.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtSearchID.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="grdResult.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="$this.Name">
|
||||
<value>UserLastLogOut</value>
|
||||
</data>
|
||||
</root>
|
||||
175
Server/ToolProject/RCMS_Tool/UserLastLogOut.vb
Normal file
175
Server/ToolProject/RCMS_Tool/UserLastLogOut.vb
Normal file
@@ -0,0 +1,175 @@
|
||||
Imports System.Text
|
||||
|
||||
|
||||
Public Class UserLastLogOut
|
||||
Inherits System.Windows.Forms.Form
|
||||
|
||||
#Region " Windows Form Designer generated code "
|
||||
|
||||
Public Sub New()
|
||||
MyBase.New()
|
||||
|
||||
'This call is required by the Windows Form Designer.
|
||||
InitializeComponent()
|
||||
|
||||
'Add any initialization after the InitializeComponent() call
|
||||
|
||||
End Sub
|
||||
|
||||
'Form overrides dispose to clean up the component list.
|
||||
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
If disposing Then
|
||||
If Not (components Is Nothing) Then
|
||||
components.Dispose()
|
||||
End If
|
||||
End If
|
||||
MyBase.Dispose(disposing)
|
||||
End Sub
|
||||
|
||||
'Required by the Windows Form Designer
|
||||
Private components As System.ComponentModel.IContainer
|
||||
|
||||
'NOTE: The following procedure is required by the Windows Form Designer
|
||||
'It can be modified using the Windows Form Designer.
|
||||
'Do not modify it using the code editor.
|
||||
Friend WithEvents btnSearch As System.Windows.Forms.Button
|
||||
Friend WithEvents txtSearchID As System.Windows.Forms.TextBox
|
||||
Friend WithEvents grdResult As System.Windows.Forms.DataGrid
|
||||
Friend WithEvents lbltitle As System.Windows.Forms.Label
|
||||
Friend WithEvents grb_1 As System.Windows.Forms.GroupBox
|
||||
Friend WithEvents lblhanaccount As System.Windows.Forms.Label
|
||||
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
|
||||
Me.lbltitle = New System.Windows.Forms.Label()
|
||||
Me.grb_1 = New System.Windows.Forms.GroupBox()
|
||||
Me.lblhanaccount = New System.Windows.Forms.Label()
|
||||
Me.btnSearch = New System.Windows.Forms.Button()
|
||||
Me.txtSearchID = New System.Windows.Forms.TextBox()
|
||||
Me.grdResult = New System.Windows.Forms.DataGrid()
|
||||
Me.grb_1.SuspendLayout()
|
||||
CType(Me.grdResult, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'lbltitle
|
||||
'
|
||||
Me.lbltitle.AutoSize = True
|
||||
Me.lbltitle.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbltitle.Font = New System.Drawing.Font("Gulim", 14.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
|
||||
Me.lbltitle.Location = New System.Drawing.Point(392, 64)
|
||||
Me.lbltitle.Name = "lbltitle"
|
||||
Me.lbltitle.Size = New System.Drawing.Size(248, 24)
|
||||
Me.lbltitle.TabIndex = 1
|
||||
Me.lbltitle.Text = "<EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20>α<EFBFBD><CEB1><EFBFBD>/<2F>αƿ<D7BE> <20><><EFBFBD><EFBFBD>"
|
||||
'
|
||||
'grb_1
|
||||
'
|
||||
Me.grb_1.Controls.AddRange(New System.Windows.Forms.Control() {Me.lblhanaccount, Me.btnSearch, Me.txtSearchID})
|
||||
Me.grb_1.Location = New System.Drawing.Point(80, 104)
|
||||
Me.grb_1.Name = "grb_1"
|
||||
Me.grb_1.Size = New System.Drawing.Size(528, 64)
|
||||
Me.grb_1.TabIndex = 2
|
||||
Me.grb_1.TabStop = False
|
||||
'
|
||||
'lblhanaccount
|
||||
'
|
||||
Me.lblhanaccount.AutoSize = True
|
||||
Me.lblhanaccount.Location = New System.Drawing.Point(60, 28)
|
||||
Me.lblhanaccount.Name = "lblhanaccount"
|
||||
Me.lblhanaccount.Size = New System.Drawing.Size(66, 14)
|
||||
Me.lblhanaccount.TabIndex = 2
|
||||
Me.lblhanaccount.Text = "<EFBFBD>Ѱ<EFBFBD><EFBFBD>Ӱ<EFBFBD><EFBFBD><EFBFBD>"
|
||||
'
|
||||
'btnSearch
|
||||
'
|
||||
Me.btnSearch.Location = New System.Drawing.Point(320, 24)
|
||||
Me.btnSearch.Name = "btnSearch"
|
||||
Me.btnSearch.Size = New System.Drawing.Size(88, 24)
|
||||
Me.btnSearch.TabIndex = 1
|
||||
Me.btnSearch.Text = "<EFBFBD>˻<EFBFBD>"
|
||||
'
|
||||
'txtSearchID
|
||||
'
|
||||
Me.txtSearchID.Location = New System.Drawing.Point(144, 24)
|
||||
Me.txtSearchID.Name = "txtSearchID"
|
||||
Me.txtSearchID.Size = New System.Drawing.Size(136, 21)
|
||||
Me.txtSearchID.TabIndex = 0
|
||||
Me.txtSearchID.Text = ""
|
||||
'
|
||||
'grdResult
|
||||
'
|
||||
Me.grdResult.DataMember = ""
|
||||
Me.grdResult.HeaderForeColor = System.Drawing.SystemColors.ControlText
|
||||
Me.grdResult.Location = New System.Drawing.Point(80, 176)
|
||||
Me.grdResult.Name = "grdResult"
|
||||
Me.grdResult.Size = New System.Drawing.Size(848, 488)
|
||||
Me.grdResult.TabIndex = 3
|
||||
'
|
||||
'UserLastLogOut
|
||||
'
|
||||
Me.AutoScaleBaseSize = New System.Drawing.Size(6, 14)
|
||||
Me.ClientSize = New System.Drawing.Size(864, 753)
|
||||
Me.Controls.AddRange(New System.Windows.Forms.Control() {Me.grdResult, Me.grb_1, Me.lbltitle})
|
||||
Me.Name = "UserLastLogOut"
|
||||
Me.Text = "UserLastLotOut"
|
||||
Me.grb_1.ResumeLayout(False)
|
||||
CType(Me.grdResult, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.ResumeLayout(False)
|
||||
|
||||
End Sub
|
||||
|
||||
#End Region
|
||||
|
||||
|
||||
Public Sub CurrentUserRefresh()
|
||||
|
||||
btnSearch.Enabled = False
|
||||
|
||||
If txtSearchID.Text = "" Then
|
||||
MsgBox(ITextMSG.msg_inputadminid, MsgBoxStyle.OKOnly, ITextMSG.msg_confirm)
|
||||
txtSearchID.Focus()
|
||||
btnSearch.Enabled = True
|
||||
Exit Sub
|
||||
End If
|
||||
|
||||
'Ư<><C6AF> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> ID <20>˻<EFBFBD> <20><>Ŷ
|
||||
SendPacket.SendViewLoginoutLog(txtSearchID.Text)
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btnSearch_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnSearch.Click
|
||||
|
||||
ds.Tables(LastUserIndex).Clear()
|
||||
CurrentUserRefresh()
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub UserLastLogOut_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
|
||||
|
||||
ProcessPacket.IUserLastLogout = Me
|
||||
|
||||
txtSearchID.MaxLength = 15
|
||||
|
||||
Me.Text = ITextUserLogOut.formheader_last
|
||||
Me.lbltitle.Text = ITextUserLogOut.formheader_last
|
||||
Me.lblhanaccount.Text = ITextUserLogOut.lblhanaccount
|
||||
btnSearch.Text = ITextButton.btnSearch
|
||||
|
||||
|
||||
ds.Tables(LastUserIndex).Clear()
|
||||
grdResult.DataSource = ds.Tables(LastUserIndex)
|
||||
|
||||
If IToolAdminRight.lastUserLogin = False Then
|
||||
btnSearch.Enabled = False
|
||||
Else
|
||||
btnSearch.Enabled = True
|
||||
End If
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub UserLastLogOut_UnLoad(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Closed
|
||||
|
||||
ProcessPacket.IUserLastLogout = Nothing
|
||||
ProcessPacket.IRylMDI.IUserLastLogOut = Nothing
|
||||
|
||||
End Sub
|
||||
|
||||
End Class
|
||||
123
Server/ToolProject/RCMS_Tool/UserLogin.resx
Normal file
123
Server/ToolProject/RCMS_Tool/UserLogin.resx
Normal file
@@ -0,0 +1,123 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 1.3
|
||||
|
||||
The primary goals of this format is to allow a simple XML format
|
||||
that is mostly human readable. The generation and parsing of the
|
||||
various data types are done through the TypeConverter classes
|
||||
associated with the data types.
|
||||
|
||||
Example:
|
||||
|
||||
... ado.net/XML headers & schema ...
|
||||
<resheader name="resmimetype">text/microsoft-resx</resheader>
|
||||
<resheader name="version">1.3</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1">this is my long string</data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
[base64 mime encoded serialized .NET Framework object]
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
[base64 mime encoded string representing a byte array form of the .NET Framework object]
|
||||
</data>
|
||||
|
||||
There are any number of "resheader" rows that contain simple
|
||||
name/value pairs.
|
||||
|
||||
Each data row contains a name, and value. The row also contains a
|
||||
type or mimetype. Type corresponds to a .NET class that support
|
||||
text/value conversion through the TypeConverter architecture.
|
||||
Classes that don't support this are serialized and stored with the
|
||||
mimetype set.
|
||||
|
||||
The mimetype is used for serialized objects, and tells the
|
||||
ResXResourceReader how to depersist the object. This is currently not
|
||||
extensible. For a given mimetype the value must be set accordingly:
|
||||
|
||||
Note - application/x-microsoft.net.object.binary.base64 is the format
|
||||
that the ResXResourceWriter will generate, however the reader can
|
||||
read any of the formats listed below.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.binary.base64
|
||||
value : The object must be serialized with
|
||||
: System.Serialization.Formatters.Binary.BinaryFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.soap.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
mimetype: application/x-microsoft.net.object.bytearray.base64
|
||||
value : The object must be serialized into a byte array
|
||||
: using a System.ComponentModel.TypeConverter
|
||||
: and then encoded with base64 encoding.
|
||||
-->
|
||||
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="data">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="resheader">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:choice>
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:schema>
|
||||
<resheader name="resmimetype">
|
||||
<value>text/microsoft-resx</value>
|
||||
</resheader>
|
||||
<resheader name="version">
|
||||
<value>1.3</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<data name="lbltitle.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="GroupBox1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="btnSearch.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="txtSearchID.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="grdResult.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="btnLogOut.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="lblhanaccount.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="$this.Name">
|
||||
<value>UserLogin</value>
|
||||
</data>
|
||||
</root>
|
||||
226
Server/ToolProject/RCMS_Tool/UserLogin.vb
Normal file
226
Server/ToolProject/RCMS_Tool/UserLogin.vb
Normal file
@@ -0,0 +1,226 @@
|
||||
|
||||
Imports System.Text
|
||||
|
||||
Public Class UserLogin
|
||||
Inherits System.Windows.Forms.Form
|
||||
|
||||
#Region " Windows Form Designer generated code "
|
||||
|
||||
Public Sub New()
|
||||
MyBase.New()
|
||||
|
||||
'This call is required by the Windows Form Designer.
|
||||
InitializeComponent()
|
||||
|
||||
'Add any initialization after the InitializeComponent() call
|
||||
|
||||
End Sub
|
||||
|
||||
'Form overrides dispose to clean up the component list.
|
||||
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
If disposing Then
|
||||
If Not (components Is Nothing) Then
|
||||
components.Dispose()
|
||||
End If
|
||||
End If
|
||||
MyBase.Dispose(disposing)
|
||||
End Sub
|
||||
|
||||
'Required by the Windows Form Designer
|
||||
Private components As System.ComponentModel.IContainer
|
||||
|
||||
'NOTE: The following procedure is required by the Windows Form Designer
|
||||
'It can be modified using the Windows Form Designer.
|
||||
'Do not modify it using the code editor.
|
||||
Friend WithEvents GroupBox1 As System.Windows.Forms.GroupBox
|
||||
Friend WithEvents txtSearchID As System.Windows.Forms.TextBox
|
||||
Friend WithEvents btnSearch As System.Windows.Forms.Button
|
||||
Friend WithEvents grdResult As System.Windows.Forms.DataGrid
|
||||
Friend WithEvents btnLogOut As System.Windows.Forms.Button
|
||||
Friend WithEvents lblhanaccount As System.Windows.Forms.Label
|
||||
Friend WithEvents lbltitle As System.Windows.Forms.Label
|
||||
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
|
||||
Me.lbltitle = New System.Windows.Forms.Label()
|
||||
Me.GroupBox1 = New System.Windows.Forms.GroupBox()
|
||||
Me.btnSearch = New System.Windows.Forms.Button()
|
||||
Me.txtSearchID = New System.Windows.Forms.TextBox()
|
||||
Me.grdResult = New System.Windows.Forms.DataGrid()
|
||||
Me.btnLogOut = New System.Windows.Forms.Button()
|
||||
Me.lblhanaccount = New System.Windows.Forms.Label()
|
||||
Me.GroupBox1.SuspendLayout()
|
||||
CType(Me.grdResult, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'lbltitle
|
||||
'
|
||||
Me.lbltitle.AutoSize = True
|
||||
Me.lbltitle.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbltitle.Font = New System.Drawing.Font("Gulim", 14.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
|
||||
Me.lbltitle.Location = New System.Drawing.Point(440, 48)
|
||||
Me.lbltitle.Name = "lbltitle"
|
||||
Me.lbltitle.Size = New System.Drawing.Size(261, 24)
|
||||
Me.lbltitle.TabIndex = 0
|
||||
Me.lbltitle.Text = "<EFBFBD>α<EFBFBD><EFBFBD><EFBFBD> üũ / <20><><EFBFBD><EFBFBD> <20>αƿ<D7BE>"
|
||||
'
|
||||
'GroupBox1
|
||||
'
|
||||
Me.GroupBox1.Controls.AddRange(New System.Windows.Forms.Control() {Me.lblhanaccount, Me.btnSearch, Me.txtSearchID})
|
||||
Me.GroupBox1.Location = New System.Drawing.Point(80, 88)
|
||||
Me.GroupBox1.Name = "GroupBox1"
|
||||
Me.GroupBox1.Size = New System.Drawing.Size(528, 64)
|
||||
Me.GroupBox1.TabIndex = 1
|
||||
Me.GroupBox1.TabStop = False
|
||||
'
|
||||
'btnSearch
|
||||
'
|
||||
Me.btnSearch.Location = New System.Drawing.Point(320, 24)
|
||||
Me.btnSearch.Name = "btnSearch"
|
||||
Me.btnSearch.Size = New System.Drawing.Size(88, 24)
|
||||
Me.btnSearch.TabIndex = 1
|
||||
Me.btnSearch.Text = "<EFBFBD>˻<EFBFBD>"
|
||||
'
|
||||
'txtSearchID
|
||||
'
|
||||
Me.txtSearchID.Location = New System.Drawing.Point(144, 24)
|
||||
Me.txtSearchID.Name = "txtSearchID"
|
||||
Me.txtSearchID.Size = New System.Drawing.Size(136, 21)
|
||||
Me.txtSearchID.TabIndex = 0
|
||||
Me.txtSearchID.Text = ""
|
||||
'
|
||||
'grdResult
|
||||
'
|
||||
Me.grdResult.DataMember = ""
|
||||
Me.grdResult.HeaderForeColor = System.Drawing.SystemColors.ControlText
|
||||
Me.grdResult.Location = New System.Drawing.Point(80, 160)
|
||||
Me.grdResult.Name = "grdResult"
|
||||
Me.grdResult.Size = New System.Drawing.Size(848, 216)
|
||||
Me.grdResult.TabIndex = 2
|
||||
'
|
||||
'btnLogOut
|
||||
'
|
||||
Me.btnLogOut.Location = New System.Drawing.Point(496, 408)
|
||||
Me.btnLogOut.Name = "btnLogOut"
|
||||
Me.btnLogOut.Size = New System.Drawing.Size(128, 32)
|
||||
Me.btnLogOut.TabIndex = 3
|
||||
Me.btnLogOut.Text = "<EFBFBD>αƿ<EFBFBD>"
|
||||
'
|
||||
'lblhanaccount
|
||||
'
|
||||
Me.lblhanaccount.AutoSize = True
|
||||
Me.lblhanaccount.Location = New System.Drawing.Point(72, 29)
|
||||
Me.lblhanaccount.Name = "lblhanaccount"
|
||||
Me.lblhanaccount.Size = New System.Drawing.Size(66, 14)
|
||||
Me.lblhanaccount.TabIndex = 3
|
||||
Me.lblhanaccount.Text = "<EFBFBD>Ѱ<EFBFBD><EFBFBD>Ӱ<EFBFBD><EFBFBD><EFBFBD>"
|
||||
'
|
||||
'UserLogin
|
||||
'
|
||||
Me.AutoScaleBaseSize = New System.Drawing.Size(6, 14)
|
||||
Me.ClientSize = New System.Drawing.Size(1028, 693)
|
||||
Me.Controls.AddRange(New System.Windows.Forms.Control() {Me.btnLogOut, Me.grdResult, Me.GroupBox1, Me.lbltitle})
|
||||
Me.Name = "UserLogin"
|
||||
Me.Text = "<EFBFBD>α<EFBFBD><EFBFBD><EFBFBD> üũ / <20><><EFBFBD><EFBFBD> <20>αƿ<D7BE>"
|
||||
Me.GroupBox1.ResumeLayout(False)
|
||||
CType(Me.grdResult, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.ResumeLayout(False)
|
||||
|
||||
End Sub
|
||||
|
||||
#End Region
|
||||
|
||||
|
||||
Private Sub UserLogin_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
|
||||
|
||||
ProcessPacket.IUserLogin = Me
|
||||
|
||||
txtSearchID.MaxLength = 15
|
||||
|
||||
Me.Text = ITextUserLogOut.formheader_curr
|
||||
Me.lbltitle.Text = ITextUserLogOut.formheader_curr
|
||||
btnSearch.Text = ITextButton.btnSearch
|
||||
btnLogOut.Text = ITextButton.btnLogOut
|
||||
|
||||
ds.Tables(CurrentUserIndex).Clear()
|
||||
grdResult.DataSource = ds.Tables(CurrentUserIndex)
|
||||
|
||||
|
||||
If IToolAdminRight.currentUserLogin = False Then
|
||||
btnSearch.Enabled = False
|
||||
Else
|
||||
btnSearch.Enabled = True
|
||||
End If
|
||||
|
||||
If IToolAdminRight.DoingLogout = False Then
|
||||
btnLogOut.Enabled = False
|
||||
Else
|
||||
btnLogOut.Enabled = True
|
||||
End If
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub UserLogin_Unload(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Closed
|
||||
|
||||
ProcessPacket.IUserLogin = Nothing
|
||||
ProcessPacket.IRylMDI.IUserLogin = Nothing
|
||||
|
||||
End Sub
|
||||
|
||||
'<27>˻<EFBFBD><CBBB>ϱ<EFBFBD>
|
||||
Private Sub btnSearch_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnSearch.Click
|
||||
|
||||
ds.Tables(CurrentUserIndex).Clear()
|
||||
CurrentUserRefresh()
|
||||
|
||||
End Sub
|
||||
|
||||
Public Sub CurrentUserRefresh()
|
||||
|
||||
btnSearch.Enabled = False
|
||||
|
||||
If txtSearchID.Text = "" Then
|
||||
MsgBox(ITextMSG.msg_inputadminid, MsgBoxStyle.OKOnly, ITextMSG.msg_confirm)
|
||||
txtSearchID.Focus()
|
||||
btnSearch.Enabled = True
|
||||
Exit Sub
|
||||
End If
|
||||
|
||||
'Ư<><C6AF> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> ID <20>˻<EFBFBD> <20><>Ŷ
|
||||
Dim sendb(15) As Byte
|
||||
Encoding.GetEncoding(Code).GetBytes(txtSearchID.Text, 0, Min(16, txtSearchID.Text.Length), sendb, 0)
|
||||
|
||||
IClientSocket.Send(7, sendb)
|
||||
|
||||
btnSearch.Enabled = True
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btnLogOut_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnLogOut.Click
|
||||
'<27><><EFBFBD><EFBFBD> Ŭ<><C5AC><EFBFBD><EFBFBD> row<6F><77> <20>ε<EFBFBD><CEB5><EFBFBD><EFBFBD><EFBFBD>ȣ(0<><30><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>Ѵ<EFBFBD>.)
|
||||
'Dim SelectedCellText As String = grdResult.Item(grdResult.CurrentCell)
|
||||
Dim CurrentIndex As Integer = grdResult.CurrentRowIndex
|
||||
|
||||
Dim ClientID As String = grdResult.Item(CurrentIndex, 0)
|
||||
Dim UID As Int32 = grdResult.Item(CurrentIndex, 3)
|
||||
Dim ServerID As Int32 = grdResult.Item(CurrentIndex, 5)
|
||||
|
||||
btnLogOut.Enabled = False
|
||||
|
||||
Dim DeleteYesNo As Integer = _
|
||||
MsgBox(ClientID + " " + ITextMSG.msg_logout, MsgBoxStyle.YesNo, ITextMSG.msg_confirm)
|
||||
|
||||
If DeleteYesNo = vbYes Then
|
||||
|
||||
Dim sendb(7) As Byte
|
||||
|
||||
Array.Copy(BitConverter.GetBytes(UID), 0, sendb, 0, 4)
|
||||
Array.Copy(BitConverter.GetBytes(ServerID), 0, sendb, 4, 4)
|
||||
IClientSocket.Send(8, sendb)
|
||||
|
||||
Else
|
||||
MsgBox(ITextMSG.msg_cancel, MsgBoxStyle.OKOnly, "Cancel")
|
||||
End If
|
||||
btnLogOut.Enabled = True
|
||||
|
||||
|
||||
End Sub
|
||||
End Class
|
||||
690
Server/ToolProject/RCMS_Tool/adminToolString.vb
Normal file
690
Server/ToolProject/RCMS_Tool/adminToolString.vb
Normal file
@@ -0,0 +1,690 @@
|
||||
Imports System.Xml
|
||||
|
||||
Module adminToolString
|
||||
|
||||
|
||||
'Texting.................
|
||||
Public Structure TextAdminInfo
|
||||
Dim cbosearchtypeitem_total As String
|
||||
Dim cbosearchtypeitem_adminid As String
|
||||
|
||||
Dim AdminInfo_Header As String
|
||||
Dim AdminInfo_Title As String
|
||||
Dim admininfo_adminid As String
|
||||
Dim admininfo_name As String
|
||||
Dim admininfo_pass As String
|
||||
Dim admininfo_pass2 As String
|
||||
Dim admininfo_ip As String
|
||||
Dim admininfo_rights As String
|
||||
|
||||
Dim cboadminkind_admin As String
|
||||
Dim cboadminkind_subadmin As String
|
||||
Dim cboadminkind_part As String
|
||||
|
||||
End Structure
|
||||
|
||||
Public Structure TextAdminSetting
|
||||
Dim form_header As String
|
||||
Dim lbltitle As String
|
||||
Dim grbcharadmin As String
|
||||
Dim chkCharedit As String
|
||||
Dim chkCharlocation As String
|
||||
Dim chkCharSeeItem As String
|
||||
Dim grbrestraint As String
|
||||
Dim chkRestraintReg As String
|
||||
Dim chkRestraintRelease As String
|
||||
Dim grbitemadmin As String
|
||||
Dim chkItemReg As String
|
||||
Dim chkItemedit As String
|
||||
Dim chkItemDelete As String
|
||||
Dim grblogout As String
|
||||
Dim chkCurrentLogin As String
|
||||
Dim chkLastLogin As String
|
||||
Dim chkDoingLogout As String
|
||||
End Structure
|
||||
|
||||
Public Structure TextLogin
|
||||
Dim formheader As String
|
||||
Dim lblid As String
|
||||
Dim lblpass As String
|
||||
End Structure
|
||||
|
||||
Public Structure TextButton
|
||||
|
||||
Dim btnSearch As String
|
||||
Dim btnDelete As String
|
||||
Dim btnEdit As String
|
||||
Dim btnCreate As String
|
||||
Dim btnCreate_Real As String
|
||||
Dim btnSetting As String '<27><EFBFBD>ڱ<EFBFBD><DAB1>Ѽ<EFBFBD><D1BC><EFBFBD>
|
||||
Dim btnLogin As String
|
||||
Dim btnEnd As String
|
||||
Dim btnSeeItem As String
|
||||
Dim btnCommit As String
|
||||
Dim btnSearchCharinfo As String
|
||||
Dim btnMove As String
|
||||
Dim btnClose As String
|
||||
Dim btnLogOut As String
|
||||
|
||||
End Structure
|
||||
|
||||
Public Structure TextMSG
|
||||
Dim msg_success As String
|
||||
Dim msg_faild As String
|
||||
Dim msg_error As String
|
||||
Dim msg_confirm As String
|
||||
Dim msg_inputadminid As String '<27>˻<EFBFBD><CBBB>ϰ<EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ID<49><44> <20>Է<EFBFBD><D4B7><EFBFBD><EFBFBD>ּ<EFBFBD><D6BC><EFBFBD>
|
||||
Dim msg_regadmin As String '<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD>̵<EFBFBD><CCB5><EFBFBD> <20>Է<EFBFBD><D4B7><EFBFBD><EFBFBD>ּ<EFBFBD><D6BC><EFBFBD>
|
||||
Dim msg_passadmin As String '<27><> <20><>ȣ<EFBFBD>̰ų<CCB0> <20><>ȣȮ<C8A3><C8AE><EFBFBD><EFBFBD> Ʋ<>Ƚ<EFBFBD><C8BD>ϴ<EFBFBD>.<2E>ٽ<EFBFBD> <20><><EFBFBD>й<EFBFBD>ȣ<EFBFBD><C8A3> <20>Է<EFBFBD><D4B7><EFBFBD><EFBFBD>ּ<EFBFBD><D6BC><EFBFBD>
|
||||
Dim msg_confirmdel As String '<27><><EFBFBD>̵<EFBFBD><CCB5><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>Ͻðڽ<C3B0><DABD>ϱ<EFBFBD>?"
|
||||
Dim msg_cancel As String '<27><><EFBFBD><EFBFBD><EFBFBD>Ͽ<EFBFBD><CFBF><EFBFBD><EFBFBD>ϴ<EFBFBD>
|
||||
Dim msg_confirmedit As String '<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD>̵<EFBFBD><CCB5><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ּ<EFBFBD><D6BC><EFBFBD>
|
||||
Dim msg_disconn As String '<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ϴ<EFBFBD>.
|
||||
Dim msg_login As String
|
||||
Dim msg_pass As String
|
||||
Dim msg_commit As String
|
||||
Dim msg_charedit As String
|
||||
Dim msg_changelocation As String
|
||||
Dim msg_selectchar As String
|
||||
Dim msg_permit As String
|
||||
Dim msg_itemchange As String
|
||||
Dim msg_itemdel As String
|
||||
Dim msg_itemcreate As String
|
||||
Dim msg_logout As String
|
||||
|
||||
End Structure
|
||||
|
||||
Public Structure TextCharInfo
|
||||
Dim formheader As String
|
||||
Dim lbltitle As String
|
||||
Dim grbsearch As String
|
||||
Dim cboidtype_uid As String
|
||||
Dim cboidtype_name As String
|
||||
Dim grbcharinfo As String
|
||||
Dim lblcid As String
|
||||
Dim lblmw As String
|
||||
Dim lblhead As String
|
||||
Dim lblkind As String
|
||||
Dim lblface As String
|
||||
Dim lblclass As String
|
||||
Dim lblmi As String
|
||||
Dim lblfame As String
|
||||
Dim lblmoney As String
|
||||
Dim lblguild As String
|
||||
Dim lblparty As String
|
||||
Dim lblip As String
|
||||
Dim lbllevel As String
|
||||
Dim lblstr As String
|
||||
Dim lbldex As String
|
||||
Dim lblcon As String
|
||||
Dim lblini As String
|
||||
Dim lblwis As String
|
||||
Dim lblhp As String
|
||||
Dim lblmp As String
|
||||
Dim lblexp As String
|
||||
Dim grblocation As String
|
||||
Dim lblx As String
|
||||
Dim lbly As String
|
||||
Dim lblz As String
|
||||
End Structure
|
||||
|
||||
Public Structure TextItemInfo
|
||||
Dim formheader As String
|
||||
Dim cboitemwhere_1 As String
|
||||
Dim cboitemwhere_2 As String
|
||||
Dim cboitemwhere_3 As String
|
||||
Dim cboitemwhere_4 As String
|
||||
Dim cboitemwhere_5 As String
|
||||
Dim cboitemwhere_6 As String
|
||||
End Structure
|
||||
|
||||
Public Structure TextCharRestraint
|
||||
Dim formheader As String
|
||||
Dim lblserver As String
|
||||
Dim lblsearchwide As String
|
||||
Dim lbluid As String
|
||||
Dim cboType_1 As String
|
||||
Dim cboType_2 As String
|
||||
End Structure
|
||||
|
||||
Public Structure TextRylMDI
|
||||
Dim formheader As String
|
||||
Dim title_1 As String
|
||||
Dim title_2 As String
|
||||
Dim title_2_1 As String
|
||||
Dim title_2_2 As String
|
||||
Dim title_3 As String
|
||||
Dim title_3_1 As String
|
||||
Dim title_3_2 As String
|
||||
Dim title_3_3 As String
|
||||
End Structure
|
||||
|
||||
Public Structure TextUserLogOut
|
||||
Dim formheader_last As String
|
||||
Dim formheader_curr As String
|
||||
Dim lblhanaccount As String
|
||||
End Structure
|
||||
|
||||
Public Structure TextCharRestraintreg
|
||||
Dim formheader As String
|
||||
Dim lblrestraintwide As String
|
||||
Dim cbowide_text As String
|
||||
Dim cbowide_1 As String
|
||||
Dim cbowide_2 As String
|
||||
Dim lblblockkind As String
|
||||
Dim cboblock_1 As String
|
||||
Dim cboblock_2 As String
|
||||
Dim lblrestraintway As String
|
||||
Dim lblrestrainttime As String
|
||||
Dim lblrestraintfrom As String
|
||||
Dim lblrestraintto As String
|
||||
Dim lblrestraintwhy As String
|
||||
Dim cbowhy_1 As String
|
||||
Dim cbowhy_2 As String
|
||||
Dim cbowhy_3 As String
|
||||
Dim cbowhy_4 As String
|
||||
Dim cbowhy_5 As String
|
||||
Dim cbowhy_6 As String
|
||||
Dim cbowhy_7 As String
|
||||
End Structure
|
||||
|
||||
Public Structure TextCharItemInfoDetail
|
||||
|
||||
Dim formheader As String
|
||||
Dim grbcharinfo As String
|
||||
Dim lblserver As String
|
||||
Dim grbiteminfo_1 As String
|
||||
Dim lblitemnum As String
|
||||
Dim lblitemname As String
|
||||
Dim lblequip As String
|
||||
Dim lblitemprototype As String
|
||||
Dim lblitemtype As String
|
||||
Dim lblitemwhere As String
|
||||
Dim lblitemxyz As String
|
||||
Dim lblitemsize As String
|
||||
Dim grbiteminfo_2 As String
|
||||
Dim lblrunesocket As String
|
||||
Dim lblmaxdurability As String
|
||||
Dim lblcurrsocket As String
|
||||
Dim lblmaxsocket As String
|
||||
Dim lblmaterial As String
|
||||
Dim lblsocket1 As String
|
||||
Dim lblsocket2 As String
|
||||
Dim lblsocket3 As String
|
||||
Dim lblsocket4 As String
|
||||
Dim lblsocket5 As String
|
||||
Dim lblsocket6 As String
|
||||
Dim lblsocket7 As String
|
||||
Dim lblsocket8 As String
|
||||
Dim grbiteminfo_3 As String
|
||||
Dim lblcritical_type As String
|
||||
Dim lblcritical_percentage As String
|
||||
Dim lblmin_damage As String
|
||||
Dim lblmax_damage As String
|
||||
Dim lbldrc As String
|
||||
Dim lbloffence_revision As String
|
||||
Dim lbldefence As String
|
||||
Dim lbldefence_revision As String
|
||||
Dim lblmagic_resistantage As String
|
||||
Dim lblblocking_percentage As String
|
||||
Dim lblmax_hp As String
|
||||
Dim lblmax_mp As String
|
||||
Dim lblhp_regent_amount As String
|
||||
Dim lblmp_regen_amount As String
|
||||
Dim lblfire_attack As String
|
||||
Dim lbllightning_attack As String
|
||||
Dim lblcold_attack As String
|
||||
Dim lbldrain_attack As String
|
||||
Dim lblpoison_attack As String
|
||||
Dim lblfire_resistance As String
|
||||
Dim lbllightning_resistance As String
|
||||
Dim lblcold_resistance As String
|
||||
Dim lbldrain_resistance As String
|
||||
Dim lblpoison_resistance As String
|
||||
Dim lbladd_str As String
|
||||
Dim lbladd_dex As String
|
||||
Dim lbladd_con As String
|
||||
Dim lbladd_int As String
|
||||
Dim lbladd_wis As String
|
||||
Dim lblamount_1 As String
|
||||
Dim lblamount_2 As String
|
||||
End Structure
|
||||
|
||||
|
||||
Public Structure TextProcessPacket
|
||||
Dim msg_error_1 As String
|
||||
Dim msg_success_1 As String
|
||||
Dim msg_error_2 As String
|
||||
Dim msg_error_3 As String
|
||||
Dim msg_error_4 As String
|
||||
Dim msg_success_2 As String
|
||||
Dim msg_error_5 As String
|
||||
Dim msg_success_3 As String
|
||||
Dim msg_error_6 As String
|
||||
Dim msg_error_7 As String
|
||||
Dim msg_success_4 As String
|
||||
Dim msg_error_8 As String
|
||||
Dim msg_success_5 As String
|
||||
Dim msg_error_9 As String
|
||||
Dim msg_success_6 As String
|
||||
Dim msg_error_10 As String
|
||||
Dim msg_error_11 As String
|
||||
Dim msg_success_7 As String
|
||||
Dim msg_error_12 As String
|
||||
Dim msg_success_8 As String
|
||||
Dim msg_error_13 As String
|
||||
Dim msg_success_9 As String
|
||||
Dim msg_error_14 As String
|
||||
Dim msg_success_10 As String
|
||||
Dim msg_error_15 As String
|
||||
Dim msg_success_11 As String
|
||||
Dim msg_error_16 As String
|
||||
Dim msg_success_12 As String
|
||||
Dim msg_error_17 As String
|
||||
Dim msg_success_13 As String
|
||||
Dim msg_error_18 As String
|
||||
Dim msg_error_19 As String
|
||||
|
||||
End Structure
|
||||
|
||||
'Public Structure TextServerList
|
||||
|
||||
' Dim test As String
|
||||
' Dim solpis As String
|
||||
' Dim karte As String
|
||||
' Dim iranshya As String
|
||||
' Dim hiland As String
|
||||
' Dim aldia As String
|
||||
' Dim yunite As String
|
||||
|
||||
'End Structure
|
||||
|
||||
|
||||
Public ITextAdminInfo As New TextAdminInfo()
|
||||
Public ITextButton As New TextButton()
|
||||
Public ITextMSG As New TextMSG()
|
||||
Public ITextAdminSetting As New TextAdminSetting()
|
||||
Public ITextLogin As New TextLogin()
|
||||
Public ITextCharInfo As New TextCharInfo()
|
||||
Public ITextItemInfo As New TextItemInfo()
|
||||
Public ITextCharRestraint As New TextCharRestraint()
|
||||
Public ITextRylMDI As New TextRylMDI()
|
||||
Public ITextUserLogOut As New TextUserLogOut()
|
||||
Public ITextCharRestraintreg As New TextCharRestraintreg()
|
||||
Public ITextCharItemInfoDetail As New TextCharItemInfoDetail()
|
||||
Public ITextProcessPacket As New TextProcessPacket()
|
||||
'Public ITextServerList As New TextServerList()
|
||||
|
||||
Public Function ReadValueFromKey(ByRef XMLRead As XmlTextReader, ByVal KeyName As String) As String
|
||||
XMLRead.ReadStartElement(KeyName)
|
||||
ReadValueFromKey = XMLRead.ReadString().ToString()
|
||||
XMLRead.ReadEndElement()
|
||||
End Function
|
||||
|
||||
Sub READXML()
|
||||
|
||||
Dim XMLREAD As XmlTextReader = New XmlTextReader("TextString.xml")
|
||||
|
||||
Try
|
||||
|
||||
XMLREAD.ReadStartElement("Form")
|
||||
|
||||
XMLREAD.ReadStartElement("TextAdminInfo")
|
||||
ITextAdminInfo.cbosearchtypeitem_total = ReadValueFromKey(XMLREAD, "cbosearchtypeitem_total")
|
||||
ITextAdminInfo.cbosearchtypeitem_adminid = ReadValueFromKey(XMLREAD, "cbosearchtypeitem_adminid")
|
||||
ITextAdminInfo.AdminInfo_Header = ReadValueFromKey(XMLREAD, "admininfo_header")
|
||||
ITextAdminInfo.AdminInfo_Title = ReadValueFromKey(XMLREAD, "adminInfo_title")
|
||||
ITextAdminInfo.admininfo_adminid = ReadValueFromKey(XMLREAD, "admin_adminid")
|
||||
ITextAdminInfo.admininfo_name = ReadValueFromKey(XMLREAD, "admininfo_name")
|
||||
ITextAdminInfo.admininfo_pass = ReadValueFromKey(XMLREAD, "admininfo_pass")
|
||||
ITextAdminInfo.admininfo_pass2 = ReadValueFromKey(XMLREAD, "admininfo_pass2")
|
||||
ITextAdminInfo.admininfo_ip = ReadValueFromKey(XMLREAD, "admininfo_ip")
|
||||
ITextAdminInfo.admininfo_rights = ReadValueFromKey(XMLREAD, "admininfo_rights")
|
||||
ITextAdminInfo.cboadminkind_admin = ReadValueFromKey(XMLREAD, "cboadminkind_admin")
|
||||
ITextAdminInfo.cboadminkind_subadmin = ReadValueFromKey(XMLREAD, "cboadminkind_subadmin")
|
||||
ITextAdminInfo.cboadminkind_part = ReadValueFromKey(XMLREAD, "cboadminkind_part")
|
||||
XMLREAD.ReadEndElement()
|
||||
|
||||
XMLREAD.ReadStartElement("TextButton")
|
||||
ITextButton.btnSearch = ReadValueFromKey(XMLREAD, "btnSearch")
|
||||
ITextButton.btnDelete = ReadValueFromKey(XMLREAD, "btnDelete")
|
||||
ITextButton.btnEdit = ReadValueFromKey(XMLREAD, "btnEdit")
|
||||
ITextButton.btnCreate = ReadValueFromKey(XMLREAD, "btnCreate")
|
||||
ITextButton.btnCreate_Real = ReadValueFromKey(XMLREAD, "btnCreate_Real")
|
||||
ITextButton.btnSetting = ReadValueFromKey(XMLREAD, "btnSetting")
|
||||
ITextButton.btnLogin = ReadValueFromKey(XMLREAD, "btnLogin")
|
||||
ITextButton.btnEnd = ReadValueFromKey(XMLREAD, "btnEnd")
|
||||
ITextButton.btnSeeItem = ReadValueFromKey(XMLREAD, "btnSeeItem")
|
||||
ITextButton.btnCommit = ReadValueFromKey(XMLREAD, "btnCommit")
|
||||
ITextButton.btnSearchCharinfo = ReadValueFromKey(XMLREAD, "btnSearchCharinfo")
|
||||
ITextButton.btnMove = ReadValueFromKey(XMLREAD, "btnMove")
|
||||
ITextButton.btnClose = ReadValueFromKey(XMLREAD, "btnClose")
|
||||
ITextButton.btnLogOut = ReadValueFromKey(XMLREAD, "btnLogout")
|
||||
XMLREAD.ReadEndElement()
|
||||
|
||||
XMLREAD.ReadStartElement("TextMSG")
|
||||
ITextMSG.msg_success = ReadValueFromKey(XMLREAD, "msg_success")
|
||||
ITextMSG.msg_faild = ReadValueFromKey(XMLREAD, "msg_faild")
|
||||
ITextMSG.msg_error = ReadValueFromKey(XMLREAD, "msg_error")
|
||||
ITextMSG.msg_confirm = ReadValueFromKey(XMLREAD, "msg_confirm")
|
||||
ITextMSG.msg_inputadminid = ReadValueFromKey(XMLREAD, "msg_inputadminid")
|
||||
ITextMSG.msg_regadmin = ReadValueFromKey(XMLREAD, "msg_regadmin")
|
||||
ITextMSG.msg_passadmin = ReadValueFromKey(XMLREAD, "msg_passadmin")
|
||||
ITextMSG.msg_confirmdel = ReadValueFromKey(XMLREAD, "msg_confirmdel")
|
||||
ITextMSG.msg_cancel = ReadValueFromKey(XMLREAD, "msg_cancel")
|
||||
ITextMSG.msg_confirmedit = ReadValueFromKey(XMLREAD, "msg_confirmedit")
|
||||
ITextMSG.msg_disconn = ReadValueFromKey(XMLREAD, "msg_disconn")
|
||||
ITextMSG.msg_login = ReadValueFromKey(XMLREAD, "msg_login")
|
||||
ITextMSG.msg_pass = ReadValueFromKey(XMLREAD, "msg_pass")
|
||||
ITextMSG.msg_commit = ReadValueFromKey(XMLREAD, "msg_commit")
|
||||
ITextMSG.msg_charedit = ReadValueFromKey(XMLREAD, "msg_charedit")
|
||||
ITextMSG.msg_changelocation = ReadValueFromKey(XMLREAD, "msg_changelocation")
|
||||
ITextMSG.msg_selectchar = ReadValueFromKey(XMLREAD, "msg_selectchar")
|
||||
ITextMSG.msg_selectchar = ReadValueFromKey(XMLREAD, "msg_permit")
|
||||
ITextMSG.msg_itemchange = ReadValueFromKey(XMLREAD, "msg_itemchange")
|
||||
ITextMSG.msg_itemdel = ReadValueFromKey(XMLREAD, "msg_itemdel")
|
||||
ITextMSG.msg_itemcreate = ReadValueFromKey(XMLREAD, "msg_itemcreate")
|
||||
ITextMSG.msg_logout = ReadValueFromKey(XMLREAD, "msg_logout")
|
||||
|
||||
XMLREAD.ReadEndElement()
|
||||
|
||||
XMLREAD.ReadStartElement("TextAdminSetting")
|
||||
ITextAdminSetting.form_header = ReadValueFromKey(XMLREAD, "form_header")
|
||||
ITextAdminSetting.lbltitle = ReadValueFromKey(XMLREAD, "lbltitle")
|
||||
ITextAdminSetting.grbcharadmin = ReadValueFromKey(XMLREAD, "grbcharadmin")
|
||||
ITextAdminSetting.chkCharedit = ReadValueFromKey(XMLREAD, "chkCharedit")
|
||||
ITextAdminSetting.chkCharlocation = ReadValueFromKey(XMLREAD, "chkCharlocation")
|
||||
ITextAdminSetting.chkCharSeeItem = ReadValueFromKey(XMLREAD, "chkCharSeeItem")
|
||||
ITextAdminSetting.grbrestraint = ReadValueFromKey(XMLREAD, "grbrestraint")
|
||||
ITextAdminSetting.chkRestraintReg = ReadValueFromKey(XMLREAD, "chkRestraintReg")
|
||||
ITextAdminSetting.chkRestraintRelease = ReadValueFromKey(XMLREAD, "chkRestraintRelease")
|
||||
ITextAdminSetting.grbitemadmin = ReadValueFromKey(XMLREAD, "grbitemadmin")
|
||||
ITextAdminSetting.chkItemReg = ReadValueFromKey(XMLREAD, "chkItemReg")
|
||||
ITextAdminSetting.chkItemedit = ReadValueFromKey(XMLREAD, "chkItemedit")
|
||||
ITextAdminSetting.chkItemDelete = ReadValueFromKey(XMLREAD, "chkItemDelete")
|
||||
ITextAdminSetting.grblogout = ReadValueFromKey(XMLREAD, "grblogout")
|
||||
ITextAdminSetting.chkCurrentLogin = ReadValueFromKey(XMLREAD, "chkCurrentLogin")
|
||||
ITextAdminSetting.chkLastLogin = ReadValueFromKey(XMLREAD, "chkLastLogin")
|
||||
ITextAdminSetting.chkDoingLogout = ReadValueFromKey(XMLREAD, "chkDoingLogout")
|
||||
XMLREAD.ReadEndElement()
|
||||
|
||||
XMLREAD.ReadStartElement("TextLogin")
|
||||
ITextLogin.formheader = ReadValueFromKey(XMLREAD, "formheader")
|
||||
ITextLogin.lblid = ReadValueFromKey(XMLREAD, "lbllogin")
|
||||
ITextLogin.lblpass = ReadValueFromKey(XMLREAD, "lblpass")
|
||||
XMLREAD.ReadEndElement()
|
||||
|
||||
XMLREAD.ReadStartElement("TextCharInfo")
|
||||
ITextCharInfo.formheader = ReadValueFromKey(XMLREAD, "formheader")
|
||||
ITextCharInfo.lbltitle = ReadValueFromKey(XMLREAD, "lbltitle")
|
||||
ITextCharInfo.grbsearch = ReadValueFromKey(XMLREAD, "grbsearch")
|
||||
ITextCharInfo.cboidtype_uid = ReadValueFromKey(XMLREAD, "cboidtype_uid")
|
||||
ITextCharInfo.cboidtype_name = ReadValueFromKey(XMLREAD, "cboidtype_name")
|
||||
ITextCharInfo.grbcharinfo = ReadValueFromKey(XMLREAD, "grbcharinfo")
|
||||
ITextCharInfo.lblcid = ReadValueFromKey(XMLREAD, "lblcid")
|
||||
ITextCharInfo.lblmw = ReadValueFromKey(XMLREAD, "lblmw")
|
||||
ITextCharInfo.lblhead = ReadValueFromKey(XMLREAD, "lblhead")
|
||||
ITextCharInfo.lblkind = ReadValueFromKey(XMLREAD, "lblkind")
|
||||
ITextCharInfo.lblface = ReadValueFromKey(XMLREAD, "lblface")
|
||||
ITextCharInfo.lblclass = ReadValueFromKey(XMLREAD, "lblclass")
|
||||
ITextCharInfo.lblmi = ReadValueFromKey(XMLREAD, "lblmi")
|
||||
ITextCharInfo.lblfame = ReadValueFromKey(XMLREAD, "lblfame")
|
||||
ITextCharInfo.lblmoney = ReadValueFromKey(XMLREAD, "lblmoney")
|
||||
ITextCharInfo.lblguild = ReadValueFromKey(XMLREAD, "lblguild")
|
||||
ITextCharInfo.lblparty = ReadValueFromKey(XMLREAD, "lblparty")
|
||||
ITextCharInfo.lblip = ReadValueFromKey(XMLREAD, "lblip")
|
||||
ITextCharInfo.lbllevel = ReadValueFromKey(XMLREAD, "lbllevel")
|
||||
ITextCharInfo.lblstr = ReadValueFromKey(XMLREAD, "lblstr")
|
||||
ITextCharInfo.lbldex = ReadValueFromKey(XMLREAD, "lbldex")
|
||||
ITextCharInfo.lblcon = ReadValueFromKey(XMLREAD, "lblcon")
|
||||
ITextCharInfo.lblini = ReadValueFromKey(XMLREAD, "lblini")
|
||||
ITextCharInfo.lblwis = ReadValueFromKey(XMLREAD, "lblwis")
|
||||
ITextCharInfo.lblhp = ReadValueFromKey(XMLREAD, "lblhp")
|
||||
ITextCharInfo.lblmp = ReadValueFromKey(XMLREAD, "lblmp")
|
||||
ITextCharInfo.lblexp = ReadValueFromKey(XMLREAD, "lblexp")
|
||||
ITextCharInfo.grblocation = ReadValueFromKey(XMLREAD, "grblocation")
|
||||
ITextCharInfo.lblx = ReadValueFromKey(XMLREAD, "lblx")
|
||||
ITextCharInfo.lbly = ReadValueFromKey(XMLREAD, "lbly")
|
||||
ITextCharInfo.lblz = ReadValueFromKey(XMLREAD, "lblz")
|
||||
XMLREAD.ReadEndElement()
|
||||
|
||||
|
||||
XMLREAD.ReadStartElement("TextItemInfo")
|
||||
ITextItemInfo.formheader = ReadValueFromKey(XMLREAD, "formheader")
|
||||
ITextItemInfo.cboitemwhere_1 = ReadValueFromKey(XMLREAD, "cboitemwhere_1")
|
||||
ITextItemInfo.cboitemwhere_2 = ReadValueFromKey(XMLREAD, "cboitemwhere_2")
|
||||
ITextItemInfo.cboitemwhere_3 = ReadValueFromKey(XMLREAD, "cboitemwhere_3")
|
||||
ITextItemInfo.cboitemwhere_4 = ReadValueFromKey(XMLREAD, "cboitemwhere_4")
|
||||
ITextItemInfo.cboitemwhere_5 = ReadValueFromKey(XMLREAD, "cboitemwhere_5")
|
||||
ITextItemInfo.cboitemwhere_6 = ReadValueFromKey(XMLREAD, "cboitemwhere_6")
|
||||
XMLREAD.ReadEndElement()
|
||||
|
||||
|
||||
XMLREAD.ReadStartElement("TextCharRestraint")
|
||||
ITextCharRestraint.formheader = ReadValueFromKey(XMLREAD, "formheader")
|
||||
ITextCharRestraint.lblserver = ReadValueFromKey(XMLREAD, "lblserver")
|
||||
ITextCharRestraint.lblsearchwide = ReadValueFromKey(XMLREAD, "lblsearchwide")
|
||||
ITextCharRestraint.lbluid = ReadValueFromKey(XMLREAD, "lbluid")
|
||||
ITextCharRestraint.cboType_1 = ReadValueFromKey(XMLREAD, "cboType_1")
|
||||
ITextCharRestraint.cboType_2 = ReadValueFromKey(XMLREAD, "cboType_2")
|
||||
XMLREAD.ReadEndElement()
|
||||
|
||||
|
||||
XMLREAD.ReadStartElement("TextRylMDI")
|
||||
ITextRylMDI.formheader = ReadValueFromKey(XMLREAD, "formheader")
|
||||
ITextRylMDI.title_1 = ReadValueFromKey(XMLREAD, "title_1")
|
||||
ITextRylMDI.title_2 = ReadValueFromKey(XMLREAD, "title_2")
|
||||
ITextRylMDI.title_2_1 = ReadValueFromKey(XMLREAD, "title_2_1")
|
||||
ITextRylMDI.title_2_2 = ReadValueFromKey(XMLREAD, "title_2_2")
|
||||
ITextRylMDI.title_3 = ReadValueFromKey(XMLREAD, "title_3")
|
||||
ITextRylMDI.title_3_1 = ReadValueFromKey(XMLREAD, "title_3_1")
|
||||
ITextRylMDI.title_3_2 = ReadValueFromKey(XMLREAD, "title_3_2")
|
||||
ITextRylMDI.title_3_3 = ReadValueFromKey(XMLREAD, "title_3_3")
|
||||
XMLREAD.ReadEndElement()
|
||||
|
||||
|
||||
XMLREAD.ReadStartElement("TextUserLogOut")
|
||||
ITextUserLogOut.formheader_last = ReadValueFromKey(XMLREAD, "formheader_last")
|
||||
ITextUserLogOut.formheader_curr = ReadValueFromKey(XMLREAD, "formheader_curr")
|
||||
ITextUserLogOut.lblhanaccount = ReadValueFromKey(XMLREAD, "lblhanaccount")
|
||||
XMLREAD.ReadEndElement()
|
||||
|
||||
|
||||
XMLREAD.ReadStartElement("TextCharRestraintreg")
|
||||
ITextCharRestraintreg.formheader = ReadValueFromKey(XMLREAD, "formheader")
|
||||
ITextCharRestraintreg.lblrestraintwide = ReadValueFromKey(XMLREAD, "lblrestraintwide")
|
||||
ITextCharRestraintreg.cbowide_text = ReadValueFromKey(XMLREAD, "cbowide_text")
|
||||
ITextCharRestraintreg.cbowide_1 = ReadValueFromKey(XMLREAD, "cbowide_1")
|
||||
ITextCharRestraintreg.cbowide_2 = ReadValueFromKey(XMLREAD, "cbowide_2")
|
||||
ITextCharRestraintreg.lblblockkind = ReadValueFromKey(XMLREAD, "lblblockkind")
|
||||
ITextCharRestraintreg.cboblock_1 = ReadValueFromKey(XMLREAD, "cboblock_1")
|
||||
ITextCharRestraintreg.cboblock_2 = ReadValueFromKey(XMLREAD, "cboblock_2")
|
||||
ITextCharRestraintreg.lblrestraintway = ReadValueFromKey(XMLREAD, "lblrestraintway")
|
||||
ITextCharRestraintreg.lblrestrainttime = ReadValueFromKey(XMLREAD, "lblrestrainttime")
|
||||
ITextCharRestraintreg.lblrestraintfrom = ReadValueFromKey(XMLREAD, "lblrestraintfrom")
|
||||
ITextCharRestraintreg.lblrestraintto = ReadValueFromKey(XMLREAD, "lblrestraintto")
|
||||
ITextCharRestraintreg.lblrestraintwhy = ReadValueFromKey(XMLREAD, "lblrestraintwhy")
|
||||
ITextCharRestraintreg.cbowhy_1 = ReadValueFromKey(XMLREAD, "cbowhy_1")
|
||||
ITextCharRestraintreg.cbowhy_2 = ReadValueFromKey(XMLREAD, "cbowhy_2")
|
||||
ITextCharRestraintreg.cbowhy_3 = ReadValueFromKey(XMLREAD, "cbowhy_3")
|
||||
ITextCharRestraintreg.cbowhy_4 = ReadValueFromKey(XMLREAD, "cbowhy_4")
|
||||
ITextCharRestraintreg.cbowhy_5 = ReadValueFromKey(XMLREAD, "cbowhy_5")
|
||||
ITextCharRestraintreg.cbowhy_6 = ReadValueFromKey(XMLREAD, "cbowhy_6")
|
||||
ITextCharRestraintreg.cbowhy_7 = ReadValueFromKey(XMLREAD, "cbowhy_7")
|
||||
XMLREAD.ReadEndElement()
|
||||
|
||||
XMLREAD.ReadStartElement("TextCharItemInfoDetail")
|
||||
ITextCharItemInfoDetail.formheader = ReadValueFromKey(XMLREAD, "formheader")
|
||||
ITextCharItemInfoDetail.grbcharinfo = ReadValueFromKey(XMLREAD, "grbcharinfo")
|
||||
ITextCharItemInfoDetail.lblserver = ReadValueFromKey(XMLREAD, "lblserver")
|
||||
ITextCharItemInfoDetail.grbiteminfo_1 = ReadValueFromKey(XMLREAD, "grbiteminfo_1")
|
||||
ITextCharItemInfoDetail.lblitemnum = ReadValueFromKey(XMLREAD, "lblitemnum")
|
||||
ITextCharItemInfoDetail.lblitemname = ReadValueFromKey(XMLREAD, "lblitemname")
|
||||
ITextCharItemInfoDetail.lblequip = ReadValueFromKey(XMLREAD, "lblequip")
|
||||
ITextCharItemInfoDetail.lblitemprototype = ReadValueFromKey(XMLREAD, "lblitemprototype")
|
||||
ITextCharItemInfoDetail.lblitemtype = ReadValueFromKey(XMLREAD, "lblitemtype")
|
||||
ITextCharItemInfoDetail.lblitemwhere = ReadValueFromKey(XMLREAD, "lblitemwhere")
|
||||
ITextCharItemInfoDetail.lblitemxyz = ReadValueFromKey(XMLREAD, "lblitemxyz")
|
||||
ITextCharItemInfoDetail.lblitemsize = ReadValueFromKey(XMLREAD, "lblitemsize")
|
||||
ITextCharItemInfoDetail.grbiteminfo_2 = ReadValueFromKey(XMLREAD, "grbiteminfo_2")
|
||||
ITextCharItemInfoDetail.lblrunesocket = ReadValueFromKey(XMLREAD, "lblrunesocket")
|
||||
ITextCharItemInfoDetail.lblmaxdurability = ReadValueFromKey(XMLREAD, "lblmaxdurability")
|
||||
ITextCharItemInfoDetail.lblcurrsocket = ReadValueFromKey(XMLREAD, "lblcurrsocket")
|
||||
ITextCharItemInfoDetail.lblmaxsocket = ReadValueFromKey(XMLREAD, "lblmaxsocket")
|
||||
ITextCharItemInfoDetail.lblmaterial = ReadValueFromKey(XMLREAD, "lblmaterial")
|
||||
ITextCharItemInfoDetail.lblsocket1 = ReadValueFromKey(XMLREAD, "lblsocket1")
|
||||
ITextCharItemInfoDetail.lblsocket2 = ReadValueFromKey(XMLREAD, "lblsocket2")
|
||||
ITextCharItemInfoDetail.lblsocket3 = ReadValueFromKey(XMLREAD, "lblsocket3")
|
||||
ITextCharItemInfoDetail.lblsocket4 = ReadValueFromKey(XMLREAD, "lblsocket4")
|
||||
ITextCharItemInfoDetail.lblsocket5 = ReadValueFromKey(XMLREAD, "lblsocket5")
|
||||
ITextCharItemInfoDetail.lblsocket6 = ReadValueFromKey(XMLREAD, "lblsocket6")
|
||||
ITextCharItemInfoDetail.lblsocket7 = ReadValueFromKey(XMLREAD, "lblsocket7")
|
||||
ITextCharItemInfoDetail.lblsocket8 = ReadValueFromKey(XMLREAD, "lblsocket8")
|
||||
ITextCharItemInfoDetail.grbiteminfo_3 = ReadValueFromKey(XMLREAD, "grbiteminfo_3")
|
||||
ITextCharItemInfoDetail.lblcritical_type = ReadValueFromKey(XMLREAD, "lblcritical_type")
|
||||
ITextCharItemInfoDetail.lblcritical_percentage = ReadValueFromKey(XMLREAD, "lblcritical_percentage")
|
||||
ITextCharItemInfoDetail.lblmin_damage = ReadValueFromKey(XMLREAD, "lblmin_damage")
|
||||
ITextCharItemInfoDetail.lblmax_damage = ReadValueFromKey(XMLREAD, "lblmax_damage")
|
||||
ITextCharItemInfoDetail.lbldrc = ReadValueFromKey(XMLREAD, "lbldrc")
|
||||
ITextCharItemInfoDetail.lbloffence_revision = ReadValueFromKey(XMLREAD, "lbloffence_revision")
|
||||
ITextCharItemInfoDetail.lbldefence = ReadValueFromKey(XMLREAD, "lbldefence")
|
||||
ITextCharItemInfoDetail.lbldefence_revision = ReadValueFromKey(XMLREAD, "lbldefence_revision")
|
||||
ITextCharItemInfoDetail.lblmagic_resistantage = ReadValueFromKey(XMLREAD, "lblmagic_resistantage")
|
||||
ITextCharItemInfoDetail.lblblocking_percentage = ReadValueFromKey(XMLREAD, "lblblocking_percentage")
|
||||
ITextCharItemInfoDetail.lblmax_hp = ReadValueFromKey(XMLREAD, "lblmax_hp")
|
||||
ITextCharItemInfoDetail.lblmax_mp = ReadValueFromKey(XMLREAD, "lblmax_mp")
|
||||
ITextCharItemInfoDetail.lblhp_regent_amount = ReadValueFromKey(XMLREAD, "lblhp_regent_amount")
|
||||
ITextCharItemInfoDetail.lblmp_regen_amount = ReadValueFromKey(XMLREAD, "lblmp_regen_amount")
|
||||
ITextCharItemInfoDetail.lblfire_attack = ReadValueFromKey(XMLREAD, "lblfire_attack")
|
||||
ITextCharItemInfoDetail.lbllightning_attack = ReadValueFromKey(XMLREAD, "lbllightning_attack")
|
||||
ITextCharItemInfoDetail.lblcold_attack = ReadValueFromKey(XMLREAD, "lblcold_attack")
|
||||
ITextCharItemInfoDetail.lbldrain_attack = ReadValueFromKey(XMLREAD, "lbldrain_attack")
|
||||
ITextCharItemInfoDetail.lblpoison_attack = ReadValueFromKey(XMLREAD, "lblpoison_attack")
|
||||
ITextCharItemInfoDetail.lblfire_resistance = ReadValueFromKey(XMLREAD, "lblfire_resistance")
|
||||
ITextCharItemInfoDetail.lbllightning_resistance = ReadValueFromKey(XMLREAD, "lbllightning_resistance")
|
||||
ITextCharItemInfoDetail.lblcold_resistance = ReadValueFromKey(XMLREAD, "lblcold_resistance")
|
||||
ITextCharItemInfoDetail.lbldrain_resistance = ReadValueFromKey(XMLREAD, "lbldrain_resistance")
|
||||
ITextCharItemInfoDetail.lblpoison_resistance = ReadValueFromKey(XMLREAD, "lblpoison_resistance")
|
||||
ITextCharItemInfoDetail.lbladd_str = ReadValueFromKey(XMLREAD, "lbladd_str")
|
||||
ITextCharItemInfoDetail.lbladd_dex = ReadValueFromKey(XMLREAD, "lbladd_dex")
|
||||
ITextCharItemInfoDetail.lbladd_con = ReadValueFromKey(XMLREAD, "lbladd_con")
|
||||
ITextCharItemInfoDetail.lbladd_int = ReadValueFromKey(XMLREAD, "lbladd_int")
|
||||
ITextCharItemInfoDetail.lbladd_wis = ReadValueFromKey(XMLREAD, "lbladd_wis")
|
||||
ITextCharItemInfoDetail.lblamount_1 = ReadValueFromKey(XMLREAD, "lblamount_1")
|
||||
ITextCharItemInfoDetail.lblamount_2 = ReadValueFromKey(XMLREAD, "lblamount_2")
|
||||
XMLREAD.ReadEndElement()
|
||||
|
||||
|
||||
|
||||
XMLREAD.ReadStartElement("TextProcessPacket")
|
||||
ITextProcessPacket.msg_error_1 = ReadValueFromKey(XMLREAD, "msg_error_1")
|
||||
ITextProcessPacket.msg_success_1 = ReadValueFromKey(XMLREAD, "msg_success_1")
|
||||
ITextProcessPacket.msg_error_2 = ReadValueFromKey(XMLREAD, "msg_error_2")
|
||||
ITextProcessPacket.msg_error_3 = ReadValueFromKey(XMLREAD, "msg_error_3")
|
||||
ITextProcessPacket.msg_error_4 = ReadValueFromKey(XMLREAD, "msg_error_4")
|
||||
ITextProcessPacket.msg_success_2 = ReadValueFromKey(XMLREAD, "msg_success_2")
|
||||
ITextProcessPacket.msg_error_5 = ReadValueFromKey(XMLREAD, "msg_error_5")
|
||||
ITextProcessPacket.msg_success_3 = ReadValueFromKey(XMLREAD, "msg_success_3")
|
||||
ITextProcessPacket.msg_error_6 = ReadValueFromKey(XMLREAD, "msg_error_6")
|
||||
ITextProcessPacket.msg_error_7 = ReadValueFromKey(XMLREAD, "msg_error_7")
|
||||
ITextProcessPacket.msg_success_4 = ReadValueFromKey(XMLREAD, "msg_success_4")
|
||||
ITextProcessPacket.msg_error_8 = ReadValueFromKey(XMLREAD, "msg_error_8")
|
||||
ITextProcessPacket.msg_success_5 = ReadValueFromKey(XMLREAD, "msg_success_5")
|
||||
ITextProcessPacket.msg_error_9 = ReadValueFromKey(XMLREAD, "msg_error_9")
|
||||
ITextProcessPacket.msg_success_6 = ReadValueFromKey(XMLREAD, "msg_success_6")
|
||||
ITextProcessPacket.msg_error_10 = ReadValueFromKey(XMLREAD, "msg_error_10")
|
||||
ITextProcessPacket.msg_error_11 = ReadValueFromKey(XMLREAD, "msg_error_11")
|
||||
ITextProcessPacket.msg_success_7 = ReadValueFromKey(XMLREAD, "msg_success_7")
|
||||
ITextProcessPacket.msg_error_12 = ReadValueFromKey(XMLREAD, "msg_error_12")
|
||||
ITextProcessPacket.msg_success_8 = ReadValueFromKey(XMLREAD, "msg_success_8")
|
||||
ITextProcessPacket.msg_error_13 = ReadValueFromKey(XMLREAD, "msg_error_13")
|
||||
ITextProcessPacket.msg_success_9 = ReadValueFromKey(XMLREAD, "msg_success_9")
|
||||
ITextProcessPacket.msg_error_14 = ReadValueFromKey(XMLREAD, "msg_error_14")
|
||||
ITextProcessPacket.msg_success_10 = ReadValueFromKey(XMLREAD, "msg_success_10")
|
||||
ITextProcessPacket.msg_error_15 = ReadValueFromKey(XMLREAD, "msg_error_15")
|
||||
ITextProcessPacket.msg_success_11 = ReadValueFromKey(XMLREAD, "msg_success_11")
|
||||
ITextProcessPacket.msg_error_16 = ReadValueFromKey(XMLREAD, "msg_error_16")
|
||||
ITextProcessPacket.msg_success_12 = ReadValueFromKey(XMLREAD, "msg_success_12")
|
||||
ITextProcessPacket.msg_error_17 = ReadValueFromKey(XMLREAD, "msg_error_17")
|
||||
ITextProcessPacket.msg_success_13 = ReadValueFromKey(XMLREAD, "msg_success_13")
|
||||
ITextProcessPacket.msg_error_18 = ReadValueFromKey(XMLREAD, "msg_error_18")
|
||||
ITextProcessPacket.msg_error_19 = ReadValueFromKey(XMLREAD, "msg_error_19")
|
||||
XMLREAD.ReadEndElement()
|
||||
|
||||
|
||||
'XMLREAD.ReadStartElement("TextServerList")
|
||||
'ITextServerList.test = ReadValueFromKey(XMLREAD, "test")
|
||||
'ITextServerList.solpis = ReadValueFromKey(XMLREAD, "solpis")
|
||||
'ITextServerList.karte = ReadValueFromKey(XMLREAD, "karte")
|
||||
'ITextServerList.iranshya = ReadValueFromKey(XMLREAD, "iranshya")
|
||||
'ITextServerList.hiland = ReadValueFromKey(XMLREAD, "hiland")
|
||||
'ITextServerList.aldia = ReadValueFromKey(XMLREAD, "aldia")
|
||||
'ITextServerList.yunite = ReadValueFromKey(XMLREAD, "yunite")
|
||||
'XMLREAD.ReadEndElement()
|
||||
|
||||
|
||||
XMLREAD.ReadEndElement()
|
||||
|
||||
|
||||
Catch E As Exception
|
||||
MsgBox(E.ToString())
|
||||
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
'Sub WRITEXML()
|
||||
|
||||
' Dim myXmlTextWriter As XmlTextWriter = New XmlTextWriter("newbooks.xml", System.Text.Encoding.UTF8)
|
||||
' myXmlTextWriter.Formatting = System.Xml.Formatting.Indented
|
||||
' myXmlTextWriter.WriteStartDocument(False)
|
||||
' myXmlTextWriter.WriteComment("This is a comment")
|
||||
' 'Create the main document element.
|
||||
' myXmlTextWriter.WriteStartElement("bookstore")
|
||||
' myXmlTextWriter.WriteStartElement("book")
|
||||
|
||||
' 'Create an element named 'title' with a text node
|
||||
' ' and then close the element.
|
||||
' myXmlTextWriter.WriteStartElement("title")
|
||||
' myXmlTextWriter.WriteString("The Autobiography of Mark Twain")
|
||||
' myXmlTextWriter.WriteEndElement()
|
||||
|
||||
' 'Create an element named 'Author'.
|
||||
' myXmlTextWriter.WriteStartElement("Author")
|
||||
|
||||
' 'Create an element named 'first-name' with a text node
|
||||
' ' and close it in one line.
|
||||
' myXmlTextWriter.WriteElementString("first-name", "Mark")
|
||||
|
||||
' 'Create an element named 'first-name' with a text node.
|
||||
' myXmlTextWriter.WriteElementString("last-name", "Twain")
|
||||
|
||||
' 'Close off the parent element.
|
||||
' myXmlTextWriter.WriteEndElement()
|
||||
|
||||
' 'Create an element named 'price' with a text node
|
||||
' ' and close it in one line.
|
||||
' myXmlTextWriter.WriteElementString("price", "7.99")
|
||||
|
||||
' 'Close off the book element.
|
||||
' myXmlTextWriter.WriteEndElement()
|
||||
|
||||
' myXmlTextWriter.WriteStartElement("book")
|
||||
' myXmlTextWriter.WriteAttributeString("genre", "autobiography")
|
||||
' myXmlTextWriter.WriteAttributeString("publicationdate", "1979")
|
||||
' myXmlTextWriter.WriteAttributeString("ISBN", "0-7356-0562-9")
|
||||
|
||||
' 'Close off the book element.
|
||||
' myXmlTextWriter.WriteEndElement()
|
||||
' 'Close off the Parent Element bookstore.
|
||||
' myXmlTextWriter.WriteEndElement()
|
||||
|
||||
' myXmlTextWriter.Flush()
|
||||
' myXmlTextWriter.Close()
|
||||
' 'Waits for user to press enter before exiting the program.
|
||||
' Console.ReadLine()
|
||||
|
||||
'End Sub
|
||||
|
||||
End Module
|
||||
Reference in New Issue
Block a user