feat: 최초 커밋
This commit is contained in:
parent
410749e71c
commit
e80ce16e1f
63
.gitattributes
vendored
Normal file
63
.gitattributes
vendored
Normal file
@ -0,0 +1,63 @@
|
|||||||
|
###############################################################################
|
||||||
|
# Set default behavior to automatically normalize line endings.
|
||||||
|
###############################################################################
|
||||||
|
* text=auto
|
||||||
|
|
||||||
|
###############################################################################
|
||||||
|
# Set default behavior for command prompt diff.
|
||||||
|
#
|
||||||
|
# This is need for earlier builds of msysgit that does not have it on by
|
||||||
|
# default for csharp files.
|
||||||
|
# Note: This is only used by command line
|
||||||
|
###############################################################################
|
||||||
|
#*.cs diff=csharp
|
||||||
|
|
||||||
|
###############################################################################
|
||||||
|
# Set the merge driver for project and solution files
|
||||||
|
#
|
||||||
|
# Merging from the command prompt will add diff markers to the files if there
|
||||||
|
# are conflicts (Merging from VS is not affected by the settings below, in VS
|
||||||
|
# the diff markers are never inserted). Diff markers may cause the following
|
||||||
|
# file extensions to fail to load in VS. An alternative would be to treat
|
||||||
|
# these files as binary and thus will always conflict and require user
|
||||||
|
# intervention with every merge. To do so, just uncomment the entries below
|
||||||
|
###############################################################################
|
||||||
|
#*.sln merge=binary
|
||||||
|
#*.csproj merge=binary
|
||||||
|
#*.vbproj merge=binary
|
||||||
|
#*.vcxproj merge=binary
|
||||||
|
#*.vcproj merge=binary
|
||||||
|
#*.dbproj merge=binary
|
||||||
|
#*.fsproj merge=binary
|
||||||
|
#*.lsproj merge=binary
|
||||||
|
#*.wixproj merge=binary
|
||||||
|
#*.modelproj merge=binary
|
||||||
|
#*.sqlproj merge=binary
|
||||||
|
#*.wwaproj merge=binary
|
||||||
|
|
||||||
|
###############################################################################
|
||||||
|
# behavior for image files
|
||||||
|
#
|
||||||
|
# image files are treated as binary by default.
|
||||||
|
###############################################################################
|
||||||
|
#*.jpg binary
|
||||||
|
#*.png binary
|
||||||
|
#*.gif binary
|
||||||
|
|
||||||
|
###############################################################################
|
||||||
|
# diff behavior for common document formats
|
||||||
|
#
|
||||||
|
# Convert binary document formats to text before diffing them. This feature
|
||||||
|
# is only available from the command line. Turn it on by uncommenting the
|
||||||
|
# entries below.
|
||||||
|
###############################################################################
|
||||||
|
#*.doc diff=astextplain
|
||||||
|
#*.DOC diff=astextplain
|
||||||
|
#*.docx diff=astextplain
|
||||||
|
#*.DOCX diff=astextplain
|
||||||
|
#*.dot diff=astextplain
|
||||||
|
#*.DOT diff=astextplain
|
||||||
|
#*.pdf diff=astextplain
|
||||||
|
#*.PDF diff=astextplain
|
||||||
|
#*.rtf diff=astextplain
|
||||||
|
#*.RTF diff=astextplain
|
||||||
363
.gitignore
vendored
Normal file
363
.gitignore
vendored
Normal file
@ -0,0 +1,363 @@
|
|||||||
|
## Ignore Visual Studio temporary files, build results, and
|
||||||
|
## files generated by popular Visual Studio add-ons.
|
||||||
|
##
|
||||||
|
## Get latest from https://github.com/github/gitignore/blob/master/VisualStudio.gitignore
|
||||||
|
|
||||||
|
# User-specific files
|
||||||
|
*.rsuser
|
||||||
|
*.suo
|
||||||
|
*.user
|
||||||
|
*.userosscache
|
||||||
|
*.sln.docstates
|
||||||
|
|
||||||
|
# User-specific files (MonoDevelop/Xamarin Studio)
|
||||||
|
*.userprefs
|
||||||
|
|
||||||
|
# Mono auto generated files
|
||||||
|
mono_crash.*
|
||||||
|
|
||||||
|
# Build results
|
||||||
|
[Dd]ebug/
|
||||||
|
[Dd]ebugPublic/
|
||||||
|
[Rr]elease/
|
||||||
|
[Rr]eleases/
|
||||||
|
x64/
|
||||||
|
x86/
|
||||||
|
[Ww][Ii][Nn]32/
|
||||||
|
[Aa][Rr][Mm]/
|
||||||
|
[Aa][Rr][Mm]64/
|
||||||
|
bld/
|
||||||
|
[Bb]in/
|
||||||
|
[Oo]bj/
|
||||||
|
[Oo]ut/
|
||||||
|
[Ll]og/
|
||||||
|
[Ll]ogs/
|
||||||
|
|
||||||
|
# Visual Studio 2015/2017 cache/options directory
|
||||||
|
.vs/
|
||||||
|
# Uncomment if you have tasks that create the project's static files in wwwroot
|
||||||
|
#wwwroot/
|
||||||
|
|
||||||
|
# Visual Studio 2017 auto generated files
|
||||||
|
Generated\ Files/
|
||||||
|
|
||||||
|
# MSTest test Results
|
||||||
|
[Tt]est[Rr]esult*/
|
||||||
|
[Bb]uild[Ll]og.*
|
||||||
|
|
||||||
|
# NUnit
|
||||||
|
*.VisualState.xml
|
||||||
|
TestResult.xml
|
||||||
|
nunit-*.xml
|
||||||
|
|
||||||
|
# Build Results of an ATL Project
|
||||||
|
[Dd]ebugPS/
|
||||||
|
[Rr]eleasePS/
|
||||||
|
dlldata.c
|
||||||
|
|
||||||
|
# Benchmark Results
|
||||||
|
BenchmarkDotNet.Artifacts/
|
||||||
|
|
||||||
|
# .NET Core
|
||||||
|
project.lock.json
|
||||||
|
project.fragment.lock.json
|
||||||
|
artifacts/
|
||||||
|
|
||||||
|
# ASP.NET Scaffolding
|
||||||
|
ScaffoldingReadMe.txt
|
||||||
|
|
||||||
|
# StyleCop
|
||||||
|
StyleCopReport.xml
|
||||||
|
|
||||||
|
# Files built by Visual Studio
|
||||||
|
*_i.c
|
||||||
|
*_p.c
|
||||||
|
*_h.h
|
||||||
|
*.ilk
|
||||||
|
*.meta
|
||||||
|
*.obj
|
||||||
|
*.iobj
|
||||||
|
*.pch
|
||||||
|
*.pdb
|
||||||
|
*.ipdb
|
||||||
|
*.pgc
|
||||||
|
*.pgd
|
||||||
|
*.rsp
|
||||||
|
*.sbr
|
||||||
|
*.tlb
|
||||||
|
*.tli
|
||||||
|
*.tlh
|
||||||
|
*.tmp
|
||||||
|
*.tmp_proj
|
||||||
|
*_wpftmp.csproj
|
||||||
|
*.log
|
||||||
|
*.vspscc
|
||||||
|
*.vssscc
|
||||||
|
.builds
|
||||||
|
*.pidb
|
||||||
|
*.svclog
|
||||||
|
*.scc
|
||||||
|
|
||||||
|
# Chutzpah Test files
|
||||||
|
_Chutzpah*
|
||||||
|
|
||||||
|
# Visual C++ cache files
|
||||||
|
ipch/
|
||||||
|
*.aps
|
||||||
|
*.ncb
|
||||||
|
*.opendb
|
||||||
|
*.opensdf
|
||||||
|
*.sdf
|
||||||
|
*.cachefile
|
||||||
|
*.VC.db
|
||||||
|
*.VC.VC.opendb
|
||||||
|
|
||||||
|
# Visual Studio profiler
|
||||||
|
*.psess
|
||||||
|
*.vsp
|
||||||
|
*.vspx
|
||||||
|
*.sap
|
||||||
|
|
||||||
|
# Visual Studio Trace Files
|
||||||
|
*.e2e
|
||||||
|
|
||||||
|
# TFS 2012 Local Workspace
|
||||||
|
$tf/
|
||||||
|
|
||||||
|
# Guidance Automation Toolkit
|
||||||
|
*.gpState
|
||||||
|
|
||||||
|
# ReSharper is a .NET coding add-in
|
||||||
|
_ReSharper*/
|
||||||
|
*.[Rr]e[Ss]harper
|
||||||
|
*.DotSettings.user
|
||||||
|
|
||||||
|
# TeamCity is a build add-in
|
||||||
|
_TeamCity*
|
||||||
|
|
||||||
|
# DotCover is a Code Coverage Tool
|
||||||
|
*.dotCover
|
||||||
|
|
||||||
|
# AxoCover is a Code Coverage Tool
|
||||||
|
.axoCover/*
|
||||||
|
!.axoCover/settings.json
|
||||||
|
|
||||||
|
# Coverlet is a free, cross platform Code Coverage Tool
|
||||||
|
coverage*.json
|
||||||
|
coverage*.xml
|
||||||
|
coverage*.info
|
||||||
|
|
||||||
|
# Visual Studio code coverage results
|
||||||
|
*.coverage
|
||||||
|
*.coveragexml
|
||||||
|
|
||||||
|
# NCrunch
|
||||||
|
_NCrunch_*
|
||||||
|
.*crunch*.local.xml
|
||||||
|
nCrunchTemp_*
|
||||||
|
|
||||||
|
# MightyMoose
|
||||||
|
*.mm.*
|
||||||
|
AutoTest.Net/
|
||||||
|
|
||||||
|
# Web workbench (sass)
|
||||||
|
.sass-cache/
|
||||||
|
|
||||||
|
# Installshield output folder
|
||||||
|
[Ee]xpress/
|
||||||
|
|
||||||
|
# DocProject is a documentation generator add-in
|
||||||
|
DocProject/buildhelp/
|
||||||
|
DocProject/Help/*.HxT
|
||||||
|
DocProject/Help/*.HxC
|
||||||
|
DocProject/Help/*.hhc
|
||||||
|
DocProject/Help/*.hhk
|
||||||
|
DocProject/Help/*.hhp
|
||||||
|
DocProject/Help/Html2
|
||||||
|
DocProject/Help/html
|
||||||
|
|
||||||
|
# Click-Once directory
|
||||||
|
publish/
|
||||||
|
|
||||||
|
# Publish Web Output
|
||||||
|
*.[Pp]ublish.xml
|
||||||
|
*.azurePubxml
|
||||||
|
# Note: Comment the next line if you want to checkin your web deploy settings,
|
||||||
|
# but database connection strings (with potential passwords) will be unencrypted
|
||||||
|
*.pubxml
|
||||||
|
*.publishproj
|
||||||
|
|
||||||
|
# Microsoft Azure Web App publish settings. Comment the next line if you want to
|
||||||
|
# checkin your Azure Web App publish settings, but sensitive information contained
|
||||||
|
# in these scripts will be unencrypted
|
||||||
|
PublishScripts/
|
||||||
|
|
||||||
|
# NuGet Packages
|
||||||
|
*.nupkg
|
||||||
|
# NuGet Symbol Packages
|
||||||
|
*.snupkg
|
||||||
|
# The packages folder can be ignored because of Package Restore
|
||||||
|
**/[Pp]ackages/*
|
||||||
|
# except build/, which is used as an MSBuild target.
|
||||||
|
!**/[Pp]ackages/build/
|
||||||
|
# Uncomment if necessary however generally it will be regenerated when needed
|
||||||
|
#!**/[Pp]ackages/repositories.config
|
||||||
|
# NuGet v3's project.json files produces more ignorable files
|
||||||
|
*.nuget.props
|
||||||
|
*.nuget.targets
|
||||||
|
|
||||||
|
# Microsoft Azure Build Output
|
||||||
|
csx/
|
||||||
|
*.build.csdef
|
||||||
|
|
||||||
|
# Microsoft Azure Emulator
|
||||||
|
ecf/
|
||||||
|
rcf/
|
||||||
|
|
||||||
|
# Windows Store app package directories and files
|
||||||
|
AppPackages/
|
||||||
|
BundleArtifacts/
|
||||||
|
Package.StoreAssociation.xml
|
||||||
|
_pkginfo.txt
|
||||||
|
*.appx
|
||||||
|
*.appxbundle
|
||||||
|
*.appxupload
|
||||||
|
|
||||||
|
# Visual Studio cache files
|
||||||
|
# files ending in .cache can be ignored
|
||||||
|
*.[Cc]ache
|
||||||
|
# but keep track of directories ending in .cache
|
||||||
|
!?*.[Cc]ache/
|
||||||
|
|
||||||
|
# Others
|
||||||
|
ClientBin/
|
||||||
|
~$*
|
||||||
|
*~
|
||||||
|
*.dbmdl
|
||||||
|
*.dbproj.schemaview
|
||||||
|
*.jfm
|
||||||
|
*.pfx
|
||||||
|
*.publishsettings
|
||||||
|
orleans.codegen.cs
|
||||||
|
|
||||||
|
# Including strong name files can present a security risk
|
||||||
|
# (https://github.com/github/gitignore/pull/2483#issue-259490424)
|
||||||
|
#*.snk
|
||||||
|
|
||||||
|
# Since there are multiple workflows, uncomment next line to ignore bower_components
|
||||||
|
# (https://github.com/github/gitignore/pull/1529#issuecomment-104372622)
|
||||||
|
#bower_components/
|
||||||
|
|
||||||
|
# RIA/Silverlight projects
|
||||||
|
Generated_Code/
|
||||||
|
|
||||||
|
# Backup & report files from converting an old project file
|
||||||
|
# to a newer Visual Studio version. Backup files are not needed,
|
||||||
|
# because we have git ;-)
|
||||||
|
_UpgradeReport_Files/
|
||||||
|
Backup*/
|
||||||
|
UpgradeLog*.XML
|
||||||
|
UpgradeLog*.htm
|
||||||
|
ServiceFabricBackup/
|
||||||
|
*.rptproj.bak
|
||||||
|
|
||||||
|
# SQL Server files
|
||||||
|
*.mdf
|
||||||
|
*.ldf
|
||||||
|
*.ndf
|
||||||
|
|
||||||
|
# Business Intelligence projects
|
||||||
|
*.rdl.data
|
||||||
|
*.bim.layout
|
||||||
|
*.bim_*.settings
|
||||||
|
*.rptproj.rsuser
|
||||||
|
*- [Bb]ackup.rdl
|
||||||
|
*- [Bb]ackup ([0-9]).rdl
|
||||||
|
*- [Bb]ackup ([0-9][0-9]).rdl
|
||||||
|
|
||||||
|
# Microsoft Fakes
|
||||||
|
FakesAssemblies/
|
||||||
|
|
||||||
|
# GhostDoc plugin setting file
|
||||||
|
*.GhostDoc.xml
|
||||||
|
|
||||||
|
# Node.js Tools for Visual Studio
|
||||||
|
.ntvs_analysis.dat
|
||||||
|
node_modules/
|
||||||
|
|
||||||
|
# Visual Studio 6 build log
|
||||||
|
*.plg
|
||||||
|
|
||||||
|
# Visual Studio 6 workspace options file
|
||||||
|
*.opt
|
||||||
|
|
||||||
|
# Visual Studio 6 auto-generated workspace file (contains which files were open etc.)
|
||||||
|
*.vbw
|
||||||
|
|
||||||
|
# Visual Studio LightSwitch build output
|
||||||
|
**/*.HTMLClient/GeneratedArtifacts
|
||||||
|
**/*.DesktopClient/GeneratedArtifacts
|
||||||
|
**/*.DesktopClient/ModelManifest.xml
|
||||||
|
**/*.Server/GeneratedArtifacts
|
||||||
|
**/*.Server/ModelManifest.xml
|
||||||
|
_Pvt_Extensions
|
||||||
|
|
||||||
|
# Paket dependency manager
|
||||||
|
.paket/paket.exe
|
||||||
|
paket-files/
|
||||||
|
|
||||||
|
# FAKE - F# Make
|
||||||
|
.fake/
|
||||||
|
|
||||||
|
# CodeRush personal settings
|
||||||
|
.cr/personal
|
||||||
|
|
||||||
|
# Python Tools for Visual Studio (PTVS)
|
||||||
|
__pycache__/
|
||||||
|
*.pyc
|
||||||
|
|
||||||
|
# Cake - Uncomment if you are using it
|
||||||
|
# tools/**
|
||||||
|
# !tools/packages.config
|
||||||
|
|
||||||
|
# Tabs Studio
|
||||||
|
*.tss
|
||||||
|
|
||||||
|
# Telerik's JustMock configuration file
|
||||||
|
*.jmconfig
|
||||||
|
|
||||||
|
# BizTalk build output
|
||||||
|
*.btp.cs
|
||||||
|
*.btm.cs
|
||||||
|
*.odx.cs
|
||||||
|
*.xsd.cs
|
||||||
|
|
||||||
|
# OpenCover UI analysis results
|
||||||
|
OpenCover/
|
||||||
|
|
||||||
|
# Azure Stream Analytics local run output
|
||||||
|
ASALocalRun/
|
||||||
|
|
||||||
|
# MSBuild Binary and Structured Log
|
||||||
|
*.binlog
|
||||||
|
|
||||||
|
# NVidia Nsight GPU debugger configuration file
|
||||||
|
*.nvuser
|
||||||
|
|
||||||
|
# MFractors (Xamarin productivity tool) working folder
|
||||||
|
.mfractor/
|
||||||
|
|
||||||
|
# Local History for Visual Studio
|
||||||
|
.localhistory/
|
||||||
|
|
||||||
|
# BeatPulse healthcheck temp database
|
||||||
|
healthchecksdb
|
||||||
|
|
||||||
|
# Backup folder for Package Reference Convert tool in Visual Studio 2017
|
||||||
|
MigrationBackup/
|
||||||
|
|
||||||
|
# Ionide (cross platform F# VS Code tools) working folder
|
||||||
|
.ionide/
|
||||||
|
|
||||||
|
# Fody - auto-generated XML schema
|
||||||
|
FodyWeavers.xsd
|
||||||
6
App.config
Normal file
6
App.config
Normal file
@ -0,0 +1,6 @@
|
|||||||
|
<?xml version="1.0" encoding="utf-8"?>
|
||||||
|
<configuration>
|
||||||
|
<startup>
|
||||||
|
<supportedRuntime version="v4.0" sku=".NETFramework,Version=v4.8"/>
|
||||||
|
</startup>
|
||||||
|
</configuration>
|
||||||
BIN
JOMT 아이콘.ico
Normal file
BIN
JOMT 아이콘.ico
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 116 KiB |
44
My Project/Application.Designer.vb
generated
Normal file
44
My Project/Application.Designer.vb
generated
Normal file
@ -0,0 +1,44 @@
|
|||||||
|
'------------------------------------------------------------------------------
|
||||||
|
' <auto-generated>
|
||||||
|
' 이 코드는 도구를 사용하여 생성되었습니다.
|
||||||
|
' 런타임 버전:4.0.30319.42000
|
||||||
|
'
|
||||||
|
' 파일 내용을 변경하면 잘못된 동작이 발생할 수 있으며, 코드를 다시 생성하면
|
||||||
|
' 이러한 변경 내용이 손실됩니다.
|
||||||
|
' </auto-generated>
|
||||||
|
'------------------------------------------------------------------------------
|
||||||
|
|
||||||
|
Option Strict On
|
||||||
|
Option Explicit On
|
||||||
|
|
||||||
|
|
||||||
|
Namespace My
|
||||||
|
|
||||||
|
'참고: 자동으로 생성되므로 직접 이 파일을 수정하지 마세요. 변경할 사항이 있거나
|
||||||
|
' 파일에서 빌드 오류가 발생하는 경우 프로젝트 디자이너로
|
||||||
|
' 이동([프로젝트 속성]으로 이동하거나 솔루션 탐색기에서 My Project 노드를
|
||||||
|
'두 번 클릭)한 다음 [애플리케이션] 탭에서 변경하세요.
|
||||||
|
'
|
||||||
|
Partial Friend Class MyApplication
|
||||||
|
|
||||||
|
<Global.System.Diagnostics.DebuggerStepThroughAttribute()> _
|
||||||
|
Public Sub New()
|
||||||
|
MyBase.New(Global.Microsoft.VisualBasic.ApplicationServices.AuthenticationMode.Windows)
|
||||||
|
Me.IsSingleInstance = false
|
||||||
|
Me.EnableVisualStyles = true
|
||||||
|
Me.SaveMySettingsOnExit = true
|
||||||
|
Me.ShutDownStyle = Global.Microsoft.VisualBasic.ApplicationServices.ShutdownMode.AfterMainFormCloses
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
<Global.System.Diagnostics.DebuggerStepThroughAttribute()> _
|
||||||
|
Protected Overrides Sub OnCreateMainForm()
|
||||||
|
Me.MainForm = Global.PackingCodeRemover.frmMySqlTest
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
<Global.System.Diagnostics.DebuggerStepThroughAttribute()> _
|
||||||
|
Protected Overrides Function OnInitialize(ByVal commandLineArgs As System.Collections.ObjectModel.ReadOnlyCollection(Of String)) As Boolean
|
||||||
|
Me.MinimumSplashScreenDisplayTime = 0
|
||||||
|
Return MyBase.OnInitialize(commandLineArgs)
|
||||||
|
End Function
|
||||||
|
End Class
|
||||||
|
End Namespace
|
||||||
10
My Project/Application.myapp
Normal file
10
My Project/Application.myapp
Normal file
@ -0,0 +1,10 @@
|
|||||||
|
<?xml version="1.0" encoding="utf-8"?>
|
||||||
|
<MyApplicationData xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema">
|
||||||
|
<MySubMain>true</MySubMain>
|
||||||
|
<MainForm>frmMySqlTest</MainForm>
|
||||||
|
<SingleInstance>false</SingleInstance>
|
||||||
|
<ShutdownMode>0</ShutdownMode>
|
||||||
|
<EnableVisualStyles>true</EnableVisualStyles>
|
||||||
|
<AuthenticationMode>0</AuthenticationMode>
|
||||||
|
<SaveMySettingsOnExit>true</SaveMySettingsOnExit>
|
||||||
|
</MyApplicationData>
|
||||||
35
My Project/AssemblyInfo.vb
Normal file
35
My Project/AssemblyInfo.vb
Normal file
@ -0,0 +1,35 @@
|
|||||||
|
Imports System
|
||||||
|
Imports System.Reflection
|
||||||
|
Imports System.Runtime.InteropServices
|
||||||
|
|
||||||
|
' 어셈블리에 대한 일반 정보는 다음 특성 집합을 통해
|
||||||
|
' 제어됩니다. 어셈블리와 관련된 정보를 수정하려면
|
||||||
|
' 이러한 특성 값을 변경하세요.
|
||||||
|
|
||||||
|
' 어셈블리 특성 값을 검토합니다.
|
||||||
|
|
||||||
|
<Assembly: AssemblyTitle("db_test1")>
|
||||||
|
<Assembly: AssemblyDescription("")>
|
||||||
|
<Assembly: AssemblyCompany("")>
|
||||||
|
<Assembly: AssemblyProduct("db_test1")>
|
||||||
|
<Assembly: AssemblyCopyright("Copyright © 2020")>
|
||||||
|
<Assembly: AssemblyTrademark("")>
|
||||||
|
|
||||||
|
<Assembly: ComVisible(False)>
|
||||||
|
|
||||||
|
'이 프로젝트가 COM에 노출되는 경우 다음 GUID는 typelib의 ID를 나타냅니다.
|
||||||
|
<Assembly: Guid("27af41f8-0dd5-4702-ba20-5a5a083a327f")>
|
||||||
|
|
||||||
|
' 어셈블리의 버전 정보는 다음 네 가지 값으로 구성됩니다.
|
||||||
|
'
|
||||||
|
' 주 버전
|
||||||
|
' 부 버전
|
||||||
|
' 빌드 번호
|
||||||
|
' 수정 버전
|
||||||
|
'
|
||||||
|
' 모든 값을 지정하거나 아래와 같이 '*'를 사용하여 빌드 번호 및 수정 번호를
|
||||||
|
' 기본값으로 할 수 있습니다.
|
||||||
|
' <Assembly: AssemblyVersion("1.0.*")>
|
||||||
|
|
||||||
|
<Assembly: AssemblyVersion("1.0.0.0")>
|
||||||
|
<Assembly: AssemblyFileVersion("1.0.0.0")>
|
||||||
63
My Project/Resources.Designer.vb
generated
Normal file
63
My Project/Resources.Designer.vb
generated
Normal file
@ -0,0 +1,63 @@
|
|||||||
|
'------------------------------------------------------------------------------
|
||||||
|
' <auto-generated>
|
||||||
|
' 이 코드는 도구를 사용하여 생성되었습니다.
|
||||||
|
' 런타임 버전:4.0.30319.42000
|
||||||
|
'
|
||||||
|
' 파일 내용을 변경하면 잘못된 동작이 발생할 수 있으며, 코드를 다시 생성하면
|
||||||
|
' 이러한 변경 내용이 손실됩니다.
|
||||||
|
' </auto-generated>
|
||||||
|
'------------------------------------------------------------------------------
|
||||||
|
|
||||||
|
Option Strict On
|
||||||
|
Option Explicit On
|
||||||
|
|
||||||
|
Imports System
|
||||||
|
|
||||||
|
Namespace My.Resources
|
||||||
|
|
||||||
|
'이 클래스는 ResGen 또는 Visual Studio와 같은 도구를 통해 StronglyTypedResourceBuilder
|
||||||
|
'클래스에서 자동으로 생성되었습니다.
|
||||||
|
'멤버를 추가하거나 제거하려면 .ResX 파일을 편집한 다음 /str 옵션을 사용하여 ResGen을
|
||||||
|
'다시 실행하거나 VS 프로젝트를 다시 빌드하십시오.
|
||||||
|
'''<summary>
|
||||||
|
''' 지역화된 문자열 등을 찾기 위한 강력한 형식의 리소스 클래스입니다.
|
||||||
|
'''</summary>
|
||||||
|
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Resources.Tools.StronglyTypedResourceBuilder", "17.0.0.0"), _
|
||||||
|
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||||
|
Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(), _
|
||||||
|
Global.Microsoft.VisualBasic.HideModuleNameAttribute()> _
|
||||||
|
Friend Module Resources
|
||||||
|
|
||||||
|
Private resourceMan As Global.System.Resources.ResourceManager
|
||||||
|
|
||||||
|
Private resourceCulture As Global.System.Globalization.CultureInfo
|
||||||
|
|
||||||
|
'''<summary>
|
||||||
|
''' 이 클래스에서 사용하는 캐시된 ResourceManager 인스턴스를 반환합니다.
|
||||||
|
'''</summary>
|
||||||
|
<Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
|
||||||
|
Friend ReadOnly Property ResourceManager() As Global.System.Resources.ResourceManager
|
||||||
|
Get
|
||||||
|
If Object.ReferenceEquals(resourceMan, Nothing) Then
|
||||||
|
Dim temp As Global.System.Resources.ResourceManager = New Global.System.Resources.ResourceManager("PackingCodeRemover.Resources", GetType(Resources).Assembly)
|
||||||
|
resourceMan = temp
|
||||||
|
End If
|
||||||
|
Return resourceMan
|
||||||
|
End Get
|
||||||
|
End Property
|
||||||
|
|
||||||
|
'''<summary>
|
||||||
|
''' 이 강력한 형식의 리소스 클래스를 사용하여 모든 리소스 조회에 대해 현재 스레드의 CurrentUICulture 속성을
|
||||||
|
''' 재정의합니다.
|
||||||
|
'''</summary>
|
||||||
|
<Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
|
||||||
|
Friend Property Culture() As Global.System.Globalization.CultureInfo
|
||||||
|
Get
|
||||||
|
Return resourceCulture
|
||||||
|
End Get
|
||||||
|
Set
|
||||||
|
resourceCulture = value
|
||||||
|
End Set
|
||||||
|
End Property
|
||||||
|
End Module
|
||||||
|
End Namespace
|
||||||
117
My Project/Resources.resx
Normal file
117
My Project/Resources.resx
Normal file
@ -0,0 +1,117 @@
|
|||||||
|
<?xml version="1.0" encoding="utf-8"?>
|
||||||
|
<root>
|
||||||
|
<!--
|
||||||
|
Microsoft ResX Schema
|
||||||
|
|
||||||
|
Version 2.0
|
||||||
|
|
||||||
|
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">2.0</resheader>
|
||||||
|
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||||
|
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||||
|
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
|
||||||
|
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||||
|
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||||
|
<value>[base64 mime encoded serialized .NET Framework object]</value>
|
||||||
|
</data>
|
||||||
|
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||||
|
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
|
||||||
|
<comment>This is a comment</comment>
|
||||||
|
</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="metadata">
|
||||||
|
<xsd:complexType>
|
||||||
|
<xsd:sequence>
|
||||||
|
<xsd:element name="value" type="xsd:string" minOccurs="0" />
|
||||||
|
</xsd:sequence>
|
||||||
|
<xsd:attribute name="name" type="xsd:string" />
|
||||||
|
<xsd:attribute name="type" type="xsd:string" />
|
||||||
|
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||||
|
</xsd:complexType>
|
||||||
|
</xsd:element>
|
||||||
|
<xsd:element name="assembly">
|
||||||
|
<xsd:complexType>
|
||||||
|
<xsd:attribute name="alias" type="xsd:string" />
|
||||||
|
<xsd:attribute name="name" type="xsd:string" />
|
||||||
|
</xsd:complexType>
|
||||||
|
</xsd:element>
|
||||||
|
<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>2.0</value>
|
||||||
|
</resheader>
|
||||||
|
<resheader name="reader">
|
||||||
|
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||||
|
</resheader>
|
||||||
|
<resheader name="writer">
|
||||||
|
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||||
|
</resheader>
|
||||||
|
</root>
|
||||||
73
My Project/Settings.Designer.vb
generated
Normal file
73
My Project/Settings.Designer.vb
generated
Normal file
@ -0,0 +1,73 @@
|
|||||||
|
'------------------------------------------------------------------------------
|
||||||
|
' <auto-generated>
|
||||||
|
' 이 코드는 도구를 사용하여 생성되었습니다.
|
||||||
|
' 런타임 버전:4.0.30319.42000
|
||||||
|
'
|
||||||
|
' 파일 내용을 변경하면 잘못된 동작이 발생할 수 있으며, 코드를 다시 생성하면
|
||||||
|
' 이러한 변경 내용이 손실됩니다.
|
||||||
|
' </auto-generated>
|
||||||
|
'------------------------------------------------------------------------------
|
||||||
|
|
||||||
|
Option Strict On
|
||||||
|
Option Explicit On
|
||||||
|
|
||||||
|
|
||||||
|
Namespace My
|
||||||
|
|
||||||
|
<Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(), _
|
||||||
|
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Editors.SettingsDesigner.SettingsSingleFileGenerator", "17.14.0.0"), _
|
||||||
|
Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
|
||||||
|
Partial Friend NotInheritable Class MySettings
|
||||||
|
Inherits Global.System.Configuration.ApplicationSettingsBase
|
||||||
|
|
||||||
|
Private Shared defaultInstance As MySettings = CType(Global.System.Configuration.ApplicationSettingsBase.Synchronized(New MySettings()),MySettings)
|
||||||
|
|
||||||
|
#Region "My.Settings 자동 저장 기능"
|
||||||
|
#If _MyType = "WindowsForms" Then
|
||||||
|
Private Shared addedHandler As Boolean
|
||||||
|
|
||||||
|
Private Shared addedHandlerLockObject As New Object
|
||||||
|
|
||||||
|
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
|
||||||
|
Private Shared Sub AutoSaveSettings(sender As Global.System.Object, e As Global.System.EventArgs)
|
||||||
|
If My.Application.SaveMySettingsOnExit Then
|
||||||
|
My.Settings.Save()
|
||||||
|
End If
|
||||||
|
End Sub
|
||||||
|
#End If
|
||||||
|
#End Region
|
||||||
|
|
||||||
|
Public Shared ReadOnly Property [Default]() As MySettings
|
||||||
|
Get
|
||||||
|
|
||||||
|
#If _MyType = "WindowsForms" Then
|
||||||
|
If Not addedHandler Then
|
||||||
|
SyncLock addedHandlerLockObject
|
||||||
|
If Not addedHandler Then
|
||||||
|
AddHandler My.Application.Shutdown, AddressOf AutoSaveSettings
|
||||||
|
addedHandler = True
|
||||||
|
End If
|
||||||
|
End SyncLock
|
||||||
|
End If
|
||||||
|
#End If
|
||||||
|
Return defaultInstance
|
||||||
|
End Get
|
||||||
|
End Property
|
||||||
|
End Class
|
||||||
|
End Namespace
|
||||||
|
|
||||||
|
Namespace My
|
||||||
|
|
||||||
|
<Global.Microsoft.VisualBasic.HideModuleNameAttribute(), _
|
||||||
|
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||||
|
Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute()> _
|
||||||
|
Friend Module MySettingsProperty
|
||||||
|
|
||||||
|
<Global.System.ComponentModel.Design.HelpKeywordAttribute("My.Settings")> _
|
||||||
|
Friend ReadOnly Property Settings() As Global.PackingCodeRemover.My.MySettings
|
||||||
|
Get
|
||||||
|
Return Global.PackingCodeRemover.My.MySettings.Default
|
||||||
|
End Get
|
||||||
|
End Property
|
||||||
|
End Module
|
||||||
|
End Namespace
|
||||||
7
My Project/Settings.settings
Normal file
7
My Project/Settings.settings
Normal file
@ -0,0 +1,7 @@
|
|||||||
|
<?xml version='1.0' encoding='utf-8'?>
|
||||||
|
<SettingsFile xmlns="http://schemas.microsoft.com/VisualStudio/2004/01/settings" CurrentProfile="(Default)" UseMySettingsClassName="true">
|
||||||
|
<Profiles>
|
||||||
|
<Profile Name="(Default)" />
|
||||||
|
</Profiles>
|
||||||
|
<Settings />
|
||||||
|
</SettingsFile>
|
||||||
126
MySqlModule.vb
Normal file
126
MySqlModule.vb
Normal file
@ -0,0 +1,126 @@
|
|||||||
|
Imports MySql.Data ' 데이터베이스 연동을 위한 네임스페이스 추가
|
||||||
|
Imports MySql.Data.MySqlClient ' MYSQL Server용 네임스페이스 추가
|
||||||
|
Module MySqlModule
|
||||||
|
Private Const ServerIP As String = "192.168.0.250"
|
||||||
|
Private Const DataBaseName As String = "jomtTesterDB"
|
||||||
|
Private Const UserName As String = "root"
|
||||||
|
Private Const Password As String = "JOMT1646db!!"
|
||||||
|
Private Const Conn As String = "Server=" + ServerIP + ";DataBase=" + DataBaseName + ";user=" + UserName + ";password=" + Password + ";"
|
||||||
|
|
||||||
|
Private sqlCon As New MySqlConnection(Conn)
|
||||||
|
Private sqlCmd As New MySqlCommand()
|
||||||
|
Private sqlData As MySqlDataReader
|
||||||
|
Public sqlDataQueryScalar As Object
|
||||||
|
Public sqlDataQuery() As Object
|
||||||
|
|
||||||
|
Private Function DBOpen() As Boolean
|
||||||
|
Try
|
||||||
|
If sqlCon.State <> ConnectionState.Open Then
|
||||||
|
sqlCon.Open()
|
||||||
|
End If
|
||||||
|
Return True
|
||||||
|
Catch ex As Exception
|
||||||
|
MsgBox("MySqlCommand Error:" + vbCrLf + Err.Description)
|
||||||
|
Return False
|
||||||
|
End Try
|
||||||
|
End Function
|
||||||
|
|
||||||
|
Private Function DBClose() As Boolean
|
||||||
|
Try
|
||||||
|
If sqlCon.State = ConnectionState.Open Then
|
||||||
|
sqlCon.Close()
|
||||||
|
End If
|
||||||
|
Return True
|
||||||
|
Catch ex As Exception
|
||||||
|
MsgBox("MySqlCommand Error:" + vbCrLf + Err.Description)
|
||||||
|
Return False
|
||||||
|
End Try
|
||||||
|
End Function
|
||||||
|
Public Function DBCommand(cmdStr As String) As Boolean
|
||||||
|
Try
|
||||||
|
sqlCon.Open()
|
||||||
|
sqlCmd.CommandText = "USE jomtTesterDB;"
|
||||||
|
sqlCmd.Connection = sqlCon
|
||||||
|
sqlCmd.ExecuteNonQuery()
|
||||||
|
|
||||||
|
sqlCmd.CommandText = cmdStr
|
||||||
|
sqlCmd.Connection = sqlCon
|
||||||
|
sqlCmd.ExecuteNonQuery()
|
||||||
|
|
||||||
|
sqlCon.Close()
|
||||||
|
|
||||||
|
Return True
|
||||||
|
Catch ex As Exception
|
||||||
|
MsgBox("MySqlCommand Error:" + vbCrLf + Err.Description)
|
||||||
|
sqlCon.Close()
|
||||||
|
Return False
|
||||||
|
End Try
|
||||||
|
End
|
||||||
|
End Function
|
||||||
|
|
||||||
|
Public Function DBQueryScalar(cmdStr As String) As String
|
||||||
|
Try
|
||||||
|
sqlCon.Open()
|
||||||
|
sqlCmd.CommandText = "USE jomtTesterDB;"
|
||||||
|
sqlCmd.Connection = sqlCon
|
||||||
|
sqlCmd.ExecuteNonQuery()
|
||||||
|
|
||||||
|
sqlCmd.CommandText = cmdStr
|
||||||
|
sqlCmd.Connection = sqlCon
|
||||||
|
sqlDataQueryScalar = sqlCmd.ExecuteScalar()
|
||||||
|
|
||||||
|
sqlCon.Close()
|
||||||
|
|
||||||
|
Return sqlDataQueryScalar
|
||||||
|
Catch ex As Exception
|
||||||
|
MsgBox("MySqlCommand Error:" + vbCrLf + Err.Description)
|
||||||
|
sqlCon.Close()
|
||||||
|
Return False
|
||||||
|
End Try
|
||||||
|
End
|
||||||
|
End Function
|
||||||
|
|
||||||
|
Public Function DBQueryReader(cmdStr As String) As Integer
|
||||||
|
Dim FieldCount As Integer
|
||||||
|
Dim QueryCount As ULong
|
||||||
|
Dim initRun As Boolean = True
|
||||||
|
|
||||||
|
Try
|
||||||
|
DBOpen()
|
||||||
|
|
||||||
|
sqlCmd.CommandText = "USE jomtTesterDB;"
|
||||||
|
sqlCmd.Connection = sqlCon
|
||||||
|
sqlCmd.ExecuteNonQuery()
|
||||||
|
|
||||||
|
sqlCmd.CommandText = cmdStr
|
||||||
|
sqlCmd.Connection = sqlCon
|
||||||
|
sqlData = sqlCmd.ExecuteReader
|
||||||
|
|
||||||
|
FieldCount = sqlData.FieldCount
|
||||||
|
|
||||||
|
While (sqlData.Read())
|
||||||
|
If initRun Then
|
||||||
|
ReDim sqlDataQuery(FieldCount - 1)
|
||||||
|
initRun = False
|
||||||
|
Else
|
||||||
|
ReDim Preserve sqlDataQuery(UBound(sqlDataQuery) + FieldCount)
|
||||||
|
End If
|
||||||
|
|
||||||
|
For cnt = 0 To FieldCount - 1
|
||||||
|
sqlDataQuery(QueryCount) = sqlData.GetString(cnt)
|
||||||
|
QueryCount += 1
|
||||||
|
Next
|
||||||
|
End While
|
||||||
|
|
||||||
|
DBClose()
|
||||||
|
Return QueryCount
|
||||||
|
|
||||||
|
Catch ex As Exception
|
||||||
|
'MsgBox("MySqlCommand Error:" + vbCrLf + Err.Description)
|
||||||
|
If sqlCon.State = ConnectionState.Open Then sqlCon.Close()
|
||||||
|
Return 0
|
||||||
|
End Try
|
||||||
|
End
|
||||||
|
End Function
|
||||||
|
|
||||||
|
End Module
|
||||||
25
PackingCodeRemover.sln
Normal file
25
PackingCodeRemover.sln
Normal file
@ -0,0 +1,25 @@
|
|||||||
|
|
||||||
|
Microsoft Visual Studio Solution File, Format Version 12.00
|
||||||
|
# Visual Studio Version 17
|
||||||
|
VisualStudioVersion = 17.14.36203.30 d17.14
|
||||||
|
MinimumVisualStudioVersion = 10.0.40219.1
|
||||||
|
Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "PackingCodeRemover", "PackingCodeRemover.vbproj", "{92B33A97-9AC7-48FD-98DF-E8DC3C9A6C2D}"
|
||||||
|
EndProject
|
||||||
|
Global
|
||||||
|
GlobalSection(SolutionConfigurationPlatforms) = preSolution
|
||||||
|
Debug|Any CPU = Debug|Any CPU
|
||||||
|
Release|Any CPU = Release|Any CPU
|
||||||
|
EndGlobalSection
|
||||||
|
GlobalSection(ProjectConfigurationPlatforms) = postSolution
|
||||||
|
{92B33A97-9AC7-48FD-98DF-E8DC3C9A6C2D}.Debug|Any CPU.ActiveCfg = Debug|Any CPU
|
||||||
|
{92B33A97-9AC7-48FD-98DF-E8DC3C9A6C2D}.Debug|Any CPU.Build.0 = Debug|Any CPU
|
||||||
|
{92B33A97-9AC7-48FD-98DF-E8DC3C9A6C2D}.Release|Any CPU.ActiveCfg = Debug|Any CPU
|
||||||
|
{92B33A97-9AC7-48FD-98DF-E8DC3C9A6C2D}.Release|Any CPU.Build.0 = Debug|Any CPU
|
||||||
|
EndGlobalSection
|
||||||
|
GlobalSection(SolutionProperties) = preSolution
|
||||||
|
HideSolutionNode = FALSE
|
||||||
|
EndGlobalSection
|
||||||
|
GlobalSection(ExtensibilityGlobals) = postSolution
|
||||||
|
SolutionGuid = {598D118B-F2E2-4852-8BA9-7B754CA38949}
|
||||||
|
EndGlobalSection
|
||||||
|
EndGlobal
|
||||||
180
PackingCodeRemover.vbproj
Normal file
180
PackingCodeRemover.vbproj
Normal file
@ -0,0 +1,180 @@
|
|||||||
|
<?xml version="1.0" encoding="utf-8"?>
|
||||||
|
<Project ToolsVersion="15.0" xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
|
||||||
|
<Import Project="$(MSBuildExtensionsPath)\$(MSBuildToolsVersion)\Microsoft.Common.props" Condition="Exists('$(MSBuildExtensionsPath)\$(MSBuildToolsVersion)\Microsoft.Common.props')" />
|
||||||
|
<PropertyGroup>
|
||||||
|
<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
|
||||||
|
<Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
|
||||||
|
<ProjectGuid>{92B33A97-9AC7-48FD-98DF-E8DC3C9A6C2D}</ProjectGuid>
|
||||||
|
<OutputType>WinExe</OutputType>
|
||||||
|
<StartupObject>PackingCodeRemover.My.MyApplication</StartupObject>
|
||||||
|
<RootNamespace>PackingCodeRemover</RootNamespace>
|
||||||
|
<AssemblyName>PackingCodeRemover</AssemblyName>
|
||||||
|
<FileAlignment>512</FileAlignment>
|
||||||
|
<MyType>WindowsForms</MyType>
|
||||||
|
<TargetFrameworkVersion>v4.8</TargetFrameworkVersion>
|
||||||
|
<Deterministic>true</Deterministic>
|
||||||
|
<TargetFrameworkProfile />
|
||||||
|
</PropertyGroup>
|
||||||
|
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
|
||||||
|
<PlatformTarget>AnyCPU</PlatformTarget>
|
||||||
|
<DebugSymbols>true</DebugSymbols>
|
||||||
|
<DebugType>full</DebugType>
|
||||||
|
<DefineDebug>true</DefineDebug>
|
||||||
|
<DefineTrace>true</DefineTrace>
|
||||||
|
<OutputPath>bin\Debug\</OutputPath>
|
||||||
|
<DocumentationFile>PackingCodeRemover.xml</DocumentationFile>
|
||||||
|
<NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022</NoWarn>
|
||||||
|
</PropertyGroup>
|
||||||
|
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
|
||||||
|
<PlatformTarget>AnyCPU</PlatformTarget>
|
||||||
|
<DebugType>pdbonly</DebugType>
|
||||||
|
<DefineDebug>false</DefineDebug>
|
||||||
|
<DefineTrace>true</DefineTrace>
|
||||||
|
<Optimize>true</Optimize>
|
||||||
|
<OutputPath>bin\Release\</OutputPath>
|
||||||
|
<DocumentationFile>PackingCodeRemover.xml</DocumentationFile>
|
||||||
|
<NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022</NoWarn>
|
||||||
|
</PropertyGroup>
|
||||||
|
<PropertyGroup>
|
||||||
|
<OptionExplicit>On</OptionExplicit>
|
||||||
|
</PropertyGroup>
|
||||||
|
<PropertyGroup>
|
||||||
|
<OptionCompare>Binary</OptionCompare>
|
||||||
|
</PropertyGroup>
|
||||||
|
<PropertyGroup>
|
||||||
|
<OptionStrict>Off</OptionStrict>
|
||||||
|
</PropertyGroup>
|
||||||
|
<PropertyGroup>
|
||||||
|
<OptionInfer>On</OptionInfer>
|
||||||
|
</PropertyGroup>
|
||||||
|
<PropertyGroup>
|
||||||
|
<ApplicationIcon>JOMT 아이콘.ico</ApplicationIcon>
|
||||||
|
</PropertyGroup>
|
||||||
|
<ItemGroup>
|
||||||
|
<Reference Include="Interop.bpac">
|
||||||
|
<HintPath>..\..\..\..\..\..\Program Files\Brother bPAC3 SDK\Samples\VBNET\Badge\bin\Release\Interop.bpac.DLL</HintPath>
|
||||||
|
<EmbedInteropTypes>True</EmbedInteropTypes>
|
||||||
|
</Reference>
|
||||||
|
<Reference Include="Ivi.Visa.Interop, Version=5.11.0.0, Culture=neutral, PublicKeyToken=a128c98f1d7717c1, processorArchitecture=AMD64">
|
||||||
|
<SpecificVersion>False</SpecificVersion>
|
||||||
|
<EmbedInteropTypes>True</EmbedInteropTypes>
|
||||||
|
<HintPath>..\..\..\..\..\..\Windows\assembly\GAC_64\Ivi.Visa.Interop\5.11.0.0__a128c98f1d7717c1\Ivi.Visa.Interop.dll</HintPath>
|
||||||
|
</Reference>
|
||||||
|
<Reference Include="MySql.Data, Version=8.0.20.0, Culture=neutral, PublicKeyToken=c5687fc88969c44d, processorArchitecture=MSIL">
|
||||||
|
<SpecificVersion>False</SpecificVersion>
|
||||||
|
<HintPath>C:\Program Files (x86)\MySQL\MySQL Connector Net 8.0.20\Assemblies\v4.5.2\MySql.Data.dll</HintPath>
|
||||||
|
</Reference>
|
||||||
|
<Reference Include="System" />
|
||||||
|
<Reference Include="System.Data" />
|
||||||
|
<Reference Include="System.Deployment" />
|
||||||
|
<Reference Include="System.Drawing" />
|
||||||
|
<Reference Include="System.Windows.Forms" />
|
||||||
|
<Reference Include="System.Xml" />
|
||||||
|
<Reference Include="System.Core" />
|
||||||
|
<Reference Include="System.Xml.Linq" />
|
||||||
|
<Reference Include="System.Data.DataSetExtensions" />
|
||||||
|
<Reference Include="System.Net.Http" />
|
||||||
|
</ItemGroup>
|
||||||
|
<ItemGroup>
|
||||||
|
<Import Include="Microsoft.VisualBasic" />
|
||||||
|
<Import Include="System" />
|
||||||
|
<Import Include="System.Collections" />
|
||||||
|
<Import Include="System.Collections.Generic" />
|
||||||
|
<Import Include="System.Data" />
|
||||||
|
<Import Include="System.Drawing" />
|
||||||
|
<Import Include="System.Diagnostics" />
|
||||||
|
<Import Include="System.Windows.Forms" />
|
||||||
|
<Import Include="System.Linq" />
|
||||||
|
<Import Include="System.Xml.Linq" />
|
||||||
|
<Import Include="System.Threading.Tasks" />
|
||||||
|
</ItemGroup>
|
||||||
|
<ItemGroup>
|
||||||
|
<Compile Include="frmDBInput.Designer.vb">
|
||||||
|
<DependentUpon>frmDBInput.vb</DependentUpon>
|
||||||
|
</Compile>
|
||||||
|
<Compile Include="frmDBInput.vb" />
|
||||||
|
<Compile Include="frmMySqlTest.vb">
|
||||||
|
<SubType>Form</SubType>
|
||||||
|
</Compile>
|
||||||
|
<Compile Include="frmMySqlTest.Designer.vb">
|
||||||
|
<DependentUpon>frmMySqlTest.vb</DependentUpon>
|
||||||
|
<SubType>Form</SubType>
|
||||||
|
</Compile>
|
||||||
|
<Compile Include="MySqlModule.vb" />
|
||||||
|
<Compile Include="My Project\AssemblyInfo.vb" />
|
||||||
|
<Compile Include="My Project\Application.Designer.vb">
|
||||||
|
<AutoGen>True</AutoGen>
|
||||||
|
<DependentUpon>Application.myapp</DependentUpon>
|
||||||
|
<DesignTime>True</DesignTime>
|
||||||
|
</Compile>
|
||||||
|
<Compile Include="My Project\Resources.Designer.vb">
|
||||||
|
<AutoGen>True</AutoGen>
|
||||||
|
<DesignTime>True</DesignTime>
|
||||||
|
<DependentUpon>Resources.resx</DependentUpon>
|
||||||
|
</Compile>
|
||||||
|
<Compile Include="My Project\Settings.Designer.vb">
|
||||||
|
<AutoGen>True</AutoGen>
|
||||||
|
<DependentUpon>Settings.settings</DependentUpon>
|
||||||
|
<DesignTimeSharedInput>True</DesignTimeSharedInput>
|
||||||
|
</Compile>
|
||||||
|
</ItemGroup>
|
||||||
|
<ItemGroup>
|
||||||
|
<EmbeddedResource Include="frmDBInput.resx">
|
||||||
|
<DependentUpon>frmDBInput.vb</DependentUpon>
|
||||||
|
</EmbeddedResource>
|
||||||
|
<EmbeddedResource Include="frmMySqlTest.resx">
|
||||||
|
<DependentUpon>frmMySqlTest.vb</DependentUpon>
|
||||||
|
</EmbeddedResource>
|
||||||
|
<EmbeddedResource Include="My Project\Resources.resx">
|
||||||
|
<Generator>VbMyResourcesResXFileCodeGenerator</Generator>
|
||||||
|
<LastGenOutput>Resources.Designer.vb</LastGenOutput>
|
||||||
|
<CustomToolNamespace>My.Resources</CustomToolNamespace>
|
||||||
|
<SubType>Designer</SubType>
|
||||||
|
</EmbeddedResource>
|
||||||
|
</ItemGroup>
|
||||||
|
<ItemGroup>
|
||||||
|
<None Include="My Project\Application.myapp">
|
||||||
|
<Generator>MyApplicationCodeGenerator</Generator>
|
||||||
|
<LastGenOutput>Application.Designer.vb</LastGenOutput>
|
||||||
|
</None>
|
||||||
|
<None Include="My Project\Settings.settings">
|
||||||
|
<Generator>SettingsSingleFileGenerator</Generator>
|
||||||
|
<CustomToolNamespace>My</CustomToolNamespace>
|
||||||
|
<LastGenOutput>Settings.Designer.vb</LastGenOutput>
|
||||||
|
</None>
|
||||||
|
<None Include="App.config" />
|
||||||
|
</ItemGroup>
|
||||||
|
<ItemGroup>
|
||||||
|
<COMReference Include="Microsoft.Office.Core">
|
||||||
|
<Guid>{2DF8D04C-5BFA-101B-BDE5-00AA0044DE52}</Guid>
|
||||||
|
<VersionMajor>2</VersionMajor>
|
||||||
|
<VersionMinor>5</VersionMinor>
|
||||||
|
<Lcid>0</Lcid>
|
||||||
|
<WrapperTool>primary</WrapperTool>
|
||||||
|
<Isolated>False</Isolated>
|
||||||
|
<EmbedInteropTypes>True</EmbedInteropTypes>
|
||||||
|
</COMReference>
|
||||||
|
<COMReference Include="Microsoft.Office.Interop.Excel">
|
||||||
|
<Guid>{00020813-0000-0000-C000-000000000046}</Guid>
|
||||||
|
<VersionMajor>1</VersionMajor>
|
||||||
|
<VersionMinor>7</VersionMinor>
|
||||||
|
<Lcid>0</Lcid>
|
||||||
|
<WrapperTool>primary</WrapperTool>
|
||||||
|
<Isolated>False</Isolated>
|
||||||
|
<EmbedInteropTypes>True</EmbedInteropTypes>
|
||||||
|
</COMReference>
|
||||||
|
<COMReference Include="VBIDE">
|
||||||
|
<Guid>{0002E157-0000-0000-C000-000000000046}</Guid>
|
||||||
|
<VersionMajor>5</VersionMajor>
|
||||||
|
<VersionMinor>3</VersionMinor>
|
||||||
|
<Lcid>0</Lcid>
|
||||||
|
<WrapperTool>primary</WrapperTool>
|
||||||
|
<Isolated>False</Isolated>
|
||||||
|
<EmbedInteropTypes>True</EmbedInteropTypes>
|
||||||
|
</COMReference>
|
||||||
|
</ItemGroup>
|
||||||
|
<ItemGroup>
|
||||||
|
<Content Include="JOMT 아이콘.ico" />
|
||||||
|
</ItemGroup>
|
||||||
|
<Import Project="$(MSBuildToolsPath)\Microsoft.VisualBasic.targets" />
|
||||||
|
</Project>
|
||||||
154
frmDBInput.Designer.vb
generated
Normal file
154
frmDBInput.Designer.vb
generated
Normal file
@ -0,0 +1,154 @@
|
|||||||
|
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
||||||
|
Partial Class frmDBInput
|
||||||
|
Inherits System.Windows.Forms.Form
|
||||||
|
|
||||||
|
'Form은 Dispose를 재정의하여 구성 요소 목록을 정리합니다.
|
||||||
|
<System.Diagnostics.DebuggerNonUserCode()> _
|
||||||
|
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||||
|
Try
|
||||||
|
If disposing AndAlso components IsNot Nothing Then
|
||||||
|
components.Dispose()
|
||||||
|
End If
|
||||||
|
Finally
|
||||||
|
MyBase.Dispose(disposing)
|
||||||
|
End Try
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
'Windows Form 디자이너에 필요합니다.
|
||||||
|
Private components As System.ComponentModel.IContainer
|
||||||
|
|
||||||
|
'참고: 다음 프로시저는 Windows Form 디자이너에 필요합니다.
|
||||||
|
'수정하려면 Windows Form 디자이너를 사용하십시오.
|
||||||
|
'코드 편집기에서는 수정하지 마세요.
|
||||||
|
<System.Diagnostics.DebuggerStepThrough()> _
|
||||||
|
Private Sub InitializeComponent()
|
||||||
|
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmDBInput))
|
||||||
|
Me.Label6 = New System.Windows.Forms.Label()
|
||||||
|
Me.txbCurrent = New System.Windows.Forms.TextBox()
|
||||||
|
Me.Label1 = New System.Windows.Forms.Label()
|
||||||
|
Me.txbDateTime = New System.Windows.Forms.TextBox()
|
||||||
|
Me.Label2 = New System.Windows.Forms.Label()
|
||||||
|
Me.txbSN = New System.Windows.Forms.TextBox()
|
||||||
|
Me.Button1 = New System.Windows.Forms.Button()
|
||||||
|
Me.Label3 = New System.Windows.Forms.Label()
|
||||||
|
Me.SuspendLayout()
|
||||||
|
'
|
||||||
|
'Label6
|
||||||
|
'
|
||||||
|
Me.Label6.AutoSize = True
|
||||||
|
Me.Label6.Font = New System.Drawing.Font("굴림", 15.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
|
||||||
|
Me.Label6.Location = New System.Drawing.Point(52, 198)
|
||||||
|
Me.Label6.Name = "Label6"
|
||||||
|
Me.Label6.Size = New System.Drawing.Size(70, 21)
|
||||||
|
Me.Label6.TabIndex = 19
|
||||||
|
Me.Label6.Text = "Current"
|
||||||
|
'
|
||||||
|
'txbCurrent
|
||||||
|
'
|
||||||
|
Me.txbCurrent.Font = New System.Drawing.Font("함초롬바탕", 15.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
|
||||||
|
Me.txbCurrent.Location = New System.Drawing.Point(194, 195)
|
||||||
|
Me.txbCurrent.Name = "txbCurrent"
|
||||||
|
Me.txbCurrent.Size = New System.Drawing.Size(262, 35)
|
||||||
|
Me.txbCurrent.TabIndex = 18
|
||||||
|
Me.txbCurrent.TextAlign = System.Windows.Forms.HorizontalAlignment.Center
|
||||||
|
'
|
||||||
|
'Label1
|
||||||
|
'
|
||||||
|
Me.Label1.AutoSize = True
|
||||||
|
Me.Label1.Font = New System.Drawing.Font("굴림", 15.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
|
||||||
|
Me.Label1.Location = New System.Drawing.Point(52, 119)
|
||||||
|
Me.Label1.Name = "Label1"
|
||||||
|
Me.Label1.Size = New System.Drawing.Size(94, 21)
|
||||||
|
Me.Label1.TabIndex = 17
|
||||||
|
Me.Label1.Text = "측정일자"
|
||||||
|
'
|
||||||
|
'txbDateTime
|
||||||
|
'
|
||||||
|
Me.txbDateTime.Font = New System.Drawing.Font("함초롬바탕", 15.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
|
||||||
|
Me.txbDateTime.Location = New System.Drawing.Point(194, 116)
|
||||||
|
Me.txbDateTime.Name = "txbDateTime"
|
||||||
|
Me.txbDateTime.Size = New System.Drawing.Size(262, 35)
|
||||||
|
Me.txbDateTime.TabIndex = 16
|
||||||
|
Me.txbDateTime.TextAlign = System.Windows.Forms.HorizontalAlignment.Center
|
||||||
|
'
|
||||||
|
'Label2
|
||||||
|
'
|
||||||
|
Me.Label2.AutoSize = True
|
||||||
|
Me.Label2.Font = New System.Drawing.Font("굴림", 15.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
|
||||||
|
Me.Label2.Location = New System.Drawing.Point(52, 45)
|
||||||
|
Me.Label2.Name = "Label2"
|
||||||
|
Me.Label2.Size = New System.Drawing.Size(105, 21)
|
||||||
|
Me.Label2.TabIndex = 21
|
||||||
|
Me.Label2.Text = "TD 시리얼"
|
||||||
|
'
|
||||||
|
'txbSN
|
||||||
|
'
|
||||||
|
Me.txbSN.Font = New System.Drawing.Font("함초롬바탕", 15.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
|
||||||
|
Me.txbSN.Location = New System.Drawing.Point(194, 42)
|
||||||
|
Me.txbSN.Name = "txbSN"
|
||||||
|
Me.txbSN.Size = New System.Drawing.Size(262, 35)
|
||||||
|
Me.txbSN.TabIndex = 20
|
||||||
|
Me.txbSN.TextAlign = System.Windows.Forms.HorizontalAlignment.Center
|
||||||
|
'
|
||||||
|
'Button1
|
||||||
|
'
|
||||||
|
Me.Button1.Font = New System.Drawing.Font("굴림", 24.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
|
||||||
|
Me.Button1.Location = New System.Drawing.Point(56, 277)
|
||||||
|
Me.Button1.Name = "Button1"
|
||||||
|
Me.Button1.Size = New System.Drawing.Size(400, 94)
|
||||||
|
Me.Button1.TabIndex = 22
|
||||||
|
Me.Button1.Text = "입력"
|
||||||
|
Me.Button1.UseVisualStyleBackColor = True
|
||||||
|
'
|
||||||
|
'Label3
|
||||||
|
'
|
||||||
|
Me.Label3.AutoSize = True
|
||||||
|
Me.Label3.Font = New System.Drawing.Font("굴림", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
|
||||||
|
Me.Label3.Location = New System.Drawing.Point(191, 154)
|
||||||
|
Me.Label3.Name = "Label3"
|
||||||
|
Me.Label3.Size = New System.Drawing.Size(210, 16)
|
||||||
|
Me.Label3.TabIndex = 24
|
||||||
|
Me.Label3.Text = "(예시 : 2020-05-26 15:11:11)"
|
||||||
|
'
|
||||||
|
'frmDBInput
|
||||||
|
'
|
||||||
|
Me.AutoScaleDimensions = New System.Drawing.SizeF(7.0!, 12.0!)
|
||||||
|
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||||
|
Me.ClientSize = New System.Drawing.Size(517, 392)
|
||||||
|
Me.Controls.Add(Me.Label3)
|
||||||
|
Me.Controls.Add(Me.Button1)
|
||||||
|
Me.Controls.Add(Me.Label2)
|
||||||
|
Me.Controls.Add(Me.txbSN)
|
||||||
|
Me.Controls.Add(Me.Label6)
|
||||||
|
Me.Controls.Add(Me.txbCurrent)
|
||||||
|
Me.Controls.Add(Me.Label1)
|
||||||
|
Me.Controls.Add(Me.txbDateTime)
|
||||||
|
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
|
||||||
|
Me.Name = "frmDBInput"
|
||||||
|
Me.Text = "DB INPUT"
|
||||||
|
Me.ResumeLayout(False)
|
||||||
|
Me.PerformLayout()
|
||||||
|
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
Friend WithEvents Label6 As Label
|
||||||
|
Friend WithEvents txbCurrent As TextBox
|
||||||
|
Friend WithEvents Label1 As Label
|
||||||
|
Friend WithEvents txbDateTime As TextBox
|
||||||
|
Friend WithEvents Label2 As Label
|
||||||
|
Friend WithEvents txbSN As TextBox
|
||||||
|
Friend WithEvents Button1 As Button
|
||||||
|
|
||||||
|
|
||||||
|
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
|
||||||
|
Dim cmd As String
|
||||||
|
|
||||||
|
cmd = "update jomtCartridgeTbl set QC_DateTime = '" + txbDateTime.Text + "',QC_Current = '" + txbCurrent.Text + "' where PV_SN = '" + txbSN.Text + "';"
|
||||||
|
DBCommand(cmd)
|
||||||
|
|
||||||
|
txbDateTime.Clear()
|
||||||
|
txbCurrent.Clear()
|
||||||
|
txbSN.Clear()
|
||||||
|
End Sub
|
||||||
|
Friend WithEvents Label3 As Label
|
||||||
|
End Class
|
||||||
2110
frmDBInput.resx
Normal file
2110
frmDBInput.resx
Normal file
File diff suppressed because it is too large
Load Diff
1
frmDBInput.vb
Normal file
1
frmDBInput.vb
Normal file
@ -0,0 +1 @@
|
|||||||
|
|
||||||
387
frmMySqlTest.Designer.vb
generated
Normal file
387
frmMySqlTest.Designer.vb
generated
Normal file
@ -0,0 +1,387 @@
|
|||||||
|
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
|
||||||
|
Partial Class frmMySqlTest
|
||||||
|
Inherits System.Windows.Forms.Form
|
||||||
|
|
||||||
|
'Form은 Dispose를 재정의하여 구성 요소 목록을 정리합니다.
|
||||||
|
<System.Diagnostics.DebuggerNonUserCode()>
|
||||||
|
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||||
|
Try
|
||||||
|
If disposing AndAlso components IsNot Nothing Then
|
||||||
|
components.Dispose()
|
||||||
|
End If
|
||||||
|
Finally
|
||||||
|
MyBase.Dispose(disposing)
|
||||||
|
End Try
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
'Windows Form 디자이너에 필요합니다.
|
||||||
|
Private components As System.ComponentModel.IContainer
|
||||||
|
|
||||||
|
'참고: 다음 프로시저는 Windows Form 디자이너에 필요합니다.
|
||||||
|
'수정하려면 Windows Form 디자이너를 사용하십시오.
|
||||||
|
'코드 편집기에서는 수정하지 마세요.
|
||||||
|
<System.Diagnostics.DebuggerStepThrough()>
|
||||||
|
Private Sub InitializeComponent()
|
||||||
|
Me.components = New System.ComponentModel.Container()
|
||||||
|
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmMySqlTest))
|
||||||
|
Me.btnReadDB = New System.Windows.Forms.Button()
|
||||||
|
Me.txbPacking = New System.Windows.Forms.TextBox()
|
||||||
|
Me.lb_packing = New System.Windows.Forms.Label()
|
||||||
|
Me.gb_pack = New System.Windows.Forms.GroupBox()
|
||||||
|
Me.gb_state = New System.Windows.Forms.GroupBox()
|
||||||
|
Me.txb_invoice = New System.Windows.Forms.TextBox()
|
||||||
|
Me.lb_invoice = New System.Windows.Forms.Label()
|
||||||
|
Me.lb_state_code = New System.Windows.Forms.Label()
|
||||||
|
Me.txb_state_code = New System.Windows.Forms.TextBox()
|
||||||
|
Me.txb_state_date = New System.Windows.Forms.TextBox()
|
||||||
|
Me.lb_state_name = New System.Windows.Forms.Label()
|
||||||
|
Me.lb_state_date = New System.Windows.Forms.Label()
|
||||||
|
Me.txb_state_name = New System.Windows.Forms.TextBox()
|
||||||
|
Me.gb_pack_data = New System.Windows.Forms.GroupBox()
|
||||||
|
Me.lb_pack_code = New System.Windows.Forms.Label()
|
||||||
|
Me.txb_pack_code = New System.Windows.Forms.TextBox()
|
||||||
|
Me.lb_pack_date = New System.Windows.Forms.Label()
|
||||||
|
Me.txb_pack_date = New System.Windows.Forms.TextBox()
|
||||||
|
Me.gb_pack_item = New System.Windows.Forms.GroupBox()
|
||||||
|
Me.dgv_pack_item = New System.Windows.Forms.DataGridView()
|
||||||
|
Me.df_item_name = New System.Windows.Forms.DataGridViewTextBoxColumn()
|
||||||
|
Me.df_count = New System.Windows.Forms.DataGridViewTextBoxColumn()
|
||||||
|
Me.df_serial = New System.Windows.Forms.DataGridViewTextBoxColumn()
|
||||||
|
Me.btn_delete = New System.Windows.Forms.Button()
|
||||||
|
Me.ckb_barcode = New System.Windows.Forms.CheckBox()
|
||||||
|
Me.timer_barcode = New System.Windows.Forms.Timer(Me.components)
|
||||||
|
Me.ckb_state = New System.Windows.Forms.CheckBox()
|
||||||
|
Me.gb_pack.SuspendLayout()
|
||||||
|
Me.gb_state.SuspendLayout()
|
||||||
|
Me.gb_pack_data.SuspendLayout()
|
||||||
|
Me.gb_pack_item.SuspendLayout()
|
||||||
|
CType(Me.dgv_pack_item, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||||
|
Me.SuspendLayout()
|
||||||
|
'
|
||||||
|
'btnReadDB
|
||||||
|
'
|
||||||
|
Me.btnReadDB.Font = New System.Drawing.Font("함초롬바탕", 21.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
|
||||||
|
Me.btnReadDB.Location = New System.Drawing.Point(672, 28)
|
||||||
|
Me.btnReadDB.Name = "btnReadDB"
|
||||||
|
Me.btnReadDB.Size = New System.Drawing.Size(136, 53)
|
||||||
|
Me.btnReadDB.TabIndex = 0
|
||||||
|
Me.btnReadDB.Text = "읽기"
|
||||||
|
Me.btnReadDB.UseVisualStyleBackColor = True
|
||||||
|
'
|
||||||
|
'txbPacking
|
||||||
|
'
|
||||||
|
Me.txbPacking.Font = New System.Drawing.Font("함초롬바탕", 26.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
|
||||||
|
Me.txbPacking.Location = New System.Drawing.Point(319, 28)
|
||||||
|
Me.txbPacking.Name = "txbPacking"
|
||||||
|
Me.txbPacking.Size = New System.Drawing.Size(347, 53)
|
||||||
|
Me.txbPacking.TabIndex = 1
|
||||||
|
Me.txbPacking.TextAlign = System.Windows.Forms.HorizontalAlignment.Center
|
||||||
|
'
|
||||||
|
'lb_packing
|
||||||
|
'
|
||||||
|
Me.lb_packing.AutoSize = True
|
||||||
|
Me.lb_packing.Font = New System.Drawing.Font("함초롬바탕", 21.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
|
||||||
|
Me.lb_packing.Location = New System.Drawing.Point(43, 37)
|
||||||
|
Me.lb_packing.Name = "lb_packing"
|
||||||
|
Me.lb_packing.Size = New System.Drawing.Size(270, 38)
|
||||||
|
Me.lb_packing.TabIndex = 2
|
||||||
|
Me.lb_packing.Text = "Packing Code 검색"
|
||||||
|
'
|
||||||
|
'gb_pack
|
||||||
|
'
|
||||||
|
Me.gb_pack.Controls.Add(Me.gb_state)
|
||||||
|
Me.gb_pack.Controls.Add(Me.gb_pack_data)
|
||||||
|
Me.gb_pack.Controls.Add(Me.gb_pack_item)
|
||||||
|
Me.gb_pack.Font = New System.Drawing.Font("함초롬바탕", 20.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
|
||||||
|
Me.gb_pack.Location = New System.Drawing.Point(12, 94)
|
||||||
|
Me.gb_pack.Name = "gb_pack"
|
||||||
|
Me.gb_pack.Size = New System.Drawing.Size(1180, 536)
|
||||||
|
Me.gb_pack.TabIndex = 3
|
||||||
|
Me.gb_pack.TabStop = False
|
||||||
|
Me.gb_pack.Text = "패킹 데이터"
|
||||||
|
'
|
||||||
|
'gb_state
|
||||||
|
'
|
||||||
|
Me.gb_state.Controls.Add(Me.txb_invoice)
|
||||||
|
Me.gb_state.Controls.Add(Me.lb_invoice)
|
||||||
|
Me.gb_state.Controls.Add(Me.lb_state_code)
|
||||||
|
Me.gb_state.Controls.Add(Me.txb_state_code)
|
||||||
|
Me.gb_state.Controls.Add(Me.txb_state_date)
|
||||||
|
Me.gb_state.Controls.Add(Me.lb_state_name)
|
||||||
|
Me.gb_state.Controls.Add(Me.lb_state_date)
|
||||||
|
Me.gb_state.Controls.Add(Me.txb_state_name)
|
||||||
|
Me.gb_state.Location = New System.Drawing.Point(15, 214)
|
||||||
|
Me.gb_state.Name = "gb_state"
|
||||||
|
Me.gb_state.Size = New System.Drawing.Size(514, 294)
|
||||||
|
Me.gb_state.TabIndex = 12
|
||||||
|
Me.gb_state.TabStop = False
|
||||||
|
Me.gb_state.Text = "전표데이터"
|
||||||
|
'
|
||||||
|
'txb_invoice
|
||||||
|
'
|
||||||
|
Me.txb_invoice.BackColor = System.Drawing.SystemColors.Window
|
||||||
|
Me.txb_invoice.Location = New System.Drawing.Point(131, 223)
|
||||||
|
Me.txb_invoice.Name = "txb_invoice"
|
||||||
|
Me.txb_invoice.ReadOnly = True
|
||||||
|
Me.txb_invoice.Size = New System.Drawing.Size(371, 43)
|
||||||
|
Me.txb_invoice.TabIndex = 12
|
||||||
|
Me.txb_invoice.Text = "321321321321"
|
||||||
|
Me.txb_invoice.TextAlign = System.Windows.Forms.HorizontalAlignment.Center
|
||||||
|
'
|
||||||
|
'lb_invoice
|
||||||
|
'
|
||||||
|
Me.lb_invoice.AutoSize = True
|
||||||
|
Me.lb_invoice.Location = New System.Drawing.Point(6, 226)
|
||||||
|
Me.lb_invoice.Name = "lb_invoice"
|
||||||
|
Me.lb_invoice.Size = New System.Drawing.Size(119, 35)
|
||||||
|
Me.lb_invoice.TabIndex = 11
|
||||||
|
Me.lb_invoice.Text = "송장번호"
|
||||||
|
'
|
||||||
|
'lb_state_code
|
||||||
|
'
|
||||||
|
Me.lb_state_code.AutoSize = True
|
||||||
|
Me.lb_state_code.Location = New System.Drawing.Point(6, 50)
|
||||||
|
Me.lb_state_code.Name = "lb_state_code"
|
||||||
|
Me.lb_state_code.Size = New System.Drawing.Size(119, 35)
|
||||||
|
Me.lb_state_code.TabIndex = 4
|
||||||
|
Me.lb_state_code.Text = "전표코드"
|
||||||
|
'
|
||||||
|
'txb_state_code
|
||||||
|
'
|
||||||
|
Me.txb_state_code.BackColor = System.Drawing.SystemColors.Window
|
||||||
|
Me.txb_state_code.Location = New System.Drawing.Point(131, 47)
|
||||||
|
Me.txb_state_code.Name = "txb_state_code"
|
||||||
|
Me.txb_state_code.ReadOnly = True
|
||||||
|
Me.txb_state_code.Size = New System.Drawing.Size(371, 43)
|
||||||
|
Me.txb_state_code.TabIndex = 5
|
||||||
|
Me.txb_state_code.Text = "E040221/20220302/1"
|
||||||
|
Me.txb_state_code.TextAlign = System.Windows.Forms.HorizontalAlignment.Center
|
||||||
|
'
|
||||||
|
'txb_state_date
|
||||||
|
'
|
||||||
|
Me.txb_state_date.BackColor = System.Drawing.SystemColors.Window
|
||||||
|
Me.txb_state_date.Location = New System.Drawing.Point(131, 164)
|
||||||
|
Me.txb_state_date.Name = "txb_state_date"
|
||||||
|
Me.txb_state_date.ReadOnly = True
|
||||||
|
Me.txb_state_date.Size = New System.Drawing.Size(371, 43)
|
||||||
|
Me.txb_state_date.TabIndex = 10
|
||||||
|
Me.txb_state_date.Text = "2022-12-31"
|
||||||
|
Me.txb_state_date.TextAlign = System.Windows.Forms.HorizontalAlignment.Center
|
||||||
|
'
|
||||||
|
'lb_state_name
|
||||||
|
'
|
||||||
|
Me.lb_state_name.AutoSize = True
|
||||||
|
Me.lb_state_name.Location = New System.Drawing.Point(6, 107)
|
||||||
|
Me.lb_state_name.Name = "lb_state_name"
|
||||||
|
Me.lb_state_name.Size = New System.Drawing.Size(119, 35)
|
||||||
|
Me.lb_state_name.TabIndex = 7
|
||||||
|
Me.lb_state_name.Text = "주문자명"
|
||||||
|
'
|
||||||
|
'lb_state_date
|
||||||
|
'
|
||||||
|
Me.lb_state_date.AutoSize = True
|
||||||
|
Me.lb_state_date.Location = New System.Drawing.Point(6, 167)
|
||||||
|
Me.lb_state_date.Name = "lb_state_date"
|
||||||
|
Me.lb_state_date.Size = New System.Drawing.Size(119, 35)
|
||||||
|
Me.lb_state_date.TabIndex = 9
|
||||||
|
Me.lb_state_date.Text = "등록일자"
|
||||||
|
'
|
||||||
|
'txb_state_name
|
||||||
|
'
|
||||||
|
Me.txb_state_name.BackColor = System.Drawing.SystemColors.Window
|
||||||
|
Me.txb_state_name.Location = New System.Drawing.Point(131, 104)
|
||||||
|
Me.txb_state_name.Name = "txb_state_name"
|
||||||
|
Me.txb_state_name.ReadOnly = True
|
||||||
|
Me.txb_state_name.Size = New System.Drawing.Size(371, 43)
|
||||||
|
Me.txb_state_name.TabIndex = 8
|
||||||
|
Me.txb_state_name.Text = "박석태"
|
||||||
|
Me.txb_state_name.TextAlign = System.Windows.Forms.HorizontalAlignment.Center
|
||||||
|
'
|
||||||
|
'gb_pack_data
|
||||||
|
'
|
||||||
|
Me.gb_pack_data.Controls.Add(Me.lb_pack_code)
|
||||||
|
Me.gb_pack_data.Controls.Add(Me.txb_pack_code)
|
||||||
|
Me.gb_pack_data.Controls.Add(Me.lb_pack_date)
|
||||||
|
Me.gb_pack_data.Controls.Add(Me.txb_pack_date)
|
||||||
|
Me.gb_pack_data.Location = New System.Drawing.Point(15, 42)
|
||||||
|
Me.gb_pack_data.Name = "gb_pack_data"
|
||||||
|
Me.gb_pack_data.Size = New System.Drawing.Size(514, 166)
|
||||||
|
Me.gb_pack_data.TabIndex = 11
|
||||||
|
Me.gb_pack_data.TabStop = False
|
||||||
|
Me.gb_pack_data.Text = "패킹데이터"
|
||||||
|
'
|
||||||
|
'lb_pack_code
|
||||||
|
'
|
||||||
|
Me.lb_pack_code.AutoSize = True
|
||||||
|
Me.lb_pack_code.Location = New System.Drawing.Point(6, 49)
|
||||||
|
Me.lb_pack_code.Name = "lb_pack_code"
|
||||||
|
Me.lb_pack_code.Size = New System.Drawing.Size(119, 35)
|
||||||
|
Me.lb_pack_code.TabIndex = 0
|
||||||
|
Me.lb_pack_code.Text = "패킹코드"
|
||||||
|
'
|
||||||
|
'txb_pack_code
|
||||||
|
'
|
||||||
|
Me.txb_pack_code.BackColor = System.Drawing.SystemColors.Window
|
||||||
|
Me.txb_pack_code.Location = New System.Drawing.Point(131, 46)
|
||||||
|
Me.txb_pack_code.Name = "txb_pack_code"
|
||||||
|
Me.txb_pack_code.ReadOnly = True
|
||||||
|
Me.txb_pack_code.Size = New System.Drawing.Size(371, 43)
|
||||||
|
Me.txb_pack_code.TabIndex = 1
|
||||||
|
Me.txb_pack_code.Text = "102220333555"
|
||||||
|
Me.txb_pack_code.TextAlign = System.Windows.Forms.HorizontalAlignment.Center
|
||||||
|
'
|
||||||
|
'lb_pack_date
|
||||||
|
'
|
||||||
|
Me.lb_pack_date.AutoSize = True
|
||||||
|
Me.lb_pack_date.Location = New System.Drawing.Point(6, 107)
|
||||||
|
Me.lb_pack_date.Name = "lb_pack_date"
|
||||||
|
Me.lb_pack_date.Size = New System.Drawing.Size(119, 35)
|
||||||
|
Me.lb_pack_date.TabIndex = 2
|
||||||
|
Me.lb_pack_date.Text = "포장일자"
|
||||||
|
'
|
||||||
|
'txb_pack_date
|
||||||
|
'
|
||||||
|
Me.txb_pack_date.BackColor = System.Drawing.SystemColors.Window
|
||||||
|
Me.txb_pack_date.Location = New System.Drawing.Point(131, 104)
|
||||||
|
Me.txb_pack_date.Name = "txb_pack_date"
|
||||||
|
Me.txb_pack_date.ReadOnly = True
|
||||||
|
Me.txb_pack_date.Size = New System.Drawing.Size(371, 43)
|
||||||
|
Me.txb_pack_date.TabIndex = 3
|
||||||
|
Me.txb_pack_date.Text = "2022-12-31"
|
||||||
|
Me.txb_pack_date.TextAlign = System.Windows.Forms.HorizontalAlignment.Center
|
||||||
|
'
|
||||||
|
'gb_pack_item
|
||||||
|
'
|
||||||
|
Me.gb_pack_item.Controls.Add(Me.dgv_pack_item)
|
||||||
|
Me.gb_pack_item.Font = New System.Drawing.Font("함초롬바탕", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
|
||||||
|
Me.gb_pack_item.Location = New System.Drawing.Point(545, 42)
|
||||||
|
Me.gb_pack_item.Name = "gb_pack_item"
|
||||||
|
Me.gb_pack_item.Size = New System.Drawing.Size(623, 466)
|
||||||
|
Me.gb_pack_item.TabIndex = 6
|
||||||
|
Me.gb_pack_item.TabStop = False
|
||||||
|
Me.gb_pack_item.Text = "패킹물품"
|
||||||
|
'
|
||||||
|
'dgv_pack_item
|
||||||
|
'
|
||||||
|
Me.dgv_pack_item.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
|
||||||
|
Me.dgv_pack_item.Columns.AddRange(New System.Windows.Forms.DataGridViewColumn() {Me.df_item_name, Me.df_count, Me.df_serial})
|
||||||
|
Me.dgv_pack_item.Location = New System.Drawing.Point(14, 43)
|
||||||
|
Me.dgv_pack_item.Name = "dgv_pack_item"
|
||||||
|
Me.dgv_pack_item.ReadOnly = True
|
||||||
|
Me.dgv_pack_item.RowTemplate.Height = 23
|
||||||
|
Me.dgv_pack_item.Size = New System.Drawing.Size(593, 395)
|
||||||
|
Me.dgv_pack_item.TabIndex = 0
|
||||||
|
'
|
||||||
|
'df_item_name
|
||||||
|
'
|
||||||
|
Me.df_item_name.HeaderText = "물품명"
|
||||||
|
Me.df_item_name.Name = "df_item_name"
|
||||||
|
Me.df_item_name.ReadOnly = True
|
||||||
|
Me.df_item_name.Width = 300
|
||||||
|
'
|
||||||
|
'df_count
|
||||||
|
'
|
||||||
|
Me.df_count.HeaderText = "개수"
|
||||||
|
Me.df_count.Name = "df_count"
|
||||||
|
Me.df_count.ReadOnly = True
|
||||||
|
'
|
||||||
|
'df_serial
|
||||||
|
'
|
||||||
|
Me.df_serial.HeaderText = "시리얼번호"
|
||||||
|
Me.df_serial.Name = "df_serial"
|
||||||
|
Me.df_serial.ReadOnly = True
|
||||||
|
Me.df_serial.Width = 150
|
||||||
|
'
|
||||||
|
'btn_delete
|
||||||
|
'
|
||||||
|
Me.btn_delete.Font = New System.Drawing.Font("함초롬바탕", 21.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
|
||||||
|
Me.btn_delete.Location = New System.Drawing.Point(814, 28)
|
||||||
|
Me.btn_delete.Name = "btn_delete"
|
||||||
|
Me.btn_delete.Size = New System.Drawing.Size(136, 53)
|
||||||
|
Me.btn_delete.TabIndex = 4
|
||||||
|
Me.btn_delete.Text = "삭제"
|
||||||
|
Me.btn_delete.UseVisualStyleBackColor = True
|
||||||
|
'
|
||||||
|
'ckb_barcode
|
||||||
|
'
|
||||||
|
Me.ckb_barcode.AutoSize = True
|
||||||
|
Me.ckb_barcode.Checked = True
|
||||||
|
Me.ckb_barcode.CheckState = System.Windows.Forms.CheckState.Checked
|
||||||
|
Me.ckb_barcode.Font = New System.Drawing.Font("함초롬바탕", 18.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
|
||||||
|
Me.ckb_barcode.Location = New System.Drawing.Point(956, 20)
|
||||||
|
Me.ckb_barcode.Name = "ckb_barcode"
|
||||||
|
Me.ckb_barcode.Size = New System.Drawing.Size(156, 36)
|
||||||
|
Me.ckb_barcode.TabIndex = 5
|
||||||
|
Me.ckb_barcode.Text = "바코드 사용"
|
||||||
|
Me.ckb_barcode.UseVisualStyleBackColor = True
|
||||||
|
'
|
||||||
|
'timer_barcode
|
||||||
|
'
|
||||||
|
Me.timer_barcode.Interval = 10
|
||||||
|
'
|
||||||
|
'ckb_state
|
||||||
|
'
|
||||||
|
Me.ckb_state.AutoSize = True
|
||||||
|
Me.ckb_state.Font = New System.Drawing.Font("함초롬바탕", 18.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
|
||||||
|
Me.ckb_state.Location = New System.Drawing.Point(956, 56)
|
||||||
|
Me.ckb_state.Name = "ckb_state"
|
||||||
|
Me.ckb_state.Size = New System.Drawing.Size(225, 36)
|
||||||
|
Me.ckb_state.TabIndex = 6
|
||||||
|
Me.ckb_state.Text = "전표데이터만 삭제"
|
||||||
|
Me.ckb_state.UseVisualStyleBackColor = True
|
||||||
|
'
|
||||||
|
'frmMySqlTest
|
||||||
|
'
|
||||||
|
Me.AutoScaleDimensions = New System.Drawing.SizeF(7.0!, 12.0!)
|
||||||
|
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||||
|
Me.ClientSize = New System.Drawing.Size(1203, 649)
|
||||||
|
Me.Controls.Add(Me.ckb_state)
|
||||||
|
Me.Controls.Add(Me.ckb_barcode)
|
||||||
|
Me.Controls.Add(Me.btn_delete)
|
||||||
|
Me.Controls.Add(Me.gb_pack)
|
||||||
|
Me.Controls.Add(Me.lb_packing)
|
||||||
|
Me.Controls.Add(Me.txbPacking)
|
||||||
|
Me.Controls.Add(Me.btnReadDB)
|
||||||
|
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
|
||||||
|
Me.Name = "frmMySqlTest"
|
||||||
|
Me.Text = "패킹 및 전표 Database Delete Program"
|
||||||
|
Me.gb_pack.ResumeLayout(False)
|
||||||
|
Me.gb_state.ResumeLayout(False)
|
||||||
|
Me.gb_state.PerformLayout()
|
||||||
|
Me.gb_pack_data.ResumeLayout(False)
|
||||||
|
Me.gb_pack_data.PerformLayout()
|
||||||
|
Me.gb_pack_item.ResumeLayout(False)
|
||||||
|
CType(Me.dgv_pack_item, System.ComponentModel.ISupportInitialize).EndInit()
|
||||||
|
Me.ResumeLayout(False)
|
||||||
|
Me.PerformLayout()
|
||||||
|
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
Friend WithEvents btnReadDB As Button
|
||||||
|
Friend WithEvents txbPacking As TextBox
|
||||||
|
Friend WithEvents lb_packing As Label
|
||||||
|
Friend WithEvents gb_pack As GroupBox
|
||||||
|
Friend WithEvents txb_pack_code As TextBox
|
||||||
|
Friend WithEvents lb_pack_code As Label
|
||||||
|
Friend WithEvents txb_pack_date As TextBox
|
||||||
|
Friend WithEvents lb_pack_date As Label
|
||||||
|
Friend WithEvents txb_state_date As TextBox
|
||||||
|
Friend WithEvents lb_state_date As Label
|
||||||
|
Friend WithEvents txb_state_name As TextBox
|
||||||
|
Friend WithEvents lb_state_name As Label
|
||||||
|
Friend WithEvents gb_pack_item As GroupBox
|
||||||
|
Friend WithEvents txb_state_code As TextBox
|
||||||
|
Friend WithEvents lb_state_code As Label
|
||||||
|
Friend WithEvents dgv_pack_item As DataGridView
|
||||||
|
Friend WithEvents gb_pack_data As GroupBox
|
||||||
|
Friend WithEvents df_item_name As DataGridViewTextBoxColumn
|
||||||
|
Friend WithEvents df_count As DataGridViewTextBoxColumn
|
||||||
|
Friend WithEvents df_serial As DataGridViewTextBoxColumn
|
||||||
|
Friend WithEvents gb_state As GroupBox
|
||||||
|
Friend WithEvents btn_delete As Button
|
||||||
|
Friend WithEvents ckb_barcode As CheckBox
|
||||||
|
Friend WithEvents timer_barcode As Timer
|
||||||
|
Friend WithEvents txb_invoice As TextBox
|
||||||
|
Friend WithEvents lb_invoice As Label
|
||||||
|
Friend WithEvents ckb_state As CheckBox
|
||||||
|
End Class
|
||||||
2122
frmMySqlTest.resx
Normal file
2122
frmMySqlTest.resx
Normal file
File diff suppressed because it is too large
Load Diff
642
frmMySqlTest.vb
Normal file
642
frmMySqlTest.vb
Normal file
@ -0,0 +1,642 @@
|
|||||||
|
'Imports System.Data.OleDb
|
||||||
|
'Imports System.Reflection
|
||||||
|
Imports System.ComponentModel
|
||||||
|
Imports Excel = Microsoft.Office.Interop.Excel
|
||||||
|
''Imports Microsoft.Office.Interop
|
||||||
|
Public Class frmMySqlTest
|
||||||
|
|
||||||
|
Private Enum data_set
|
||||||
|
packcode
|
||||||
|
pack_date
|
||||||
|
set_serial
|
||||||
|
bag_type
|
||||||
|
etc_name
|
||||||
|
pro_fa_serial
|
||||||
|
pro_ey_serial
|
||||||
|
pro_bo_serial
|
||||||
|
lux_fa_serial
|
||||||
|
lux_ey_serial
|
||||||
|
lux_bo_serial
|
||||||
|
MAXIMUM_serial
|
||||||
|
Alpha_Serial
|
||||||
|
Alpha_fa_Serial
|
||||||
|
Alpha_ey_Serial
|
||||||
|
Alpha_bo_Serial
|
||||||
|
Alto_Serial
|
||||||
|
Effect_Serial
|
||||||
|
ordercode
|
||||||
|
order_name
|
||||||
|
phone
|
||||||
|
ship_date
|
||||||
|
invoice
|
||||||
|
|
||||||
|
max
|
||||||
|
End Enum
|
||||||
|
Private data_select(data_set.max) As String
|
||||||
|
|
||||||
|
Private Enum data_count
|
||||||
|
set_cnt
|
||||||
|
mask5_cnt
|
||||||
|
mask10_cnt
|
||||||
|
hair_cnt
|
||||||
|
gel_cnt
|
||||||
|
minigel_cnt
|
||||||
|
amp_cnt
|
||||||
|
cre_cnt
|
||||||
|
umb_cnt
|
||||||
|
fen_cnt
|
||||||
|
char_cnt
|
||||||
|
cab_cnt
|
||||||
|
toner_cnt
|
||||||
|
case_cnt
|
||||||
|
dustbag_cnt
|
||||||
|
bag_cnt
|
||||||
|
etc_cnt
|
||||||
|
pro_fa_cnt
|
||||||
|
pro_ey_cnt
|
||||||
|
pro_bo_cnt
|
||||||
|
lux_fa_cnt
|
||||||
|
lux_ey_cnt
|
||||||
|
lux_bo_cnt
|
||||||
|
MAXIMUM_cnt
|
||||||
|
Alpha_cnt
|
||||||
|
Alpha_fa_cnt
|
||||||
|
Alpha_ey_cnt
|
||||||
|
Alpha_bo_cnt
|
||||||
|
Alto_cnt
|
||||||
|
Effect_cnt
|
||||||
|
|
||||||
|
max
|
||||||
|
End Enum
|
||||||
|
Private data_cnt(data_count.max) As String
|
||||||
|
|
||||||
|
Private cmd As String
|
||||||
|
Private dbcmd As String
|
||||||
|
|
||||||
|
Private order_table As String = "jomtOrderDB.jomtOrderTbl"
|
||||||
|
Private sales_table As String = "jomtTesterDB.jomtSalesPackingTbl"
|
||||||
|
Private order_test As String = "jomtOrderTestDB.jomtTesterOrderTbl"
|
||||||
|
Private sales_test As String = "jomtTesterServerDB.jomtSalesPackingTbl"
|
||||||
|
|
||||||
|
Private order_db As String = order_table
|
||||||
|
Private sales_db As String = sales_table
|
||||||
|
|
||||||
|
Private clear_switch As Boolean = False
|
||||||
|
|
||||||
|
Public InputCnt As Long
|
||||||
|
Public InputCntVal As Integer = 10
|
||||||
|
|
||||||
|
Private Sub SetInputCnt()
|
||||||
|
InputCnt = InputCntVal
|
||||||
|
timer_barcode.Enabled = True
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
Private Sub timer_barcode_Tick(sender As Object, e As EventArgs) Handles timer_barcode.Tick
|
||||||
|
|
||||||
|
If InputCnt Then
|
||||||
|
InputCnt -= 1
|
||||||
|
Else
|
||||||
|
timer_barcode.Enabled = False
|
||||||
|
|
||||||
|
If ckb_barcode.Checked Then
|
||||||
|
|
||||||
|
btnReadDB_Click(sender, e)
|
||||||
|
|
||||||
|
Else
|
||||||
|
txbPacking.Focus()
|
||||||
|
txbPacking.Refresh()
|
||||||
|
End If
|
||||||
|
End If
|
||||||
|
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
Private Sub txb_clear()
|
||||||
|
|
||||||
|
If clear_switch = False Then
|
||||||
|
txbPacking.Clear()
|
||||||
|
End If
|
||||||
|
|
||||||
|
clear_switch = False
|
||||||
|
|
||||||
|
txb_pack_code.Clear()
|
||||||
|
txb_pack_date.Clear()
|
||||||
|
txb_state_code.Clear()
|
||||||
|
txb_state_date.Clear()
|
||||||
|
txb_state_name.Clear()
|
||||||
|
txb_invoice.Clear()
|
||||||
|
|
||||||
|
txbPacking.Refresh()
|
||||||
|
txb_pack_code.Refresh()
|
||||||
|
txb_pack_date.Refresh()
|
||||||
|
txb_state_code.Refresh()
|
||||||
|
txb_state_date.Refresh()
|
||||||
|
txb_state_name.Refresh()
|
||||||
|
txb_invoice.Refresh()
|
||||||
|
|
||||||
|
End Sub
|
||||||
|
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
|
||||||
|
|
||||||
|
txb_clear()
|
||||||
|
|
||||||
|
' DataGridView를 선택하면 전체 한줄이 선택되게 됩니다.
|
||||||
|
dgv_pack_item.SelectionMode = DataGridViewSelectionMode.FullRowSelect
|
||||||
|
txbPacking.Focus()
|
||||||
|
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
'Private Sub size_est()
|
||||||
|
' Dim width, height As Integer
|
||||||
|
|
||||||
|
' Me.Hide()
|
||||||
|
' Me.WindowState = FormWindowState.Maximized
|
||||||
|
|
||||||
|
' width = Val(Me.Width)
|
||||||
|
' height = Val(Me.Height)
|
||||||
|
|
||||||
|
' Me.MaximumSize = New Size(width, height)
|
||||||
|
' Me.Width = width
|
||||||
|
' Me.Height = height
|
||||||
|
|
||||||
|
' Me.Show()
|
||||||
|
' Me.Refresh()
|
||||||
|
|
||||||
|
'End Sub
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
Private Sub btnReadDB_Click(sender As Object, e As EventArgs) Handles btnReadDB.Click
|
||||||
|
|
||||||
|
If txbPacking.Text = "" Then
|
||||||
|
|
||||||
|
If ckb_state.Checked = True Then
|
||||||
|
MsgBox("전표코드를 입력하여 주십시오.", vbExclamation)
|
||||||
|
Else
|
||||||
|
MsgBox("패킹코드를 입력하여 주십시오.", vbExclamation)
|
||||||
|
End If
|
||||||
|
|
||||||
|
Else
|
||||||
|
|
||||||
|
dgv_pack_item.Rows.Clear()
|
||||||
|
|
||||||
|
If db_select(txbPacking.Text) Then
|
||||||
|
|
||||||
|
If item_out() Then
|
||||||
|
txb_pack_code.Text = data_select(data_set.packcode)
|
||||||
|
txb_pack_date.Text = data_select(data_set.pack_date)
|
||||||
|
txb_state_code.Text = data_select(data_set.ordercode)
|
||||||
|
txb_state_date.Text = data_select(data_set.ship_date)
|
||||||
|
txb_state_name.Text = data_select(data_set.order_name)
|
||||||
|
txb_invoice.Text = data_select(data_set.invoice)
|
||||||
|
End If
|
||||||
|
|
||||||
|
Else
|
||||||
|
txbPacking.BackColor = Color.Red
|
||||||
|
MsgBox("등록되지 않은 데이터 입니다. 패킹 코드를 확인하여 주십시오.", vbCritical)
|
||||||
|
End If
|
||||||
|
|
||||||
|
End If
|
||||||
|
|
||||||
|
txbPacking.Focus()
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
Private Function db_select(serial As String) As Boolean
|
||||||
|
|
||||||
|
dbcmd = "SELECT IFNULL(sale.PackingCode,'NULL'),IFNULL(sale.`Data`,'NULL'), IFNULL(sale.Main_Product_SN,'NULL'),IFNULL(sale.Set_Cnt,'0'),IFNULL(sale.Mask5Cnt,'0'),IFNULL(sale.Mask10Cnt,'0'),IFNULL(sale.HairBandCnt,'0'),IFNULL(sale.GelCnt,'0') ,IFNULL(sale.MiniGelCnt,'0'),IFNULL(sale.AmpleCnt,'0'),IFNULL(sale.CreamCnt,'0'),IFNULL(sale.UmbrellaCnt,'0'),IFNULL(sale.FenCnt,'0'),IFNULL(sale.ChargerCnt,'0'),IFNULL(sale.CableCnt,'0'),IFNULL(sale.TonerCnt,'0'), IFNULL(sale.CaseCnt,'0') , IFNULL(sale.DustBagCnt,'0'), IFNULL(sale.BagCnt,'0'), IFNULL(sale.BagType,'0'),IFNULL(sale.EtcCnt,'0'),IFNULL(sale.etcName,'NULL'),IFNULL(sale.Pro_Face_Serial,'NULL'),IFNULL(sale.Pro_CT_FaceCnt,'0'),IFNULL(sale.Pro_Eye_Serial,'NULL'),IFNULL(sale.Pro_CT_EYE_Cnt,'0'),IFNULL(sale.Pro_Body_Serial,'NULL'),IFNULL(sale.Pro_CT_BodyCnt,'0'),IFNULL(sale.Lux_Face_Serial,'NULL'),IFNULL(sale.Lux_CT_FaceCnt,'0'),IFNULL(sale.Lux_Eye_Serial,'NULL'),IFNULL(sale.Lux_CT_EYE_Cnt,'0'),IFNULL(sale.Lux_Body_Serial,'NULL'),IFNULL(sale.Lux_CT_BodyCnt,'0'),IFNULL(sale.MAXIMUM_SN,'NULL'),IFNULL(sale.MAXIMUM_Cnt,'0'), IFNULL(sale.Alpha_Set_Serial,'NULL'),IFNULL(sale.Alpha_Set_cnt,'0'),IFNULL(sale.Alpha_Face_Serial,'NULL'),IFNULL(sale.Alpha_Face_cnt,'0'),IFNULL(sale.Alpha_Eye_Serial,'NULL'),IFNULL(sale.Alpha_Eye_cnt,'0'),IFNULL(sale.Alpha_Body_Serial,'NULL'),IFNULL(sale.Alpha_Body_cnt,'0'),IFNULL(sale.Alto_Serial,'NULL'),IFNULL(sale.Alto_cnt,'0'),IFNULL(sale.Effect_Serial,'NULL'),IFNULL(sale.Effect_cnt,'0'),ifnull(otb.Order_Code,'NULL'),ifnull(otb.Orderer_Name,'NULL'),ifnull(otb.Phone_Number,'NULL'),ifnull(otb.Shipment_Date,'NULL'),IFNULL(otb.Invoice_Number,'NULL') FROM " & sales_db & " AS sale LEFT JOIN " & order_db & " AS otb ON sale.PackingCode = otb.Packing_Code WHERE sale.PackingCode = '" & serial & "' GROUP BY sale.PackingCode"
|
||||||
|
|
||||||
|
If DBQueryReader(dbcmd) Then
|
||||||
|
data_select(data_set.packcode) = sqlDataQuery(0)
|
||||||
|
data_select(data_set.pack_date) = sqlDataQuery(1)
|
||||||
|
data_select(data_set.set_serial) = sqlDataQuery(2)
|
||||||
|
data_cnt(data_count.set_cnt) = sqlDataQuery(3)
|
||||||
|
data_cnt(data_count.mask5_cnt) = sqlDataQuery(4)
|
||||||
|
data_cnt(data_count.mask10_cnt) = sqlDataQuery(5)
|
||||||
|
data_cnt(data_count.hair_cnt) = sqlDataQuery(6)
|
||||||
|
data_cnt(data_count.gel_cnt) = sqlDataQuery(7)
|
||||||
|
data_cnt(data_count.minigel_cnt) = sqlDataQuery(8)
|
||||||
|
data_cnt(data_count.amp_cnt) = sqlDataQuery(9)
|
||||||
|
data_cnt(data_count.cre_cnt) = sqlDataQuery(10)
|
||||||
|
data_cnt(data_count.umb_cnt) = sqlDataQuery(11)
|
||||||
|
data_cnt(data_count.fen_cnt) = sqlDataQuery(12)
|
||||||
|
data_cnt(data_count.char_cnt) = sqlDataQuery(13)
|
||||||
|
data_cnt(data_count.cab_cnt) = sqlDataQuery(14)
|
||||||
|
data_cnt(data_count.toner_cnt) = sqlDataQuery(15)
|
||||||
|
data_cnt(data_count.case_cnt) = sqlDataQuery(16)
|
||||||
|
data_cnt(data_count.dustbag_cnt) = sqlDataQuery(17)
|
||||||
|
data_cnt(data_count.bag_cnt) = sqlDataQuery(18)
|
||||||
|
data_select(data_set.bag_type) = sqlDataQuery(19)
|
||||||
|
data_cnt(data_count.etc_cnt) = sqlDataQuery(20)
|
||||||
|
data_select(data_set.etc_name) = sqlDataQuery(21)
|
||||||
|
data_select(data_set.pro_fa_serial) = sqlDataQuery(22)
|
||||||
|
data_cnt(data_count.pro_fa_cnt) = sqlDataQuery(23)
|
||||||
|
data_select(data_set.pro_ey_serial) = sqlDataQuery(24)
|
||||||
|
data_cnt(data_count.pro_ey_cnt) = sqlDataQuery(25)
|
||||||
|
data_select(data_set.pro_bo_serial) = sqlDataQuery(26)
|
||||||
|
data_cnt(data_count.pro_bo_cnt) = sqlDataQuery(27)
|
||||||
|
data_select(data_set.lux_fa_serial) = sqlDataQuery(28)
|
||||||
|
data_cnt(data_count.lux_fa_cnt) = sqlDataQuery(29)
|
||||||
|
data_select(data_set.lux_ey_serial) = sqlDataQuery(30)
|
||||||
|
data_cnt(data_count.lux_ey_cnt) = sqlDataQuery(31)
|
||||||
|
data_select(data_set.lux_bo_serial) = sqlDataQuery(32)
|
||||||
|
data_cnt(data_count.lux_bo_cnt) = sqlDataQuery(33)
|
||||||
|
data_select(data_set.MAXIMUM_serial) = sqlDataQuery(34)
|
||||||
|
data_cnt(data_count.MAXIMUM_cnt) = sqlDataQuery(35)
|
||||||
|
data_select(data_set.Alpha_Serial) = sqlDataQuery(36)
|
||||||
|
data_cnt(data_count.Alpha_cnt) = sqlDataQuery(37)
|
||||||
|
data_select(data_set.Alpha_fa_Serial) = sqlDataQuery(38)
|
||||||
|
data_cnt(data_count.Alpha_fa_cnt) = sqlDataQuery(39)
|
||||||
|
data_select(data_set.Alpha_ey_Serial) = sqlDataQuery(40)
|
||||||
|
data_cnt(data_count.Alpha_ey_cnt) = sqlDataQuery(41)
|
||||||
|
data_select(data_set.Alpha_bo_Serial) = sqlDataQuery(42)
|
||||||
|
data_cnt(data_count.Alpha_bo_cnt) = sqlDataQuery(43)
|
||||||
|
data_select(data_set.Alto_Serial) = sqlDataQuery(44)
|
||||||
|
data_cnt(data_count.Alto_cnt) = sqlDataQuery(45)
|
||||||
|
data_cnt(data_count.Effect_cnt) = sqlDataQuery(46)
|
||||||
|
data_select(data_set.Effect_Serial) = sqlDataQuery(47)
|
||||||
|
data_select(data_set.ordercode) = sqlDataQuery(48)
|
||||||
|
data_select(data_set.order_name) = sqlDataQuery(49)
|
||||||
|
data_select(data_set.phone) = sqlDataQuery(50)
|
||||||
|
data_select(data_set.ship_date) = sqlDataQuery(51)
|
||||||
|
data_select(data_set.invoice) = sqlDataQuery(52)
|
||||||
|
|
||||||
|
Return True
|
||||||
|
|
||||||
|
Else
|
||||||
|
data_select(data_set.packcode) = "NULL"
|
||||||
|
data_select(data_set.pack_date) = "NULL"
|
||||||
|
data_select(data_set.set_serial) = "NULL"
|
||||||
|
data_cnt(data_count.set_cnt) = "0"
|
||||||
|
data_cnt(data_count.mask5_cnt) = "0"
|
||||||
|
data_cnt(data_count.mask10_cnt) = "0"
|
||||||
|
data_cnt(data_count.hair_cnt) = "0"
|
||||||
|
data_cnt(data_count.gel_cnt) = "0"
|
||||||
|
data_cnt(data_count.minigel_cnt) = "0"
|
||||||
|
data_cnt(data_count.amp_cnt) = "0"
|
||||||
|
data_cnt(data_count.cre_cnt) = "0"
|
||||||
|
data_cnt(data_count.umb_cnt) = "0"
|
||||||
|
data_cnt(data_count.fen_cnt) = "0"
|
||||||
|
data_cnt(data_count.char_cnt) = "0"
|
||||||
|
data_cnt(data_count.cab_cnt) = "0"
|
||||||
|
data_cnt(data_count.toner_cnt) = "0"
|
||||||
|
data_cnt(data_count.case_cnt) = "0"
|
||||||
|
data_cnt(data_count.dustbag_cnt) = "0"
|
||||||
|
data_cnt(data_count.bag_cnt) = "0"
|
||||||
|
data_select(data_set.bag_type) = "NULL"
|
||||||
|
data_cnt(data_count.etc_cnt) = "0"
|
||||||
|
data_select(data_set.etc_name) = "NULL"
|
||||||
|
data_select(data_set.pro_fa_serial) = "NULL"
|
||||||
|
data_cnt(data_count.pro_fa_cnt) = "0"
|
||||||
|
data_select(data_set.pro_ey_serial) = "NULL"
|
||||||
|
data_cnt(data_count.pro_ey_cnt) = "0"
|
||||||
|
data_select(data_set.pro_bo_serial) = "NULL"
|
||||||
|
data_cnt(data_count.pro_bo_cnt) = "0"
|
||||||
|
data_select(data_set.lux_fa_serial) = "NULL"
|
||||||
|
data_cnt(data_count.lux_fa_cnt) = "0"
|
||||||
|
data_select(data_set.lux_ey_serial) = "NULL"
|
||||||
|
data_cnt(data_count.lux_ey_cnt) = "0"
|
||||||
|
data_select(data_set.lux_bo_serial) = "NULL"
|
||||||
|
data_cnt(data_count.lux_bo_cnt) = "0"
|
||||||
|
data_select(data_set.MAXIMUM_serial) = "NULL"
|
||||||
|
data_cnt(data_count.MAXIMUM_cnt) = "0"
|
||||||
|
data_select(data_set.Alpha_Serial) = "NULL"
|
||||||
|
data_cnt(data_count.Alpha_cnt) = "0"
|
||||||
|
data_select(data_set.Alpha_fa_Serial) = "NULL"
|
||||||
|
data_cnt(data_count.Alpha_fa_cnt) = "0"
|
||||||
|
data_select(data_set.Alpha_ey_Serial) = "NULL"
|
||||||
|
data_cnt(data_count.Alpha_ey_cnt) = "0"
|
||||||
|
data_select(data_set.Alpha_bo_Serial) = "NULL"
|
||||||
|
data_cnt(data_count.Alpha_bo_cnt) = "0"
|
||||||
|
data_select(data_set.Alto_Serial) = "NULL"
|
||||||
|
data_cnt(data_count.Alto_cnt) = "0"
|
||||||
|
data_select(data_set.Effect_Serial) = "NULL"
|
||||||
|
data_cnt(data_count.Effect_cnt) = "0"
|
||||||
|
data_select(data_set.ordercode) = "NULL"
|
||||||
|
data_select(data_set.order_name) = "NULL"
|
||||||
|
data_select(data_set.phone) = "NULL"
|
||||||
|
data_select(data_set.ship_date) = "NULL"
|
||||||
|
data_select(data_set.invoice) = "NULL"
|
||||||
|
|
||||||
|
Return False
|
||||||
|
|
||||||
|
End If
|
||||||
|
|
||||||
|
End Function
|
||||||
|
|
||||||
|
Private Function item_out() As Boolean
|
||||||
|
Dim item_name, item_serial As String
|
||||||
|
Dim dgv_switch As Boolean
|
||||||
|
|
||||||
|
Try
|
||||||
|
|
||||||
|
For i = 0 To data_count.max
|
||||||
|
dgv_switch = False
|
||||||
|
item_name = Nothing
|
||||||
|
item_serial = Nothing
|
||||||
|
|
||||||
|
If data_cnt(data_count.max - i) > 0 Then
|
||||||
|
|
||||||
|
Select Case data_count.max - i
|
||||||
|
Case 0
|
||||||
|
If Mid(data_select(data_set.max), 1, 2) = "10" Then
|
||||||
|
item_name = "DUALSONIC Pro 1Set (KR)"
|
||||||
|
item_serial = data_select(data_set.max)
|
||||||
|
dgv_switch = True
|
||||||
|
Else
|
||||||
|
item_name = "DUALSONIC Lux 1Set (KR)"
|
||||||
|
item_serial = data_select(data_set.max)
|
||||||
|
dgv_switch = True
|
||||||
|
End If
|
||||||
|
Case 1
|
||||||
|
item_name = "DUALSONIC Elixir MASK 5EA"
|
||||||
|
dgv_switch = True
|
||||||
|
Case 2
|
||||||
|
item_name = "DUALSONIC Elixir MASK 10EA"
|
||||||
|
dgv_switch = True
|
||||||
|
Case 3
|
||||||
|
item_name = "[사은품] 벨크로헤어밴드"
|
||||||
|
dgv_switch = True
|
||||||
|
Case 4
|
||||||
|
item_name = "DUALSONIC Blooming Moisture Gel"
|
||||||
|
dgv_switch = True
|
||||||
|
Case 5
|
||||||
|
item_name = "DUALSONIC Blooming Moisture Gel(30ml * 5EA)"
|
||||||
|
dgv_switch = True
|
||||||
|
Case 6
|
||||||
|
item_name = "DUALSONIC Skin Cell Elixir Ampoule"
|
||||||
|
dgv_switch = True
|
||||||
|
Case 7
|
||||||
|
item_name = "DUALSONIC Skin Cell Elixir Cream"
|
||||||
|
dgv_switch = True
|
||||||
|
Case 8
|
||||||
|
item_name = "[사은품] 우산"
|
||||||
|
dgv_switch = True
|
||||||
|
Case 9
|
||||||
|
item_name = "[사은품] 손풍기"
|
||||||
|
dgv_switch = True
|
||||||
|
Case 10
|
||||||
|
item_name = "충전기 Assy"
|
||||||
|
dgv_switch = True
|
||||||
|
Case 11
|
||||||
|
item_name = "마이크로 충전 케이블"
|
||||||
|
dgv_switch = True
|
||||||
|
Case 12
|
||||||
|
item_name = "DUALSONIC Skin Elixir Toner"
|
||||||
|
dgv_switch = True
|
||||||
|
Case 13
|
||||||
|
item_name = "DUALSONIC 가죽 케이스 세트"
|
||||||
|
dgv_switch = True
|
||||||
|
Case 14
|
||||||
|
item_name = "DUALSONIC DUST BAG 1BOX"
|
||||||
|
dgv_switch = True
|
||||||
|
Case 15
|
||||||
|
item_name = data_select(data_set.bag_type)
|
||||||
|
dgv_switch = True
|
||||||
|
Case 16
|
||||||
|
item_name = data_select(data_set.etc_name)
|
||||||
|
dgv_switch = True
|
||||||
|
Case 17
|
||||||
|
item_name = "DUALSONIC Pro FACE CARTRIDGE"
|
||||||
|
item_serial = data_select(data_set.pro_fa_serial)
|
||||||
|
dgv_switch = True
|
||||||
|
Case 18
|
||||||
|
item_name = "DUALSONIC Pro Eye CARTRIDGE"
|
||||||
|
item_serial = data_select(data_set.pro_ey_serial)
|
||||||
|
dgv_switch = True
|
||||||
|
Case 19
|
||||||
|
item_name = "DUALSONIC Pro Body Cartridge 1Set Rev.0 (KR)"
|
||||||
|
item_serial = data_select(data_set.pro_bo_serial)
|
||||||
|
dgv_switch = True
|
||||||
|
Case 20
|
||||||
|
item_name = "DUALSONIC Lux FACE CARTRIDGE"
|
||||||
|
item_serial = data_select(data_set.lux_fa_serial)
|
||||||
|
dgv_switch = True
|
||||||
|
Case 21
|
||||||
|
item_name = "DUALSONIC Lux Eye CARTRIDGE"
|
||||||
|
item_serial = data_select(data_set.lux_ey_serial)
|
||||||
|
dgv_switch = True
|
||||||
|
Case 22
|
||||||
|
item_name = "DUALSONIC Lux Body Cartridge 1Set Rev.0 (KR)"
|
||||||
|
item_serial = data_select(data_set.lux_bo_serial)
|
||||||
|
dgv_switch = True
|
||||||
|
Case 23
|
||||||
|
item_name = "MAXIMUM FULL PACK (KR)"
|
||||||
|
item_serial = data_select(data_set.MAXIMUM_serial)
|
||||||
|
dgv_switch = True
|
||||||
|
Case 24
|
||||||
|
item_name = "Alpha Set (KR)"
|
||||||
|
item_serial = data_select(data_set.Alpha_Serial)
|
||||||
|
dgv_switch = True
|
||||||
|
Case 25
|
||||||
|
item_name = "Alpha FACE CARTRIDGE"
|
||||||
|
item_serial = data_select(data_set.Alpha_fa_Serial)
|
||||||
|
dgv_switch = True
|
||||||
|
Case 26
|
||||||
|
item_name = "Alpha Eye CARTRIDGE"
|
||||||
|
item_serial = data_select(data_set.Alpha_ey_Serial)
|
||||||
|
dgv_switch = True
|
||||||
|
Case 27
|
||||||
|
item_name = "Alpha Body CARTRIDGE"
|
||||||
|
item_serial = data_select(data_set.Alpha_bo_Serial)
|
||||||
|
dgv_switch = True
|
||||||
|
Case 28
|
||||||
|
item_name = "Alto PACK (KR)"
|
||||||
|
item_serial = data_select(data_set.Alto_Serial)
|
||||||
|
dgv_switch = True
|
||||||
|
Case 29
|
||||||
|
item_name = "Effect PACK (KR)"
|
||||||
|
item_serial = data_select(data_set.Effect_Serial)
|
||||||
|
dgv_switch = True
|
||||||
|
|
||||||
|
|
||||||
|
End Select
|
||||||
|
|
||||||
|
End If
|
||||||
|
|
||||||
|
If dgv_switch = True Then
|
||||||
|
dgv_pack_item.Rows.Add(item_name, data_cnt(data_count.max - i), item_serial)
|
||||||
|
End If
|
||||||
|
|
||||||
|
Next
|
||||||
|
|
||||||
|
Return True
|
||||||
|
|
||||||
|
Catch ex As Exception
|
||||||
|
MsgBox(Err.Description, vbCritical)
|
||||||
|
Return False
|
||||||
|
End Try
|
||||||
|
|
||||||
|
End Function
|
||||||
|
|
||||||
|
Private Sub txbPacking_Click(sender As Object, e As EventArgs) Handles txbPacking.Click
|
||||||
|
txbPacking.Text = ""
|
||||||
|
txbPacking.BackColor = Color.White
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
' Private Sub txbPacking_KeyDown(ByVal sender As Object, e As KeyEventArgs) Handles txbPacking.KeyDown
|
||||||
|
|
||||||
|
'If e.KeyCode = Keys.KeyCode.Return Then
|
||||||
|
' btnReadDB_Click(sender, e)
|
||||||
|
' End If
|
||||||
|
|
||||||
|
' End Sub
|
||||||
|
Private Sub txbPacking_KeyDown(ByVal sender As Object, e As KeyEventArgs) Handles txbPacking.KeyDown
|
||||||
|
If e.KeyCode = Keys.Return Then
|
||||||
|
btnReadDB_Click(sender, EventArgs.Empty)
|
||||||
|
End If
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
Private Sub btn_delete_Click(sender As Object, e As EventArgs) Handles btn_delete.Click
|
||||||
|
Dim msg_cnt As Int16
|
||||||
|
Dim serial_data As String
|
||||||
|
|
||||||
|
If dgv_pack_item.Rows.Count <> 1 Then
|
||||||
|
|
||||||
|
If ckb_state.Checked = True Then
|
||||||
|
|
||||||
|
msg_cnt = MsgBox("해당 패킹 번호의 전표 데이터만 삭제하시겠습니까?", vbExclamation + vbOKCancel)
|
||||||
|
|
||||||
|
If msg_cnt = 1 Then
|
||||||
|
|
||||||
|
serial_data = delete_sales()
|
||||||
|
|
||||||
|
If txb_state_code.Text <> "NULL" Then
|
||||||
|
|
||||||
|
If state_delete(serial_data) Then
|
||||||
|
txbPacking.BackColor = Color.Green
|
||||||
|
clear_switch = True
|
||||||
|
txb_clear()
|
||||||
|
dgv_pack_item.Rows.Clear()
|
||||||
|
MsgBox("데이터 삭제가 완료되었습니다.", vbInformation)
|
||||||
|
Else
|
||||||
|
txbPacking.BackColor = Color.Red
|
||||||
|
MsgBox("데이터베이스 안에 전표 데이터가 존재하지 않습니다. 데이터를 확인하여 주십시오.", vbCritical)
|
||||||
|
End If
|
||||||
|
|
||||||
|
Else
|
||||||
|
txbPacking.BackColor = Color.Red
|
||||||
|
MsgBox("데이터베이스 안에 전표 데이터가 존재하지 않습니다. 데이터를 확인하여 주십시오.", vbCritical)
|
||||||
|
|
||||||
|
End If
|
||||||
|
|
||||||
|
|
||||||
|
Else
|
||||||
|
MsgBox("삭제가 취소되었습니다.", vbInformation)
|
||||||
|
End If
|
||||||
|
|
||||||
|
|
||||||
|
Else
|
||||||
|
|
||||||
|
msg_cnt = MsgBox("해당 패킹 및 전표 데이터를 삭제하시겠습니까?", vbExclamation + vbOKCancel)
|
||||||
|
|
||||||
|
If msg_cnt = 1 Then
|
||||||
|
|
||||||
|
serial_data = delete_sales()
|
||||||
|
|
||||||
|
If txb_pack_code.Text <> "NULL" Then
|
||||||
|
If pack_delete(serial_data) Then
|
||||||
|
|
||||||
|
If txb_state_code.Text <> "NULL" Then
|
||||||
|
|
||||||
|
If state_delete(serial_data) Then
|
||||||
|
txbPacking.BackColor = Color.Green
|
||||||
|
clear_switch = True
|
||||||
|
txb_clear()
|
||||||
|
dgv_pack_item.Rows.Clear()
|
||||||
|
MsgBox("데이터 삭제가 완료되었습니다.", vbInformation)
|
||||||
|
Else
|
||||||
|
txbPacking.BackColor = Color.Red
|
||||||
|
MsgBox("데이터베이스 안에 전표 데이터가 존재하지 않습니다. 데이터를 확인하여 주십시오.", vbCritical)
|
||||||
|
End If
|
||||||
|
|
||||||
|
Else
|
||||||
|
txbPacking.BackColor = Color.Green
|
||||||
|
clear_switch = True
|
||||||
|
txb_clear()
|
||||||
|
dgv_pack_item.Rows.Clear()
|
||||||
|
MsgBox("데이터 삭제가 완료되었습니다.", vbInformation)
|
||||||
|
|
||||||
|
End If
|
||||||
|
|
||||||
|
Else
|
||||||
|
txbPacking.BackColor = Color.Red
|
||||||
|
MsgBox("데이터베이스 안에 패킹 데이터가 존재하지 않습니다. 데이터를 확인하여 주십시오.", vbCritical)
|
||||||
|
End If
|
||||||
|
End If
|
||||||
|
|
||||||
|
Else
|
||||||
|
MsgBox("삭제가 취소되었습니다.", vbInformation)
|
||||||
|
End If
|
||||||
|
|
||||||
|
End If
|
||||||
|
|
||||||
|
Else
|
||||||
|
txbPacking.BackColor = Color.Red
|
||||||
|
MsgBox("삭제할 데이터가 존재하지 않습니다.", vbExclamation)
|
||||||
|
End If
|
||||||
|
|
||||||
|
txbPacking.Focus()
|
||||||
|
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
Private Function state_delete(serial As String) As Boolean
|
||||||
|
|
||||||
|
If txb_invoice.Text <> "NULL" Then
|
||||||
|
serial = txb_invoice.Text & "," & serial
|
||||||
|
End If
|
||||||
|
|
||||||
|
dbcmd = "UPDATE " & order_db & " SET Invoice_Number = NULL, Packing_Code = NULL, Serial_Number = NULL, Buy_Type = NULL, release_state = NULL, note = '" & serial & "' WHERE Order_Code = '" & txb_state_code.Text & "'"
|
||||||
|
|
||||||
|
If DBCommand(dbcmd) Then
|
||||||
|
Return True
|
||||||
|
|
||||||
|
End If
|
||||||
|
|
||||||
|
Return False
|
||||||
|
|
||||||
|
End Function
|
||||||
|
|
||||||
|
Private Function pack_delete(serial As String) As Boolean
|
||||||
|
|
||||||
|
dbcmd = "UPDATE " & sales_db & " SET PackingCode = 'null_" & txb_pack_code.Text & "', Main_Product_SN = NULL, Main_FACE_SN = NULL, Main_EYE_SN = NULL, Pro_Face_Serial = NULL, Pro_Eye_Serial = NULL, Pro_Body_Serial = NULL, Lux_Face_Serial = NULL, Lux_Eye_Serial = NULL, Lux_Body_Serial = NULL , MAXIMUM_SN = NULL , Alpha_Set_Serial = NULL , Alpha_Face_Serial = NULL , Alpha_Eye_Serial = NULL , Alpha_Body_Serial = NULL , Alto_Serial = NULL , Effect_Serial = NULL , note = '" & serial & "' WHERE PackingCode = '" & txb_pack_code.Text & "'"
|
||||||
|
If DBCommand(dbcmd) Then
|
||||||
|
Return True
|
||||||
|
End If
|
||||||
|
|
||||||
|
Return False
|
||||||
|
|
||||||
|
End Function
|
||||||
|
|
||||||
|
Private Function delete_sales() As String
|
||||||
|
Dim serial_data As String = ""
|
||||||
|
|
||||||
|
For i = 0 To dgv_pack_item.Rows.Count - 2
|
||||||
|
If dgv_pack_item.Rows(i).Cells(2).Value IsNot Nothing AndAlso dgv_pack_item.Rows(i).Cells(2).Value.ToString() <> "" Then
|
||||||
|
If serial_data = "" Then
|
||||||
|
serial_data = dgv_pack_item.Rows(i).Cells(2).Value
|
||||||
|
Else
|
||||||
|
serial_data = serial_data & "," & dgv_pack_item.Rows(i).Cells(2).Value
|
||||||
|
End If
|
||||||
|
End If
|
||||||
|
Next
|
||||||
|
|
||||||
|
Return serial_data
|
||||||
|
|
||||||
|
End Function
|
||||||
|
|
||||||
|
Private Sub txbPacking_TextChanged(sender As Object, e As EventArgs) Handles txbPacking.TextChanged
|
||||||
|
Dim tmpStr As String
|
||||||
|
|
||||||
|
If InputCnt = 0 And ckb_barcode.Checked = True Then
|
||||||
|
tmpStr = txbPacking.Text
|
||||||
|
If (Len(tmpStr) > 1) Then
|
||||||
|
tmpStr = Mid(tmpStr, Len(tmpStr), 1)
|
||||||
|
txbPacking.Clear()
|
||||||
|
txbPacking.AppendText(tmpStr)
|
||||||
|
End If
|
||||||
|
SetInputCnt()
|
||||||
|
End If
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
Private Sub txb_pack_code_Click(sender As Object, e As EventArgs) Handles txb_pack_code.Click, txb_invoice.Click, txb_pack_date.Click, txb_state_code.Click, txb_state_date.Click, txb_state_name.Click, dgv_pack_item.Click, ckb_state.CheckedChanged, ckb_barcode.CheckedChanged
|
||||||
|
txbPacking.Focus()
|
||||||
|
End Sub
|
||||||
|
End Class
|
||||||
Loading…
x
Reference in New Issue
Block a user