first commit
This commit is contained in:
commit
e51d51afac
1
.svn/entries
Normal file
1
.svn/entries
Normal file
@ -0,0 +1 @@
|
||||
12
|
1
.svn/format
Normal file
1
.svn/format
Normal file
@ -0,0 +1 @@
|
||||
12
|
Binary file not shown.
@ -0,0 +1,227 @@
|
||||
<?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.Runtime.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:import namespace="http://www.w3.org/XML/1998/namespace" />
|
||||
<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" use="required" type="xsd:string" />
|
||||
<xsd:attribute name="type" type="xsd:string" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</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" use="required" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</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>
|
||||
<metadata name="ToolStrip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>17, 17</value>
|
||||
</metadata>
|
||||
<assembly alias="System.Drawing" name="System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
|
||||
<data name="ts_new.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
|
||||
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAAwhJREFUOE+N03lI
|
||||
k2EcB/A557HXY+/mdGrqPLd5tM10hZVRIEVT+yNNQSwlMtN/rDywLCtLOxQtO6g0y+ggqSCxJCOVNK2s
|
||||
DPLO201nh3ik04l+ezcpws4f/P56nu/neXmf36NP+3vZUssWVIPqmX/s/bEs4XoYXAiINWyKz9Uf3Zuj
|
||||
N7k1Q18plhtU0+i0OGoX8WfIkJEo201MZDWTuDHFQvEkiStfSVwc5yBPZYHoO2ws8WfWUIDoV8TYeP/6
|
||||
01wUTXNQNEbi7CAbuQoTZA+YIKuXjbQua+wftEPcOzvYbSA6KMDxZ8RPGsKZK5rh4NJHFvKVJM4PsVGo
|
||||
csDVYVdcVlnhrJKF9A88xHfyEVrNB+FO3KMAug4hRETJ4TYuCkZYON5ngcxec+T026FbXYnR2T6UforF
|
||||
0V4jZPezkdJujcgOV3gm8+apqEybZ0pjzPoLvnJwpNsKye1sJLQysK/DCp81PdDW/eEkxLXQkNhugoOd
|
||||
lohuccbq205gWBkmagF7eSYxcXrEEvFNPJzoCsBNZQJKhlIxNqvSAQ2jd1GsiMNVxU6ktDlje5M9/MsE
|
||||
IKVEnhZwDD9JTGYM8bDlNRtlqnO60O9KM6dGUrMM4Y028CsTwnSZab4WsAxONfpyQGkDeZ01CnrSoZru
|
||||
x/D0AGbnNTpnTDOCIXUvWsdfY0ejLwIb+JCWiMAUMDO1gJ50s9GbAwM2CKxzRVCtGCH1Ptj2ai0UUwv/
|
||||
oLD7FIKfeyK03hfyWiHWvvSCS44LaAb0sIVbsKAnRz/gIqrNFbIKEaSP+VhXJcGwWqkD8tqPwaOchxVP
|
||||
3LCy0gPeNd4wC+QOaL/++yyYO60zeruLGpKgNyJ4PPKCtNwXWc2ncKXrGiLqIiEso+AKMbxf+GBJqqP2
|
||||
9KjF0+juspHZGvbUHpveu0P2TAynciEcHgogqFgKac0ySKq8YZvEB4NkHPrTe7Ah3QwLBXtMJ9dc52NV
|
||||
qRuWl4oguSWE81FHmAdwmqhgxP+8Sk8Dgh5DSpjZLF/TM8ZOxmlUSE612eLwN9MQpbQE+6f/AAAAAElF
|
||||
TkSuQmCC
|
||||
</value>
|
||||
</data>
|
||||
<data name="ts_edit.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
|
||||
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAAmdJREFUOE91k0to
|
||||
E1EUhqdd6KKIG3XhSmwTWqwUwYU7V1KqBNy5EmqTggUhEG2yaB6LCEJ3QhcuFBEqNiDioiBFa5tY0dLn
|
||||
pJkkbdrEpNYmTTJJp5PJ5DHze2dCa2diD/wM53DOd/97uNNCaeMmSS8RQVdvJXmAKK6r/0uv9fQ8m5jw
|
||||
IfBtDrP+AGZm/Zj6PI1x3weMjr3CA7P5N+m+cRLgrN1uT4FEJl88UjpbwGZyF/PBDaRzBVit1t2TIBe8
|
||||
Xm+CFyrY/pPRKLWTRjiWILUs8iUeNpstZ6TOvSGg7uNuzns8nrhYrSOdzWuUybJIEkicgDejSYTuvsYS
|
||||
NQwT1b1KAGcOISqgKsnIscUmFTkRy7/28PHFJELUCAE8QV/r1WaARHawz/EocgdHKvAS+EIKsZ9erGwm
|
||||
sfB8Gi8HRnGx67JTcwW32xNXlsgLZRyUhIbKJOeKqAdvATEKOyuP8COawPcgja6uK8MagMvtVgFlsQKh
|
||||
LEKoAgK/jzrTB0QpYIVCLfKUdMhYYyIwdnY6NACnqwGo1mqo1IGKyEGKkGGGDK+2IL/sBcspHUCIYZoB
|
||||
DqdLBdRlGbUqC3m9F6DJMN2CuP8x1sLbYAsNwhoThtFo1DpwOJ0qQIWwi0BQOZnC0uQA/HM0sjkWkqSs
|
||||
mQBCDDqaAI4GoEausLcVQvjTEKbe3kdgbhl8SVQHZeJOiaAC6NA5sDtd6lMWBAH00jwWF2hsJfYOTWm+
|
||||
kfUNtLe3jxxf4imTyTS/f1D674C+OP7Oh7a2tnv6H+t67+077wcfDs2YLZavivp1sgwOzvSbLV8MBoPy
|
||||
iE4rgL8F11CPeKcziAAAAABJRU5ErkJggg==
|
||||
</value>
|
||||
</data>
|
||||
<data name="ts_delete.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
|
||||
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAAgtJREFUOE+Fk09I
|
||||
VFEUxr/3ZyYVS2gQnJFACKmhIDBajLtZuMiNm2rRxtUgKm4UN7oIFEkmIypolduQoI3tWoSgUgRWpjA5
|
||||
TWVOL7N0DEfJmTGP3xme4p8Ze/DjzZzzne/ce969Fo5/Akz7iJDMf7R76UvngEcRE7N3vfgz5MVGjw3n
|
||||
qoExKlpJWVEjG+hqtpGeKYNkSyFbJyA5kiHLjD0pgYRMjNPg/BETL9ATpTBL0aYJSXHZK2SZ/CJLZM0D
|
||||
maZx2EKcBjX7TUJNXvzboiDtFqqBsuqivxfV0ICMs8lZA89oYOZNai08nWPxX7ebdizEb8a/a44m3R5s
|
||||
s/SK1pdGLCzkGPzJpOOKVFgIXYXy3IL4THSpwZlBA+lNBr+pezgsqx0dkmprO0h7u6RaWsTx+SRJ3SQb
|
||||
XjZwTw1qhoAN3XuCrI+MyHGPU1cnX6l7TULAAzWo7ANW1hj4qIOLRiXnOJJLJo+QTSRkPhiUz9S9JBeB
|
||||
ATUwrgFTOu05NamokHh1tcT9/oMEAhKvqpKYbedXMEw8wI38V+BZ7X7hTv4d3+/JdBFmGP9ErgMcBSp3
|
||||
z8KpBuDtF3eQU3wXQk3nyW1SAjQfPo3BJiD2hskf7nY+uKvY7Rrj/35yGrhV7D74eZEed/KrjFI4QV4R
|
||||
3d5DwgazLLxZ9DLtS1woByI8Znfqgfu1QC9zjeTk4eIdMg1ZuBkfONEAAAAASUVORK5CYII=
|
||||
</value>
|
||||
</data>
|
||||
<data name="ts_revert.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
|
||||
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAAgxJREFUOE+lkvtL
|
||||
U2EYx+0PEbtpFwnBKPGKiJImGP0gYhIYs1E5GF5gIxkpA00JRSmMEF0ohMh+GaRWYlqabMVcNdS2QpaI
|
||||
VqiDIYhk397vA6fXhCjyhYdzeM/5fp7vczkAdeL2cwho7v/wWzT1zcN+Pwhr51uY2/y41PQaF+wzKKiZ
|
||||
QvaN58g0jyLd5KEUcQbg+84P/Cm2tncQjW3j68YWIqubCC3FcOJc478BAuGoZM6zvoRnakXEruEIjhc4
|
||||
/g5gZop9c+voGAyLbQIfeBZxLL9BA1jzXvuGbWamuKh+GmmVbswE19A59FEBbmoAG7YbsLtm2mZmiml9
|
||||
cvabNDwpz6YB7LYBoMXCumkJr7LOmnnHzBQ/9X2Bo2cOibm1GsBREbAQiYmw/8lnuCeWkVzcgnZlnw1j
|
||||
3HV/wuNXK6i/9x5Hc6wawDlTXHbLJ+LZUBQPRyKwdQdxutwl1h+NLXHh5Ht1ewBHsiwawCW57HyDAfWR
|
||||
dvl0uhZQ1eqX8aVc7EKLqrum651ATLf9OJx5XQM4KmY0xPzZ0hFAiQJnXB0WwME0E3IsL5B17ZlADqWb
|
||||
NYDrOepdlcysmTWWOrxqbceRWtaLk0VO1XW72D5Vckd2gMBfq8zdpmUG62NJvKM4+XyziDk24xmfWoGE
|
||||
s1c0gHPmbrPTpHNJKOCo2G1mZs20zcwUJ5yp1AB5+8/zEwgF5GMVDxh4AAAAAElFTkSuQmCC
|
||||
</value>
|
||||
</data>
|
||||
<data name="ts_save.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
|
||||
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAAqhJREFUOE+tk8tP
|
||||
E0Ecxzlo/AM4eFMxhUYJgi1taXmWkoox0YMmRC6aEIiLEqEiWGhR1BgegQClFZAIJPiAIK9wMURxL4Zg
|
||||
jFGjQpdnFVqRLnT7Alv6dbZA4CB48Zd8spmZnc/8ZuY3ISH/I45e7Am/1DTb2zL8g+4anqSf7EH3yAyt
|
||||
77bSyit9erL2geD6mYbxwdYvwKIXJAJYD2AXyACJ1xbgxqNpRMYWnN8QGKfeltPAt3k3PE4HHI7dWIHX
|
||||
7UTHOw9ymy2Iji+6FhSoKhn6cm8AHyxueF0cOG43HFj1uFD9xoVzlZM4JtNQQYHiPkOf7QxgbMZFBHtn
|
||||
sEoyuP2Sg/IugwjJpkB8x0yrHq9jdMqJtX8I1rxOFA85EadnINgSROrMtNTkx/tZF+Bzwk9++jsc4Hej
|
||||
YIDDiWIzwkSbGQi1Zlps9CGjg0X2syVkEbKfLyGHp2sDvp31lP/aoTQtI0ZrxuEtQQQRSE0+HK+yQ1jJ
|
||||
IrxqBcJqQtUygUUE6RNUkH6CsMKOmBoW4pIdAiHZgrzJB1kDC2nNIuKrLUgzWKGqW0BawwLUjTaoDTYo
|
||||
amyQ1tkhq2chKd0h4M8gocUHeaMDqbXfkV/WiKv5WnQPvML4zCLmbC7M//LgwYAVJ2vtUBhYxOl2CvQM
|
||||
ndTqR7yJw2mjFTlXCyGPjcJgfw/WfXx5blRg84gdIiJIMK5AXsZsn0FUydex1DYg6aETZ0w2IiiCXBKN
|
||||
/r4X+L22LWgiAkn9MlIMS0gk13hErMkLFlJ4Zo9OoZtA4r05pOk/I09Tj5ysIrS3DWFsdBqfPi5gcuIn
|
||||
ytvNkJYySCaTozM6raEHT6VsPeb9h6LyLwhkt3LDRNcpWUIelZ6upZQqDZVMUKkLKXV6ISVSaCj+6gSx
|
||||
N3NDQ5P5yfv+AM8zgls5SSYnAAAAAElFTkSuQmCC
|
||||
</value>
|
||||
</data>
|
||||
<data name="ts_find.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
|
||||
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAAqZJREFUOE+Vk2lI
|
||||
E2AYx/3g5jHaB/PYPDAdJBlUgn0RJiQpBEWWEGSgBcIsWhPPsjBvU1NTl0Z5Ek7zIJvhtUkzx3SZOnRu
|
||||
MZ3u8phuklLZh+DfqxZo67AXHh6e9/3/f+9tZ/f3xnSkUh8HBQVtsENCwGKx5ER+/h+enWEanX4zOTnV
|
||||
2i0exNDkDGRqHSTvFKipbQCbHdpFJMw/guh0OqewuAxixSxeKbSQakyQzRghUukgnJhF3+Awwk+Hywjg
|
||||
wO8gPnFxcZb2YSWeT2gxZvmM6fWv2zH1cRMi3SrqZCrUC9rB8vNLtAEc9vdPrWh4gcIhNZq0q9vRPG9B
|
||||
C4nmuZ3MV+jxdGAMsbFXt85kb4sIC+stE75FguQD8idNKJleRLlqCWUkF06ZcHfMgGixGjFtw4hPSf9k
|
||||
Azh75pw8s1OKyz1TSBnVIWPCgEyFkWTjdn1jZA6RfSpEtY6Am3YfNoBT7FBxTtsALnUpyGx6FE8voEK9
|
||||
BL56GY9Ui8gjq+JINOB0juI6j7dpA/B0ZyTdK6kGt1uBgnEDmuZW0WmwQmhcQ5vOgir1IrhiFQq6ZIi8
|
||||
cHHyVwDFkUar43CTUflainypBq0zK5Aur2PEvIEewxoqxvUoeqNERhEfHh4eabsBFBeGlyCLDMgVKrS8
|
||||
7AW/QwSh0gC5wYJxkxUDs2Y0kSvMKX+GgICjImJ2/gmguDF8BNkPq2BctkJrMiOGk4ATwcFm3u0sVNa3
|
||||
orZFiGyytYjoa19cXZnVux+RvYubpyA9txTzCyswEUBe6RO4M30biegQiSgXhvcDhpdvJdWJxiP18T37
|
||||
tqc4iq/EJ6F/6D2UGj0xV4OsppmIHPb1aRycnDWJmaVo7OjHrTu5IOewZabuy/xD5H3k2ElJYGDwN/pB
|
||||
txrSR/kf83e2yZPbDoSo/QAAAABJRU5ErkJggg==
|
||||
</value>
|
||||
</data>
|
||||
</root>
|
Binary file not shown.
@ -0,0 +1,18 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<asmv1:assembly xsi:schemaLocation="urn:schemas-microsoft-com:asm.v1 assembly.adaptive.xsd" manifestVersion="1.0" xmlns:asmv1="urn:schemas-microsoft-com:asm.v1" xmlns="urn:schemas-microsoft-com:asm.v2" xmlns:asmv2="urn:schemas-microsoft-com:asm.v2" xmlns:xrml="urn:mpeg:mpeg21:2003:01-REL-R-NS" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:asmv3="urn:schemas-microsoft-com:asm.v3" xmlns:dsig="http://www.w3.org/2000/09/xmldsig#" xmlns:co.v1="urn:schemas-microsoft-com:clickonce.v1" xmlns:co.v2="urn:schemas-microsoft-com:clickonce.v2">
|
||||
<assemblyIdentity name="Kanban System.application" version="1.0.0.25" publicKeyToken="0000000000000000" language="neutral" processorArchitecture="msil" xmlns="urn:schemas-microsoft-com:asm.v1" />
|
||||
<description asmv2:publisher="Ionics EMS, Inc." asmv2:product="Kanban" xmlns="urn:schemas-microsoft-com:asm.v1" />
|
||||
<deployment install="true" mapFileExtensions="true" />
|
||||
<dependency>
|
||||
<dependentAssembly dependencyType="install" codebase="Kanban System.exe.manifest" size="5966">
|
||||
<assemblyIdentity name="Kanban System.exe" version="1.0.0.25" publicKeyToken="0000000000000000" language="neutral" processorArchitecture="msil" type="win32" />
|
||||
<hash>
|
||||
<dsig:Transforms>
|
||||
<dsig:Transform Algorithm="urn:schemas-microsoft-com:HashTransforms.Identity" />
|
||||
</dsig:Transforms>
|
||||
<dsig:DigestMethod Algorithm="http://www.w3.org/2000/09/xmldsig#sha1" />
|
||||
<dsig:DigestValue>SjxQe2UzV3RB5Ps4UdOcEneq9bk=</dsig:DigestValue>
|
||||
</hash>
|
||||
</dependentAssembly>
|
||||
</dependency>
|
||||
</asmv1:assembly>
|
@ -0,0 +1,270 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
||||
Partial Class mainForm
|
||||
Inherits System.Windows.Forms.Form
|
||||
|
||||
'Form overrides dispose to clean up the component list.
|
||||
<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
|
||||
|
||||
'Required by the Windows Form Designer
|
||||
Private components As System.ComponentModel.IContainer
|
||||
|
||||
'NOTE: The following procedure is required by the Windows Form Designer
|
||||
'It can be modified using the Windows Form Designer.
|
||||
'Do not modify it using the code editor.
|
||||
<System.Diagnostics.DebuggerStepThrough()> _
|
||||
Private Sub InitializeComponent()
|
||||
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(mainForm))
|
||||
Me.MenuStrip1 = New System.Windows.Forms.MenuStrip
|
||||
Me.TransactionsToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem
|
||||
Me.MountingToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem
|
||||
Me.CheckRequestsToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem
|
||||
Me.ExitToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem
|
||||
Me.MaintenanceToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem
|
||||
Me.MachineToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem
|
||||
Me.FileUploadToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem
|
||||
Me.AdministrationToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem
|
||||
Me.UsersToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem
|
||||
Me.ToolStrip1 = New System.Windows.Forms.ToolStrip
|
||||
Me.tsFirst = New System.Windows.Forms.ToolStripButton
|
||||
Me.tsPrevious = New System.Windows.Forms.ToolStripButton
|
||||
Me.tsNext = New System.Windows.Forms.ToolStripButton
|
||||
Me.tsLast = New System.Windows.Forms.ToolStripButton
|
||||
Me.ToolStripSeparator1 = New System.Windows.Forms.ToolStripSeparator
|
||||
Me.tsFind = New System.Windows.Forms.ToolStripButton
|
||||
Me.tsClose = New System.Windows.Forms.ToolStripButton
|
||||
Me.ToolStripSeparator19 = New System.Windows.Forms.ToolStripSeparator
|
||||
Me.tsPreview = New System.Windows.Forms.ToolStripButton
|
||||
Me.tsPrint = New System.Windows.Forms.ToolStripButton
|
||||
Me.ToolStripSeparator20 = New System.Windows.Forms.ToolStripSeparator
|
||||
Me.MenuStrip1.SuspendLayout()
|
||||
Me.ToolStrip1.SuspendLayout()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'MenuStrip1
|
||||
'
|
||||
Me.MenuStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.TransactionsToolStripMenuItem, Me.MaintenanceToolStripMenuItem, Me.AdministrationToolStripMenuItem})
|
||||
Me.MenuStrip1.Location = New System.Drawing.Point(0, 0)
|
||||
Me.MenuStrip1.Name = "MenuStrip1"
|
||||
Me.MenuStrip1.Size = New System.Drawing.Size(670, 24)
|
||||
Me.MenuStrip1.TabIndex = 0
|
||||
Me.MenuStrip1.Text = "MenuStrip1"
|
||||
'
|
||||
'TransactionsToolStripMenuItem
|
||||
'
|
||||
Me.TransactionsToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.MountingToolStripMenuItem, Me.CheckRequestsToolStripMenuItem, Me.ExitToolStripMenuItem})
|
||||
Me.TransactionsToolStripMenuItem.Name = "TransactionsToolStripMenuItem"
|
||||
Me.TransactionsToolStripMenuItem.Size = New System.Drawing.Size(80, 20)
|
||||
Me.TransactionsToolStripMenuItem.Text = "Transactions"
|
||||
'
|
||||
'MountingToolStripMenuItem
|
||||
'
|
||||
Me.MountingToolStripMenuItem.Name = "MountingToolStripMenuItem"
|
||||
Me.MountingToolStripMenuItem.Size = New System.Drawing.Size(162, 22)
|
||||
Me.MountingToolStripMenuItem.Text = "Mounting"
|
||||
'
|
||||
'CheckRequestsToolStripMenuItem
|
||||
'
|
||||
Me.CheckRequestsToolStripMenuItem.Name = "CheckRequestsToolStripMenuItem"
|
||||
Me.CheckRequestsToolStripMenuItem.Size = New System.Drawing.Size(162, 22)
|
||||
Me.CheckRequestsToolStripMenuItem.Text = "Check Requests"
|
||||
'
|
||||
'ExitToolStripMenuItem
|
||||
'
|
||||
Me.ExitToolStripMenuItem.Name = "ExitToolStripMenuItem"
|
||||
Me.ExitToolStripMenuItem.Size = New System.Drawing.Size(162, 22)
|
||||
Me.ExitToolStripMenuItem.Text = "Exit"
|
||||
'
|
||||
'MaintenanceToolStripMenuItem
|
||||
'
|
||||
Me.MaintenanceToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.MachineToolStripMenuItem, Me.FileUploadToolStripMenuItem})
|
||||
Me.MaintenanceToolStripMenuItem.Name = "MaintenanceToolStripMenuItem"
|
||||
Me.MaintenanceToolStripMenuItem.Size = New System.Drawing.Size(80, 20)
|
||||
Me.MaintenanceToolStripMenuItem.Text = "Maintenance"
|
||||
'
|
||||
'MachineToolStripMenuItem
|
||||
'
|
||||
Me.MachineToolStripMenuItem.Name = "MachineToolStripMenuItem"
|
||||
Me.MachineToolStripMenuItem.Size = New System.Drawing.Size(179, 22)
|
||||
Me.MachineToolStripMenuItem.Text = "Machine"
|
||||
'
|
||||
'FileUploadToolStripMenuItem
|
||||
'
|
||||
Me.FileUploadToolStripMenuItem.Name = "FileUploadToolStripMenuItem"
|
||||
Me.FileUploadToolStripMenuItem.Size = New System.Drawing.Size(179, 22)
|
||||
Me.FileUploadToolStripMenuItem.Text = "Mounting Sequence"
|
||||
'
|
||||
'AdministrationToolStripMenuItem
|
||||
'
|
||||
Me.AdministrationToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.UsersToolStripMenuItem})
|
||||
Me.AdministrationToolStripMenuItem.Name = "AdministrationToolStripMenuItem"
|
||||
Me.AdministrationToolStripMenuItem.Size = New System.Drawing.Size(87, 20)
|
||||
Me.AdministrationToolStripMenuItem.Text = "Administration"
|
||||
'
|
||||
'UsersToolStripMenuItem
|
||||
'
|
||||
Me.UsersToolStripMenuItem.Name = "UsersToolStripMenuItem"
|
||||
Me.UsersToolStripMenuItem.Size = New System.Drawing.Size(112, 22)
|
||||
Me.UsersToolStripMenuItem.Text = "Users"
|
||||
'
|
||||
'ToolStrip1
|
||||
'
|
||||
Me.ToolStrip1.GripStyle = System.Windows.Forms.ToolStripGripStyle.Hidden
|
||||
Me.ToolStrip1.ImageScalingSize = New System.Drawing.Size(24, 24)
|
||||
Me.ToolStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.tsFirst, Me.tsPrevious, Me.tsNext, Me.tsLast, Me.ToolStripSeparator1, Me.tsFind, Me.tsClose, Me.ToolStripSeparator19, Me.tsPreview, Me.tsPrint, Me.ToolStripSeparator20})
|
||||
Me.ToolStrip1.LayoutStyle = System.Windows.Forms.ToolStripLayoutStyle.HorizontalStackWithOverflow
|
||||
Me.ToolStrip1.Location = New System.Drawing.Point(0, 24)
|
||||
Me.ToolStrip1.Name = "ToolStrip1"
|
||||
Me.ToolStrip1.Size = New System.Drawing.Size(670, 44)
|
||||
Me.ToolStrip1.TabIndex = 9
|
||||
Me.ToolStrip1.Text = "ToolStrip1"
|
||||
'
|
||||
'tsFirst
|
||||
'
|
||||
Me.tsFirst.Image = CType(resources.GetObject("tsFirst.Image"), System.Drawing.Image)
|
||||
Me.tsFirst.ImageScaling = System.Windows.Forms.ToolStripItemImageScaling.None
|
||||
Me.tsFirst.ImageTransparentColor = System.Drawing.Color.Magenta
|
||||
Me.tsFirst.Name = "tsFirst"
|
||||
Me.tsFirst.Size = New System.Drawing.Size(32, 41)
|
||||
Me.tsFirst.Text = "First"
|
||||
Me.tsFirst.TextImageRelation = System.Windows.Forms.TextImageRelation.ImageAboveText
|
||||
'
|
||||
'tsPrevious
|
||||
'
|
||||
Me.tsPrevious.Image = CType(resources.GetObject("tsPrevious.Image"), System.Drawing.Image)
|
||||
Me.tsPrevious.ImageScaling = System.Windows.Forms.ToolStripItemImageScaling.None
|
||||
Me.tsPrevious.ImageTransparentColor = System.Drawing.Color.Magenta
|
||||
Me.tsPrevious.Name = "tsPrevious"
|
||||
Me.tsPrevious.Size = New System.Drawing.Size(52, 41)
|
||||
Me.tsPrevious.Text = "Previous"
|
||||
Me.tsPrevious.TextImageRelation = System.Windows.Forms.TextImageRelation.ImageAboveText
|
||||
'
|
||||
'tsNext
|
||||
'
|
||||
Me.tsNext.Image = CType(resources.GetObject("tsNext.Image"), System.Drawing.Image)
|
||||
Me.tsNext.ImageScaling = System.Windows.Forms.ToolStripItemImageScaling.None
|
||||
Me.tsNext.ImageTransparentColor = System.Drawing.Color.Magenta
|
||||
Me.tsNext.Name = "tsNext"
|
||||
Me.tsNext.Size = New System.Drawing.Size(34, 41)
|
||||
Me.tsNext.Text = "Next"
|
||||
Me.tsNext.TextImageRelation = System.Windows.Forms.TextImageRelation.ImageAboveText
|
||||
'
|
||||
'tsLast
|
||||
'
|
||||
Me.tsLast.Image = CType(resources.GetObject("tsLast.Image"), System.Drawing.Image)
|
||||
Me.tsLast.ImageScaling = System.Windows.Forms.ToolStripItemImageScaling.None
|
||||
Me.tsLast.ImageTransparentColor = System.Drawing.Color.Magenta
|
||||
Me.tsLast.Name = "tsLast"
|
||||
Me.tsLast.Size = New System.Drawing.Size(31, 41)
|
||||
Me.tsLast.Text = "Last"
|
||||
Me.tsLast.TextImageRelation = System.Windows.Forms.TextImageRelation.ImageAboveText
|
||||
'
|
||||
'ToolStripSeparator1
|
||||
'
|
||||
Me.ToolStripSeparator1.Name = "ToolStripSeparator1"
|
||||
Me.ToolStripSeparator1.Size = New System.Drawing.Size(6, 44)
|
||||
'
|
||||
'tsFind
|
||||
'
|
||||
Me.tsFind.Image = CType(resources.GetObject("tsFind.Image"), System.Drawing.Image)
|
||||
Me.tsFind.ImageScaling = System.Windows.Forms.ToolStripItemImageScaling.None
|
||||
Me.tsFind.ImageTransparentColor = System.Drawing.Color.Magenta
|
||||
Me.tsFind.Name = "tsFind"
|
||||
Me.tsFind.Size = New System.Drawing.Size(31, 41)
|
||||
Me.tsFind.Text = "Find"
|
||||
Me.tsFind.TextImageRelation = System.Windows.Forms.TextImageRelation.ImageAboveText
|
||||
'
|
||||
'tsClose
|
||||
'
|
||||
Me.tsClose.Image = CType(resources.GetObject("tsClose.Image"), System.Drawing.Image)
|
||||
Me.tsClose.ImageScaling = System.Windows.Forms.ToolStripItemImageScaling.None
|
||||
Me.tsClose.ImageTransparentColor = System.Drawing.Color.Magenta
|
||||
Me.tsClose.Name = "tsClose"
|
||||
Me.tsClose.Size = New System.Drawing.Size(37, 41)
|
||||
Me.tsClose.Text = "Close"
|
||||
Me.tsClose.TextImageRelation = System.Windows.Forms.TextImageRelation.ImageAboveText
|
||||
'
|
||||
'ToolStripSeparator19
|
||||
'
|
||||
Me.ToolStripSeparator19.Name = "ToolStripSeparator19"
|
||||
Me.ToolStripSeparator19.Size = New System.Drawing.Size(6, 44)
|
||||
'
|
||||
'tsPreview
|
||||
'
|
||||
Me.tsPreview.Image = CType(resources.GetObject("tsPreview.Image"), System.Drawing.Image)
|
||||
Me.tsPreview.ImageScaling = System.Windows.Forms.ToolStripItemImageScaling.None
|
||||
Me.tsPreview.ImageTransparentColor = System.Drawing.Color.Magenta
|
||||
Me.tsPreview.Name = "tsPreview"
|
||||
Me.tsPreview.Size = New System.Drawing.Size(49, 41)
|
||||
Me.tsPreview.Text = "Preview"
|
||||
Me.tsPreview.TextImageRelation = System.Windows.Forms.TextImageRelation.ImageAboveText
|
||||
'
|
||||
'tsPrint
|
||||
'
|
||||
Me.tsPrint.Enabled = False
|
||||
Me.tsPrint.Image = CType(resources.GetObject("tsPrint.Image"), System.Drawing.Image)
|
||||
Me.tsPrint.ImageScaling = System.Windows.Forms.ToolStripItemImageScaling.None
|
||||
Me.tsPrint.ImageTransparentColor = System.Drawing.Color.Magenta
|
||||
Me.tsPrint.Name = "tsPrint"
|
||||
Me.tsPrint.Size = New System.Drawing.Size(33, 41)
|
||||
Me.tsPrint.Text = "Print"
|
||||
Me.tsPrint.TextImageRelation = System.Windows.Forms.TextImageRelation.ImageAboveText
|
||||
'
|
||||
'ToolStripSeparator20
|
||||
'
|
||||
Me.ToolStripSeparator20.Name = "ToolStripSeparator20"
|
||||
Me.ToolStripSeparator20.Size = New System.Drawing.Size(6, 44)
|
||||
'
|
||||
'mainForm
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.ClientSize = New System.Drawing.Size(670, 528)
|
||||
Me.Controls.Add(Me.ToolStrip1)
|
||||
Me.Controls.Add(Me.MenuStrip1)
|
||||
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedSingle
|
||||
Me.IsMdiContainer = True
|
||||
Me.MainMenuStrip = Me.MenuStrip1
|
||||
Me.MaximizeBox = False
|
||||
Me.Name = "mainForm"
|
||||
Me.Text = "Mounting Sequence"
|
||||
Me.MenuStrip1.ResumeLayout(False)
|
||||
Me.MenuStrip1.PerformLayout()
|
||||
Me.ToolStrip1.ResumeLayout(False)
|
||||
Me.ToolStrip1.PerformLayout()
|
||||
Me.ResumeLayout(False)
|
||||
Me.PerformLayout()
|
||||
|
||||
End Sub
|
||||
Friend WithEvents MenuStrip1 As System.Windows.Forms.MenuStrip
|
||||
Friend WithEvents MaintenanceToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem
|
||||
Friend WithEvents FileUploadToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem
|
||||
Friend WithEvents ToolStrip1 As System.Windows.Forms.ToolStrip
|
||||
Friend WithEvents tsFirst As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents tsPrevious As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents tsNext As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents tsLast As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents ToolStripSeparator1 As System.Windows.Forms.ToolStripSeparator
|
||||
Friend WithEvents tsFind As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents tsClose As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents ToolStripSeparator19 As System.Windows.Forms.ToolStripSeparator
|
||||
Friend WithEvents tsPreview As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents tsPrint As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents ToolStripSeparator20 As System.Windows.Forms.ToolStripSeparator
|
||||
Friend WithEvents TransactionsToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem
|
||||
Friend WithEvents ExitToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem
|
||||
Friend WithEvents MountingToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem
|
||||
Friend WithEvents AdministrationToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem
|
||||
Friend WithEvents UsersToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem
|
||||
Friend WithEvents MachineToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem
|
||||
Friend WithEvents CheckRequestsToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem
|
||||
|
||||
End Class
|
Binary file not shown.
@ -0,0 +1,121 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
||||
Partial Class uploadMcSeq
|
||||
Inherits System.Windows.Forms.Form
|
||||
|
||||
'Form overrides dispose to clean up the component list.
|
||||
<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
|
||||
|
||||
'Required by the Windows Form Designer
|
||||
Private components As System.ComponentModel.IContainer
|
||||
|
||||
'NOTE: The following procedure is required by the Windows Form Designer
|
||||
'It can be modified using the Windows Form Designer.
|
||||
'Do not modify it using the code editor.
|
||||
<System.Diagnostics.DebuggerStepThrough()> _
|
||||
Private Sub InitializeComponent()
|
||||
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(uploadMcSeq))
|
||||
Me.GroupBox1 = New System.Windows.Forms.GroupBox
|
||||
Me.btn_cancel = New System.Windows.Forms.Button
|
||||
Me.btn_upload = New System.Windows.Forms.Button
|
||||
Me.btn_browse = New System.Windows.Forms.Button
|
||||
Me.txtFName = New System.Windows.Forms.TextBox
|
||||
Me.Label1 = New System.Windows.Forms.Label
|
||||
Me.OpenFileDialog1 = New System.Windows.Forms.OpenFileDialog
|
||||
Me.GroupBox1.SuspendLayout()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'GroupBox1
|
||||
'
|
||||
Me.GroupBox1.Controls.Add(Me.btn_cancel)
|
||||
Me.GroupBox1.Controls.Add(Me.btn_upload)
|
||||
Me.GroupBox1.Controls.Add(Me.btn_browse)
|
||||
Me.GroupBox1.Controls.Add(Me.txtFName)
|
||||
Me.GroupBox1.Controls.Add(Me.Label1)
|
||||
Me.GroupBox1.Location = New System.Drawing.Point(0, 2)
|
||||
Me.GroupBox1.Name = "GroupBox1"
|
||||
Me.GroupBox1.Size = New System.Drawing.Size(406, 96)
|
||||
Me.GroupBox1.TabIndex = 0
|
||||
Me.GroupBox1.TabStop = False
|
||||
Me.GroupBox1.Text = "Choose File to Upload"
|
||||
'
|
||||
'btn_cancel
|
||||
'
|
||||
Me.btn_cancel.Location = New System.Drawing.Point(217, 61)
|
||||
Me.btn_cancel.Name = "btn_cancel"
|
||||
Me.btn_cancel.Size = New System.Drawing.Size(75, 23)
|
||||
Me.btn_cancel.TabIndex = 4
|
||||
Me.btn_cancel.Text = "Cancel"
|
||||
Me.btn_cancel.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_upload
|
||||
'
|
||||
Me.btn_upload.Location = New System.Drawing.Point(114, 61)
|
||||
Me.btn_upload.Name = "btn_upload"
|
||||
Me.btn_upload.Size = New System.Drawing.Size(75, 23)
|
||||
Me.btn_upload.TabIndex = 3
|
||||
Me.btn_upload.Text = "Upload File"
|
||||
Me.btn_upload.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_browse
|
||||
'
|
||||
Me.btn_browse.Image = CType(resources.GetObject("btn_browse.Image"), System.Drawing.Image)
|
||||
Me.btn_browse.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
|
||||
Me.btn_browse.Location = New System.Drawing.Point(359, 18)
|
||||
Me.btn_browse.Name = "btn_browse"
|
||||
Me.btn_browse.Size = New System.Drawing.Size(32, 32)
|
||||
Me.btn_browse.TabIndex = 2
|
||||
Me.btn_browse.UseVisualStyleBackColor = True
|
||||
'
|
||||
'txtFName
|
||||
'
|
||||
Me.txtFName.Location = New System.Drawing.Point(38, 25)
|
||||
Me.txtFName.Name = "txtFName"
|
||||
Me.txtFName.Size = New System.Drawing.Size(317, 20)
|
||||
Me.txtFName.TabIndex = 1
|
||||
'
|
||||
'Label1
|
||||
'
|
||||
Me.Label1.AutoSize = True
|
||||
Me.Label1.Location = New System.Drawing.Point(12, 30)
|
||||
Me.Label1.Name = "Label1"
|
||||
Me.Label1.Size = New System.Drawing.Size(26, 13)
|
||||
Me.Label1.TabIndex = 0
|
||||
Me.Label1.Text = "File:"
|
||||
'
|
||||
'OpenFileDialog1
|
||||
'
|
||||
Me.OpenFileDialog1.FileName = "OpenFileDialog1"
|
||||
'
|
||||
'uploadMcSeq
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.ClientSize = New System.Drawing.Size(405, 99)
|
||||
Me.ControlBox = False
|
||||
Me.Controls.Add(Me.GroupBox1)
|
||||
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedSingle
|
||||
Me.Name = "uploadMcSeq"
|
||||
Me.StartPosition = System.Windows.Forms.FormStartPosition.Manual
|
||||
Me.Text = "Upload Machine Sequence"
|
||||
Me.GroupBox1.ResumeLayout(False)
|
||||
Me.GroupBox1.PerformLayout()
|
||||
Me.ResumeLayout(False)
|
||||
|
||||
End Sub
|
||||
Friend WithEvents GroupBox1 As System.Windows.Forms.GroupBox
|
||||
Friend WithEvents txtFName As System.Windows.Forms.TextBox
|
||||
Friend WithEvents Label1 As System.Windows.Forms.Label
|
||||
Friend WithEvents OpenFileDialog1 As System.Windows.Forms.OpenFileDialog
|
||||
Friend WithEvents btn_browse As System.Windows.Forms.Button
|
||||
Friend WithEvents btn_cancel As System.Windows.Forms.Button
|
||||
Friend WithEvents btn_upload As System.Windows.Forms.Button
|
||||
End Class
|
@ -0,0 +1,57 @@
|
||||
<?xml version="1.0" encoding="utf-8" ?>
|
||||
<configuration>
|
||||
<configSections>
|
||||
<sectionGroup name="userSettings" type="System.Configuration.UserSettingsGroup, System, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" >
|
||||
<section name="Mounting_Sequence.My.MySettings" type="System.Configuration.ClientSettingsSection, System, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" allowExeDefinition="MachineToLocalUser" requirePermission="false" />
|
||||
</sectionGroup>
|
||||
</configSections>
|
||||
<connectionStrings>
|
||||
<add name="Mounting_Sequence.My.MySettings.EpsonConnectionString"
|
||||
connectionString="Data Source=192.168.1.50;Initial Catalog=Epson;Persist Security Info=True;User ID=cats;Password=dogs"
|
||||
providerName="System.Data.SqlClient" />
|
||||
</connectionStrings>
|
||||
<system.diagnostics>
|
||||
<sources>
|
||||
<!-- This section defines the logging configuration for My.Application.Log -->
|
||||
<source name="DefaultSource" switchName="DefaultSwitch">
|
||||
<listeners>
|
||||
<add name="FileLog"/>
|
||||
<!-- Uncomment the below section to write to the Application Event Log -->
|
||||
<!--<add name="EventLog"/>-->
|
||||
</listeners>
|
||||
</source>
|
||||
</sources>
|
||||
<switches>
|
||||
<add name="DefaultSwitch" value="Information" />
|
||||
</switches>
|
||||
<sharedListeners>
|
||||
<add name="FileLog"
|
||||
type="Microsoft.VisualBasic.Logging.FileLogTraceListener, Microsoft.VisualBasic, Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a, processorArchitecture=MSIL"
|
||||
initializeData="FileLogWriter"/>
|
||||
<!-- Uncomment the below section and replace APPLICATION_NAME with the name of your application to write to the Application Event Log -->
|
||||
<!--<add name="EventLog" type="System.Diagnostics.EventLogTraceListener" initializeData="APPLICATION_NAME"/> -->
|
||||
</sharedListeners>
|
||||
</system.diagnostics>
|
||||
<userSettings>
|
||||
<Mounting_Sequence.My.MySettings>
|
||||
<setting name="server" serializeAs="String">
|
||||
<value>192.168.1.50</value>
|
||||
</setting>
|
||||
<setting name="database" serializeAs="String">
|
||||
<value>Epson</value>
|
||||
</setting>
|
||||
<setting name="username" serializeAs="String">
|
||||
<value />
|
||||
</setting>
|
||||
<setting name="password" serializeAs="String">
|
||||
<value />
|
||||
</setting>
|
||||
<setting name="dbserver" serializeAs="String">
|
||||
<value>SQL Server</value>
|
||||
</setting>
|
||||
<setting name="isTrusted" serializeAs="String">
|
||||
<value>True</value>
|
||||
</setting>
|
||||
</Mounting_Sequence.My.MySettings>
|
||||
</userSettings>
|
||||
</configuration>
|
Binary file not shown.
@ -0,0 +1,339 @@
|
||||
Imports System
|
||||
Imports System.Data
|
||||
Imports System.Data.SqlClient
|
||||
Imports System.IO
|
||||
Imports System.Text
|
||||
Public Class userForm
|
||||
|
||||
Private cnstr = mainForm.cnstr
|
||||
Private conn As New SqlConnection(cnstr)
|
||||
Private myQuery As String = String.Empty
|
||||
Private myCommand As SqlCommand
|
||||
Private adapter As SqlDataAdapter = New SqlDataAdapter()
|
||||
Private ds As New DataSet("Users")
|
||||
Private i, limit As Integer
|
||||
Private oldUserName As String = String.Empty
|
||||
Private addMode, editMode As Integer
|
||||
|
||||
Private Sub users_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
|
||||
Me.MdiParent = mainForm
|
||||
Control.CheckForIllegalCrossThreadCalls = False
|
||||
Me.Top = 0
|
||||
Me.Left = 0
|
||||
|
||||
fillDataSet()
|
||||
disableControls()
|
||||
moveFirst()
|
||||
addMode = 0
|
||||
editMode = 0
|
||||
btn_find.Visible = False
|
||||
End Sub
|
||||
|
||||
Private Sub enableControls()
|
||||
txtUsername.Enabled = True
|
||||
txtPassword.Enabled = True
|
||||
txtPassword2.Enabled = True
|
||||
txtEmployeeCode.Enabled = True
|
||||
cmb_userType.Enabled = True
|
||||
cbActive.Enabled = True
|
||||
End Sub
|
||||
|
||||
Private Sub disableControls()
|
||||
txtUsername.Enabled = False
|
||||
txtPassword.Enabled = False
|
||||
txtPassword2.Enabled = False
|
||||
txtEmployeeCode.Enabled = False
|
||||
cmb_userType.Enabled = False
|
||||
cbActive.Enabled = False
|
||||
End Sub
|
||||
|
||||
Private Sub clear()
|
||||
txtUsername.Text = String.Empty
|
||||
txtPassword.Text = String.Empty
|
||||
txtPassword2.Text = String.Empty
|
||||
cmb_userType.SelectedIndex = 0
|
||||
cbActive.Checked = False
|
||||
End Sub
|
||||
|
||||
Public Sub toNormalMode()
|
||||
ts_new.Enabled = True
|
||||
ts_edit.Enabled = True
|
||||
ts_delete.Enabled = True
|
||||
ts_find.Enabled = True
|
||||
ts_revert.Enabled = False
|
||||
ts_save.Enabled = False
|
||||
disableControls()
|
||||
End Sub
|
||||
|
||||
Public Sub toEditMode()
|
||||
ts_new.Enabled = False
|
||||
ts_edit.Enabled = False
|
||||
ts_delete.Enabled = False
|
||||
ts_find.Enabled = False
|
||||
ts_revert.Enabled = True
|
||||
ts_save.Enabled = True
|
||||
enableControls()
|
||||
End Sub
|
||||
|
||||
Public Sub toAddMode()
|
||||
ts_new.Enabled = False
|
||||
ts_edit.Enabled = False
|
||||
ts_delete.Enabled = False
|
||||
ts_find.Enabled = False
|
||||
ts_revert.Enabled = True
|
||||
ts_save.Enabled = True
|
||||
enableControls()
|
||||
End Sub
|
||||
|
||||
Public Sub toSearchMode()
|
||||
ts_new.Enabled = False
|
||||
ts_edit.Enabled = False
|
||||
ts_delete.Enabled = False
|
||||
ts_find.Enabled = True
|
||||
ts_revert.Enabled = False
|
||||
ts_save.Enabled = False
|
||||
End Sub
|
||||
|
||||
Private Sub fillDataSet()
|
||||
Dim conn As New SqlConnection(cnstr)
|
||||
myQuery = "SELECT * FROM Users ORDER BY username"
|
||||
|
||||
myCommand = New SqlCommand(myQuery, conn)
|
||||
|
||||
Try
|
||||
conn.Open()
|
||||
adapter.SelectCommand = myCommand
|
||||
ds.Clear()
|
||||
adapter.Fill(ds)
|
||||
i = 0
|
||||
limit = ds.Tables(0).Rows.Count - 1
|
||||
Catch ex As Exception
|
||||
MessageBox.Show(ex.Message, "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
|
||||
Finally
|
||||
conn.Close()
|
||||
conn.Dispose()
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
Private Sub trace(ByVal username As String)
|
||||
Dim j As Integer = 0
|
||||
|
||||
For j = 0 To ds.Tables(0).Rows.Count - 1
|
||||
If ds.Tables(0).Rows(j).Item("username") = username Then
|
||||
txtUsername.Text = ds.Tables(0).Rows(j).Item("username")
|
||||
txtPassword.Text = ds.Tables(0).Rows(j).Item("password")
|
||||
txtPassword2.Text = ds.Tables(0).Rows(j).Item("password")
|
||||
txtEmployeeCode.Text = ds.Tables(0).Rows(j).Item("employeecode")
|
||||
cmb_userType.SelectedIndex = cmb_userType.Items.IndexOf(ds.Tables(0).Rows(j).Item("authentication"))
|
||||
If ds.Tables(0).Rows(j).Item("active") = 1 Then
|
||||
cbActive.Checked = True
|
||||
Else
|
||||
cbActive.Checked = False
|
||||
End If
|
||||
i = j
|
||||
Exit For
|
||||
End If
|
||||
Next
|
||||
End Sub
|
||||
|
||||
Public Sub moveFirst()
|
||||
If ds.Tables(0).Rows.Count <> 0 And limit > -1 Then
|
||||
i = 0
|
||||
txtUsername.Text = ds.Tables(0).Rows(i).Item("username")
|
||||
oldUserName = ds.Tables(0).Rows(i).Item("username")
|
||||
txtPassword.Text = ds.Tables(0).Rows(i).Item("password")
|
||||
txtPassword2.Text = ds.Tables(0).Rows(i).Item("password")
|
||||
txtEmployeeCode.Text = ds.Tables(0).Rows(i).Item("employeecode")
|
||||
cmb_userType.SelectedItem = ds.Tables(0).Rows(i).Item("authentication")
|
||||
If ds.Tables(0).Rows(i).Item("active") = 1 Then
|
||||
cbActive.Checked = True
|
||||
Else
|
||||
cbActive.Checked = False
|
||||
End If
|
||||
Else
|
||||
clear()
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Public Sub moveNext()
|
||||
If i < limit And limit > -1 Then
|
||||
i = i + 1
|
||||
txtUsername.Text = ds.Tables(0).Rows(i).Item("username")
|
||||
oldUserName = ds.Tables(0).Rows(i).Item("username")
|
||||
txtPassword.Text = ds.Tables(0).Rows(i).Item("password")
|
||||
txtPassword2.Text = ds.Tables(0).Rows(i).Item("password")
|
||||
txtEmployeeCode.Text = ds.Tables(0).Rows(i).Item("employeecode")
|
||||
cmb_userType.SelectedItem = ds.Tables(0).Rows(i).Item("authentication")
|
||||
If ds.Tables(0).Rows(i).Item("active") = 1 Then
|
||||
cbActive.Checked = True
|
||||
Else
|
||||
cbActive.Checked = False
|
||||
End If
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Public Sub movePrevious()
|
||||
If i <> 0 And limit > -1 Then
|
||||
i = i - 1
|
||||
txtUsername.Text = ds.Tables(0).Rows(i).Item("username")
|
||||
oldUserName = ds.Tables(0).Rows(i).Item("username")
|
||||
txtPassword.Text = ds.Tables(0).Rows(i).Item("password")
|
||||
txtPassword2.Text = ds.Tables(0).Rows(i).Item("password")
|
||||
txtEmployeeCode.Text = ds.Tables(0).Rows(i).Item("employeecode")
|
||||
cmb_userType.SelectedItem = ds.Tables(0).Rows(i).Item("authentication")
|
||||
If ds.Tables(0).Rows(i).Item("active") = 1 Then
|
||||
cbActive.Checked = True
|
||||
Else
|
||||
cbActive.Checked = False
|
||||
End If
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Public Sub moveLast()
|
||||
If limit > -1 Then
|
||||
i = limit
|
||||
txtUsername.Text = ds.Tables(0).Rows(i).Item("username")
|
||||
oldUserName = ds.Tables(0).Rows(i).Item("username")
|
||||
txtPassword.Text = ds.Tables(0).Rows(i).Item("password")
|
||||
txtPassword2.Text = ds.Tables(0).Rows(i).Item("password")
|
||||
txtEmployeeCode.Text = ds.Tables(0).Rows(i).Item("employeecode")
|
||||
cmb_userType.SelectedItem = ds.Tables(0).Rows(i).Item("authentication")
|
||||
If ds.Tables(0).Rows(i).Item("active") = 1 Then
|
||||
cbActive.Checked = True
|
||||
Else
|
||||
cbActive.Checked = False
|
||||
End If
|
||||
Else
|
||||
clear()
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Public Sub add()
|
||||
clear()
|
||||
addMode = 1
|
||||
editMode = 0
|
||||
toAddMode()
|
||||
End Sub
|
||||
|
||||
Public Sub edit()
|
||||
oldUserName = txtUserName.Text
|
||||
|
||||
editMode = 1
|
||||
addMode = 0
|
||||
|
||||
toEditMode()
|
||||
End Sub
|
||||
|
||||
Public Sub save()
|
||||
Dim user As New User(txtUsername.Text)
|
||||
If addMode Or editMode Then
|
||||
If txtPassword.Text = txtPassword2.Text Then
|
||||
If addMode Then
|
||||
user.add(txtUsername.Text, txtPassword.Text, txtEmployeeCode.Text, cmb_userType.SelectedItem, cbActive.Checked)
|
||||
ElseIf editMode Then
|
||||
user.edit(txtUsername.Text, txtPassword.Text, txtEmployeeCode.Text, cmb_userType.SelectedItem, cbActive.Checked)
|
||||
End If
|
||||
fillDataSet()
|
||||
If ds.Tables(0).Rows.Count <> 0 Then
|
||||
oldUserName = txtUsername.Text
|
||||
trace(oldUserName)
|
||||
End If
|
||||
disableControls()
|
||||
addMode = 0
|
||||
editMode = 0
|
||||
toNormalMode()
|
||||
Else
|
||||
MessageBox.Show("Passwords do not match", "User", MessageBoxButtons.OK, MessageBoxIcon.Warning)
|
||||
End If
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Public Sub delete()
|
||||
If txtUserName.Text <> "" Then
|
||||
If MessageBox.Show("Are you sure you want to delete?", "System User", MessageBoxButtons.YesNo, MessageBoxIcon.Question) = Windows.Forms.DialogResult.Yes And txtUserName.Text <> "" Then
|
||||
Dim user As New User(txtUserName.Text)
|
||||
user.delete(txtUserName.Text)
|
||||
fillDataSet()
|
||||
moveFirst()
|
||||
End If
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Public Sub revert()
|
||||
If (editMode Or addMode) Then
|
||||
disableControls()
|
||||
clear()
|
||||
If oldUserName <> "" Then
|
||||
retrieve(oldUserName)
|
||||
End If
|
||||
|
||||
toNormalMode()
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Public Sub find()
|
||||
txtUsername.Enabled = True
|
||||
txtUserName.Text = String.Empty
|
||||
txtPassword.Text = String.Empty
|
||||
cmb_userType.SelectedIndex = 0
|
||||
cbActive.Visible = False
|
||||
btn_find.Visible = True
|
||||
|
||||
toSearchMode()
|
||||
End Sub
|
||||
|
||||
|
||||
Private Sub retrieve(ByVal username As String)
|
||||
fillDataSet()
|
||||
trace(username)
|
||||
txtUsername.Enabled = False
|
||||
cbActive.Visible = True
|
||||
btn_find.Visible = False
|
||||
|
||||
toNormalMode()
|
||||
End Sub
|
||||
|
||||
Private Sub ts_new_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ts_new.Click
|
||||
add()
|
||||
End Sub
|
||||
|
||||
Private Sub ts_edit_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ts_edit.Click
|
||||
edit()
|
||||
End Sub
|
||||
|
||||
Private Sub ts_delete_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ts_delete.Click
|
||||
delete()
|
||||
End Sub
|
||||
|
||||
Private Sub ts_find_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ts_find.Click
|
||||
find()
|
||||
End Sub
|
||||
|
||||
Private Sub ts_save_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ts_save.Click
|
||||
save()
|
||||
End Sub
|
||||
|
||||
Private Sub ts_revert_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ts_revert.Click
|
||||
revert()
|
||||
End Sub
|
||||
|
||||
Private Sub btn_find_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn_find.Click
|
||||
oldUserName = txtUsername.Text
|
||||
retrieve(oldUserName)
|
||||
End Sub
|
||||
|
||||
Private Sub txtUsername_KeyUp(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles txtUsername.KeyUp
|
||||
If e.KeyCode = Keys.Enter Then
|
||||
oldUserName = txtUsername.Text
|
||||
retrieve(oldUserName)
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub ts_close_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
|
||||
Me.Close()
|
||||
End Sub
|
||||
|
||||
Private Sub cbActive_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cbActive.CheckedChanged
|
||||
|
||||
End Sub
|
||||
End Class
|
@ -0,0 +1,24 @@
|
||||
<?xml version='1.0' encoding='utf-8'?>
|
||||
<SettingsFile xmlns="http://schemas.microsoft.com/VisualStudio/2004/01/settings" CurrentProfile="(Default)" GeneratedClassNamespace="My" GeneratedClassName="MySettings" UseMySettingsClassName="true">
|
||||
<Profiles />
|
||||
<Settings>
|
||||
<Setting Name="server" Type="System.String" Scope="User">
|
||||
<Value Profile="(Default)">192.168.1.5</Value>
|
||||
</Setting>
|
||||
<Setting Name="database" Type="System.String" Scope="User">
|
||||
<Value Profile="(Default)">Kanban</Value>
|
||||
</Setting>
|
||||
<Setting Name="username" Type="System.String" Scope="User">
|
||||
<Value Profile="(Default)" />
|
||||
</Setting>
|
||||
<Setting Name="password" Type="System.String" Scope="User">
|
||||
<Value Profile="(Default)" />
|
||||
</Setting>
|
||||
<Setting Name="dbserver" Type="System.String" Scope="User">
|
||||
<Value Profile="(Default)">SQL Server</Value>
|
||||
</Setting>
|
||||
<Setting Name="isTrusted" Type="System.String" Scope="User">
|
||||
<Value Profile="(Default)">True</Value>
|
||||
</Setting>
|
||||
</Settings>
|
||||
</SettingsFile>
|
@ -0,0 +1,260 @@
|
||||
<?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.Runtime.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:import namespace="http://www.w3.org/XML/1998/namespace" />
|
||||
<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" use="required" type="xsd:string" />
|
||||
<xsd:attribute name="type" type="xsd:string" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</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" use="required" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</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>
|
||||
<metadata name="menu.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>17, 17</value>
|
||||
</metadata>
|
||||
<assembly alias="System.Drawing" name="System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
|
||||
<data name="ts_first.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
|
||||
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAAStJREFUOE9jYBg0
|
||||
oHDW8/9NC57/z5z4+D8uR4W3P8Apx5A789n/VUfe/8elKL77wf/ghmu4DciY8vT/wn0fsCqK73n4f+n+
|
||||
///9qy/gNiCh58n/aVveYyiKaL8P1pw56/9/r9ITuA2I7Hr0v3f1BxRFoa33wJpb1wFt7/z73yX/AG4D
|
||||
Apsf/q+b/w6uKLjl7v9Fe///7wBqzpjz879d3c//9hnbcRvgUXX/f/60NyiK7Ipv/0+f8/u/f9e3/zqF
|
||||
7/5bJKzHbYB96d3/2ZNfYyjSTzn/36ToxX+VrE//jSOX4TbAIu/O/9T+11gVGSSd+C+b9vW/bvA83AYY
|
||||
Zt3+H9byEqci/dTL/zV8p+E2QCftxn+/6od4Fal4TMBtgFPulf8gBXgVDZqMh+wQAPB2wKsSwCgmAAAA
|
||||
AElFTkSuQmCC
|
||||
</value>
|
||||
</data>
|
||||
<data name="ts_prev.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
|
||||
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAAL1JREFUOE9jYBgy
|
||||
ILz9wX+yHRvf/eB/cMM18gyI73n4f+n+///9qy+QbkBE+32w5sxZ//97lZ4gzYDQ1ntgza3rgLZ3/v3v
|
||||
kn+AeAOCW+7+X7T3//8OoOaMOT//29X9/G+fsZ14A0ChbVd8+3/6nN///bu+/dcpfPffImE9aQaADNFP
|
||||
Of/fpOjFf5WsT/+NI5eRbgDIEIOkE/9l077+1w2eR54BYJekXv6v4TuNfANAhqh4TKDMALKTMc01AgDQ
|
||||
FGCYkuTLEQAAAABJRU5ErkJggg==
|
||||
</value>
|
||||
</data>
|
||||
<data name="ts_next.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
|
||||
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAAKtJREFUOE9jYBh0
|
||||
oHDW8/8UOSp35rP/Cd33yDckY8rT//P2//6f0HWHPEMSep78n73v1//OrX//u5VeJt2QyK5H/6ds+/W/
|
||||
ZOnf/wnT//63yT1LmiGBzQ//t659D9ZsXPLlv3T0tf/GkcuIN8Sj6v7/krnv4JoVXXqI1wyKPvvSu/8D
|
||||
W56BbSZZM8gAi7w7/20KrpCnGWSAYdZt8jWDDNBJu0GanylKtoNCMwCgfl+gC2KedgAAAABJRU5ErkJg
|
||||
gg==
|
||||
</value>
|
||||
</data>
|
||||
<data name="ts_last.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
|
||||
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAATBJREFUOE9jYBhU
|
||||
oHDW8/+4HASSa1rw/H/mxMc41TDkznz2P6H7HlYFILlVR97/D29/gNuAjClP/8/b//t/QtcdDEUguYX7
|
||||
PvwPbriG24CEnif/Z+/79b9z69//bqWXURSC5KZtef/fv/oCbgMiux79n7Lt1/+SpX//J0z/+98m9yxc
|
||||
MUiud/WH/16lJ3AbENj88H/r2vdgzcYlX/5LR1/7bxy5DKwBJFc3/91/l/wDuA3wqLr/v2TuO7hmRZce
|
||||
uGKQXP60N//tM7bjNsC+9O7/wJZnYJuRNYNcAJLLnvz6v0XCetwGWOTd+W9TcAVDM8gAkFxq/2u4l7Cm
|
||||
F8Os21g1gxSD5MJaXv7XDZ6H2wU6aTdwSoLk/Kof/tfwnYbbAHz5yin3yn8VjwlgPKjyHwMAvtG/s0Vm
|
||||
x8MAAAAASUVORK5CYII=
|
||||
</value>
|
||||
</data>
|
||||
<data name="ts_new.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
|
||||
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAAU1JREFUOE9jYBi0
|
||||
4O4C9v+35nH+vzqH6//FGbz/SXbodaDGP48a//952PD/5GQB0g04P50XbsDBHhHSDTg+SRBoe93/Pw+q
|
||||
/u9oFydswKWZPP/PTuX7fxKo8Ui/0P993SJAzeX//94r+r++Qeb/qhq5/0srFf/PL1X+P6tIFdPAU0B/
|
||||
/nlYD9RUC8SV///cKwHivP9/72b+/3sn+f/f23H//92MAOKQ/5NyNDENONQrDHbu3/ulQI0FQI3ZQI2p
|
||||
QI0J///digZqDPv/70bQ/3/X/f53peliGrCzXeL/lmap/+vAzpX/v6RC8f/fWzFAjeH/p+Zp/J+QpfW/
|
||||
O0P3f3uq/v/mREPCYTIb6E+Qc//dCPjfk6FDWAN6QgH5898NfyD2+9+arE+6Ad3pumD/gnB9nBHpBrQk
|
||||
GfxviDf8XxNr/L8y2oR0A0hO++RqAAAkI9ieo+gjUwAAAABJRU5ErkJggg==
|
||||
</value>
|
||||
</data>
|
||||
<data name="ts_delete.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
|
||||
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAAW9JREFUOE+tkk0o
|
||||
w3EYx3dV3kq5uKBWDiPT8hISMiQsMiEyQ9qBg0hoFwcHUi7kgIvkQFJSTrQ4zdvmrTW1/kuT0i74x+X3
|
||||
MRal/fEnv8tz+H2fz/N8vz0azX88PG6wmcDp4E881hYR3VUIixF2Nr+FcO2DlbnPGjaWoM+M6DAiOitg
|
||||
YUoR8rqhsJTBWG/kP6fOMKTegGjKh/7mTyIx0oUw58C0/XubLM8iKtPeQIx2gfcMJgbD0FBVlRE+D7QU
|
||||
hS2ZshANuTDQqq75fQIHe6GVcxHV6VCr/2VzQIKmAshOQNbHc6+PhTqDOggBP5jzoDCJoLUaLo7fwr3V
|
||||
hSCr8z8EeHcLbSU8FCfjLU0nuL/70cB4Py5tDLL7UBnC8xMMW6EkhRNdIsGt9QjhTXkGUnsN8rVf4Q72
|
||||
tpFzEnGlRiH1NIL8qDjJoY1DdjkVADNjSGnReI2ZIF196VW22+D8SAFw6YLJITjaV5e2qotSIXoBiiMD
|
||||
HEVvQ/IAAAAASUVORK5CYII=
|
||||
</value>
|
||||
</data>
|
||||
<data name="ts_save.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
|
||||
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAIsSURBVDhPrZPdS5NxFMf3L3TfTdBFtzU1hmuxGjzlHMqq
|
||||
YVgRvT2RL+XSZZqoWJlGLV8gW+HSScvpJJxU+AamSI2hTCVLM1e0xKGm2EQw+PY7v+j5tTIvoh+cy8/n
|
||||
POec76NS/Y/37GkUVL72ZbR5l/DYvYDGhgjuO2ZQW/MJ9tsh3CifQmnJBAoLXiMvdxQXzgeh9Cawtweo
|
||||
qV7FRm9ldQ3GtF4cTnvCSxF4Wxe5oLLiy195giMLK9htfg61WoblkEcI3I/muaC05PO6gp/w+/Ai4kw+
|
||||
FFyexgFzkxA462e54JLt3R+CX+GRyQi2SV5Yc8aRmuIUgrq7YS7IzhqNEfwODwbD2Kx3Q5YDMJkcQlBd
|
||||
9ZEL5DMBRbAe3OP/gE2JDThy9AWSkmqF4GblNLq7wE4JHD/5CpZjA3zbtDCamT6bOv+A+3DQ0glJsgvB
|
||||
1bJJdPjAMgA0ub6xu39F+fU5vlRaGM2cmRFU4OTUdhgMFUJwpXAcnmbgoXONBScKY3pOTJlP2JB+roh3
|
||||
Tk5h8H4P9PoyIbDljTEYqLoT5Z1JwEKCOK2EobezGJuag5x7DXuNbRzW7nFBpysSAoql4x6UzyYBwWfz
|
||||
b+FNaB6hmSVcLLYjXu9icCPidz2ANjFfCDIzhtncy3zmrQYPtuyQ0NLRD1/XILr7/Bh4OYR9JgvUunok
|
||||
MHi7pg4ajVUIKNOnT/XzeFLCKCR0ZzoVbZsWRjNTVyqCdyZkxwr+9a/+Dk60OMVjMFpXAAAAAElFTkSu
|
||||
QmCC
|
||||
</value>
|
||||
</data>
|
||||
<data name="ts_edit.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
|
||||
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAJjSURBVDhPdZNLaBNRFIanLnRRxI26cNk0ocVKEVy4cyWl
|
||||
SsCdKzU2CVgQAtEmi06SRQShu4ILF4oIFVsQcVGQorVNjWjoI81jkj4Tk1qbNsnkNZk8Z37vTGjpTOyB
|
||||
n8u5nP+75x7upShl3CDpA6L7KhlI3qWqVaZX+/ufT05OYeG7F/OeBczNezDzZRYTUx8x9uI1HhqNf4jj
|
||||
+kmQczabLQkS+9n8kVLpHLYSe/AFN5DK5GCxWPZOglx0u91xjq9h5+++QsndFCKbcbKXRrbMwWq1ZnTU
|
||||
+bcE1He8mwsulytWrTeRSmcV2k+zSBBIjIC31hII33mDZWoEeqpvlQDOHkJkQF0QkWHzbcoXq1j5fYBP
|
||||
L6cRpkYJ4CkGT11pBwhkBoUih3yxdKQcJ4DLJbH5yw3/VgKL47N4NTSGS71dtOIKTqcrJg2R4ysolfmW
|
||||
KiQv5tEM3gQ2Kez6H+PnWhw/ggH09l4eUQAcTqcMqFRr4CtV8HWA5wpoMoPAGgX4KTSiz0iFiBATha6n
|
||||
x64A0I4WoN5ooNYEatUihCgxM8S82oHsihtsUaoAwgzTDrDTDhnQFEU06izE9QEgQMyBDsQ8TxCK7IDN
|
||||
tQghJgKdTqfswE7TMkCGsEtAUDqZwvL0EDzeANIZFoIgjZkAwgy62wD2FqBBrnCwHUbk8zBm3t3DgncF
|
||||
XLkqG0XSnRRBCdCt6sBGO+SnzPM8Ass+LC0GsB0/OGxKsUbXN6DRaEaPD/G0Xq/3FUrl/xrUmxPvp9DZ
|
||||
2XlX/bGuDdy6/cH8aHjOaDJ9k2RQyWQ2zxmMpq9arVZ6RGckwD94hVAmzojWQQAAAABJRU5ErkJggg==
|
||||
</value>
|
||||
</data>
|
||||
<data name="ts_revert.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
iVBORw0KGgoAAAANSUhEUgAAADAAAAAwCAYAAABXAvmHAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
|
||||
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAYeSURBVGhD7VnfT1NnGNaBzPkLJoJuAtMty66WLSPZbsnC
|
||||
zUi2OdQMGtnWVKJLw0btXAZnhERPTJATsljCbDmaoC0XQHEpsivQG6+kJF54MRIi8QK57x/A2fu8fT/2
|
||||
wcroKWcJJiV5856efuc7z/P+/squXcW/ogWKFiha4KWzgOM4u0lKScpWV1dfJb2H5JWXggiACuhy0tUk
|
||||
R+leBcneHU+CAJYQ4NdIqsbvjTcEvgn85Wv1OUaX8bOQKN2RXpCQKSG9j+RYwk6cbmlpyQT8ASd8OewY
|
||||
YWMOnoBndhwBLd4PEMDj3b929wB88PugY123nMEbg441YKXxHcJoRxEQ8HsI3CG6rjN+MSxfm88Jh8JZ
|
||||
8EODjn3bdiJDkTR9f0LWlSG5/0OQ8CgA8Oju/40wElJAvE7ATgYvBlOIdwY/8A94O2Y7pmnCA++T1Eoo
|
||||
IZw2k2ra9wgJ9j2InPK8ign4vbR55fz8fL3f51+A5SlZGbw9ZLPlIQihzs7O5avG1Wjop1A0FNpaLoUu
|
||||
/d4/0P/t3NzcR/SOGiF0wBMiGvgqO2qf8vl8DN68YmbBk8UVeNbwwDXTCXYEHSQ11m6p27Lr4FEYB3kl
|
||||
IVgpHik8vCQ+K2Kx2Jeq0qwDDwKKhK7JK9YNi0kiP7bUtIaJUzHw+Yl0W2DZsqzviMCbhAHeQJ64zxGU
|
||||
QsQvg28P8EvWYp4AD8YocRUJTfN9IsGJLRrXWwqqGJGBB7lAdIRvSi4dBAnXSa4I9Pb2ZhDfLAC1EWwO
|
||||
MpuRy0VY3VN7Q5s9Joef/6I/hdwg2e+6u6sQmp2d/WJkZGQ5cSfB4HVLbmbpXJbX7238nj+T53SvweMg
|
||||
gbyQUQWzVv6hBMbihcoXz1/Ux8fiC4nRf5NQhFQ+gGhiLOEkR5PrNJ5NjtE90vie9e3N94PHjR7DCbQE
|
||||
MuPj4w2Ep9x1KCkSqNVLS0sfJpPJVC5P4GWwIjw1PT0dnZmZyUto7cPkJJFS3pUwVeEKjZwIBoMIJSQ1
|
||||
BsX8vYDEwQNSlzF1vjWdmo6ue6HKD9LoxC4a2RvYb2Vl5RNlGPamth+uVYWaujfVIB2+xHVCC4lS6Zg1
|
||||
ZLkeRQIlU+Ygx+wz8x4lEJ607z7Sh0m/fXf0boobopDgfQeyhDAoUpfvp7VVMKZrAponMEajIhx79PjR
|
||||
aYrjjOrCKIEySuQ9zGneraB937Vv2mkQ4HJN4FU/Qf8hEvAuh1FBBNRDtMHaWSD9JP1pPE7JLTHc/1s/
|
||||
xmnMOGX5vkRI4ER3lIzRy8DRBDVBGHV3dS/T2jp06Hz33nSdVqEOP1t49sHExMQfY5Njjyk/vpY4ddV4
|
||||
ZGypeLrw9GNUHu7gulyzeP6ivU8iArZNQAspWA6TJGYXCMZtjNCuzsVCAEXiPUy53PU1AuZ1k0uqpwT0
|
||||
vJAqpeZ7V+BlHxSIytit2Bk0L8Q8QHNeKU336O8EEt8TD3i1iVgf1ajWf96fUBMvvMCeoPBhb/TxaQ9j
|
||||
xfZzwAvwqjTDoqhqNLKfbWxs5CMqwoUJwBPQ8EKflcI6NwViHU6xFMIE3RAW21+o0PM4Vx+SvKkF+Oav
|
||||
mhd8Z2kKRc0HcCWSD/E78R+kZ7gqEExCVR3SqNfcQdF8ChV6/h3U/dhg7EzrudYELE8EeGxAtdEJSDKj
|
||||
hOKs7X4qVUlGG5TTMfECXtb0WZPjmXzehEPMGniEj3GFSNBIrc4gw7eGcVLD+Tnv/rIxfFAuqwPnAg+a
|
||||
W8lS7TRgUaxuSzCkYQ/SKJ2wPINH/BN4kEAziwzwLx1oYIVZXzyAg/1xf7s/jZciTsNdJPgxi16sPhuX
|
||||
6drNfYBWIuAVAenEmcXFxXqELon72NfGBxCoIcung6FsnCprea3VuTsSiWRmHs6ckkR3d5jZWCZReeAB
|
||||
sn56zd2KhEdaxTyGOZqt0ovPF+s18K6bY84cCP8YfsBhA3frri/wmq2NRkWjM050ciBCwtZJxYPltwde
|
||||
r0LD0eELcC0fG3Ek3K5kj5/pqcmpxP0/73dIeT4iCVvYzym5uqzXfQD9A4OZ1HaMB/jfAn5iRKVxPQzm
|
||||
NRl42YlVB5cxAp0doL2zeF6MiouKFihaoGiBogU0C/wN26gmMETMgssAAAAASUVORK5CYII=
|
||||
</value>
|
||||
</data>
|
||||
<metadata name="$this.TrayHeight" type="System.Int32, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>25</value>
|
||||
</metadata>
|
||||
</root>
|
@ -0,0 +1,72 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<asmv1:assembly manifestVersion="1.0" xsi:schemaLocation="urn:schemas-microsoft-com:asm.v1 assembly.adaptive.xsd" xmlns:asmv3="urn:schemas-microsoft-com:asm.v3" xmlns:dsig="http://www.w3.org/2000/09/xmldsig#" xmlns:co.v2="urn:schemas-microsoft-com:clickonce.v2" xmlns="urn:schemas-microsoft-com:asm.v2" xmlns:asmv1="urn:schemas-microsoft-com:asm.v1" xmlns:asmv2="urn:schemas-microsoft-com:asm.v2" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:co.v1="urn:schemas-microsoft-com:clickonce.v1">
|
||||
<asmv1:assemblyIdentity version="1.0.0.10" name="Kanban System.exe" publicKeyToken="23135af9664d69f7" language="neutral" processorArchitecture="msil" type="win32" />
|
||||
<application />
|
||||
<entryPoint>
|
||||
<assemblyIdentity name="Kanban System" version="1.0.0.0" language="neutral" processorArchitecture="msil" />
|
||||
<commandLine file="Kanban System.exe" parameters="" />
|
||||
</entryPoint>
|
||||
<trustInfo>
|
||||
<security>
|
||||
<applicationRequestMinimum>
|
||||
<PermissionSet Unrestricted="true" ID="Custom" SameSite="site" />
|
||||
<defaultAssemblyRequest permissionSetReference="Custom" />
|
||||
</applicationRequestMinimum>
|
||||
<requestedPrivileges xmlns="urn:schemas-microsoft-com:asm.v3">
|
||||
<!-- UAC Manifest Options
|
||||
If you want to change the Windows User Account Control level replace the
|
||||
requestedExecutionLevel node with one of the following.
|
||||
|
||||
<requestedExecutionLevel level="asInvoker" uiAccess="false" />
|
||||
<requestedExecutionLevel level="requireAdministrator" uiAccess="false" />
|
||||
<requestedExecutionLevel level="highestAvailable" uiAccess="false" />
|
||||
|
||||
Specifying requestedExecutionLevel node will disable file and registry virtualization.
|
||||
If you want to utilize File and Registry Virtualization for backward
|
||||
compatibility then delete the requestedExecutionLevel node.
|
||||
-->
|
||||
<requestedExecutionLevel level="asInvoker" uiAccess="false" />
|
||||
</requestedPrivileges>
|
||||
</security>
|
||||
</trustInfo>
|
||||
<dependency>
|
||||
<dependentOS>
|
||||
<osVersionInfo>
|
||||
<os majorVersion="4" minorVersion="10" buildNumber="0" servicePackMajor="0" />
|
||||
</osVersionInfo>
|
||||
</dependentOS>
|
||||
</dependency>
|
||||
<dependency>
|
||||
<dependentAssembly dependencyType="preRequisite" allowDelayedBinding="true">
|
||||
<assemblyIdentity name="Microsoft.Windows.CommonLanguageRuntime" version="2.0.50727.0" />
|
||||
</dependentAssembly>
|
||||
</dependency>
|
||||
<dependency>
|
||||
<dependentAssembly dependencyType="install" allowDelayedBinding="true" codebase="Kanban System.exe" size="613376">
|
||||
<assemblyIdentity name="Kanban System" version="1.0.0.0" language="neutral" processorArchitecture="msil" />
|
||||
<hash>
|
||||
<dsig:Transforms>
|
||||
<dsig:Transform Algorithm="urn:schemas-microsoft-com:HashTransforms.Identity" />
|
||||
</dsig:Transforms>
|
||||
<dsig:DigestMethod Algorithm="http://www.w3.org/2000/09/xmldsig#sha1" />
|
||||
<dsig:DigestValue>koFkwzm70FCls89i0qxJ0TqdH+Y=</dsig:DigestValue>
|
||||
</hash>
|
||||
</dependentAssembly>
|
||||
</dependency>
|
||||
<file name="Kanban System.exe.config" size="2658">
|
||||
<hash>
|
||||
<dsig:Transforms>
|
||||
<dsig:Transform Algorithm="urn:schemas-microsoft-com:HashTransforms.Identity" />
|
||||
</dsig:Transforms>
|
||||
<dsig:DigestMethod Algorithm="http://www.w3.org/2000/09/xmldsig#sha1" />
|
||||
<dsig:DigestValue>Zq+cvR5a4nDEanFdKCQM30cZ5v8=</dsig:DigestValue>
|
||||
</hash>
|
||||
</file>
|
||||
<compatibility xmlns="urn:schemas-microsoft-com:compatibility.v1">
|
||||
<application>
|
||||
<!-- A list of all Windows versions that this application is designed to work with. Windows will automatically select the most compatible environment.-->
|
||||
<!-- If your application is designed to work with Windows 7, uncomment the following supportedOS node-->
|
||||
<!--<supportedOS Id="{35138b9a-5d96-4fbd-8e2d-a2440225f93a}"/>-->
|
||||
</application>
|
||||
</compatibility>
|
||||
<publisherIdentity name="CN=IONICS\charlie.gerodias" issuerKeyHash="709f262409d189ec19f7b1912bfef9069d56bffe" /><Signature Id="StrongNameSignature" xmlns="http://www.w3.org/2000/09/xmldsig#"><SignedInfo><CanonicalizationMethod Algorithm="http://www.w3.org/2001/10/xml-exc-c14n#" /><SignatureMethod Algorithm="http://www.w3.org/2000/09/xmldsig#rsa-sha1" /><Reference URI=""><Transforms><Transform Algorithm="http://www.w3.org/2000/09/xmldsig#enveloped-signature" /><Transform Algorithm="http://www.w3.org/2001/10/xml-exc-c14n#" /></Transforms><DigestMethod Algorithm="http://www.w3.org/2000/09/xmldsig#sha1" /><DigestValue>bbvlQHWW8DE6eYyojDlLTQnQe/Q=</DigestValue></Reference></SignedInfo><SignatureValue>Kmvles442+ax00bRGMmBzSS1meHqnghRS6romcffFeuuor9ibGX6Pjh31wNLPj1V5xKp8kjl2XWdHPzFrJ5xGJMOLOraYiiXwL3/IKT12WyXKpWr0IM9Can/LKZSKhjrGhbmA+brh03JcDUkDl9Fl9z64yzmR3AFjRQeTdRjsPA=</SignatureValue><KeyInfo Id="StrongNameKeyInfo"><KeyValue><RSAKeyValue><Modulus>5BtbQSO8rPhmsTRH0Y26M53ZThJ+nUjuYoDnqiBgV/PdnZeJjGQ2bs5ALzWb/bAqFZZn0tBRWuiBSpvj6OT3WPtU5ST0CVdC+ZpFABwD72Qu6Aub9ZFRuwCj1+pB5EziuW2Ut8ABCzpame3lfeNzoErWb41ywrkQoHBFEtBYXE8=</Modulus><Exponent>AQAB</Exponent></RSAKeyValue></KeyValue><msrel:RelData xmlns:msrel="http://schemas.microsoft.com/windows/rel/2005/reldata"><r:license xmlns:r="urn:mpeg:mpeg21:2003:01-REL-R-NS" xmlns:as="http://schemas.microsoft.com/windows/pki/2005/Authenticode"><r:grant><as:ManifestInformation Hash="f47bd0094d4b398ca88c793a31f0967540e5bb6d" Description="" Url=""><as:assemblyIdentity version="1.0.0.10" name="Kanban System.exe" publicKeyToken="23135af9664d69f7" language="neutral" processorArchitecture="msil" type="win32" /></as:ManifestInformation><as:SignedBy /><as:AuthenticodePublisher><as:X509SubjectName>CN=IONICS\charlie.gerodias</as:X509SubjectName></as:AuthenticodePublisher></r:grant><r:issuer><Signature Id="AuthenticodeSignature" xmlns="http://www.w3.org/2000/09/xmldsig#"><SignedInfo><CanonicalizationMethod Algorithm="http://www.w3.org/2001/10/xml-exc-c14n#" /><SignatureMethod Algorithm="http://www.w3.org/2000/09/xmldsig#rsa-sha1" /><Reference URI=""><Transforms><Transform Algorithm="http://www.w3.org/2000/09/xmldsig#enveloped-signature" /><Transform Algorithm="http://www.w3.org/2001/10/xml-exc-c14n#" /></Transforms><DigestMethod Algorithm="http://www.w3.org/2000/09/xmldsig#sha1" /><DigestValue>oVtTrN6FhgptxAb/eCQpjVhaxZk=</DigestValue></Reference></SignedInfo><SignatureValue>rGvBXmtPCFTB8FDVxRGORgmKMyXmNKoAFiyt9Z163tpcEEs2xlFAf9je29Xw5Uno77WsmHDrnc08xiRTRA59yNBlBcgr8T0XZWbMq5xZlno58hQ9W8PirKSzENKKOfIIYZPyOR+XcOZVl0gXScF0h/RSZStDL6DcSVZUB/hbDsM=</SignatureValue><KeyInfo><KeyValue><RSAKeyValue><Modulus>5BtbQSO8rPhmsTRH0Y26M53ZThJ+nUjuYoDnqiBgV/PdnZeJjGQ2bs5ALzWb/bAqFZZn0tBRWuiBSpvj6OT3WPtU5ST0CVdC+ZpFABwD72Qu6Aub9ZFRuwCj1+pB5EziuW2Ut8ABCzpame3lfeNzoErWb41ywrkQoHBFEtBYXE8=</Modulus><Exponent>AQAB</Exponent></RSAKeyValue></KeyValue><X509Data><X509Certificate>MIIB7TCCAVqgAwIBAgIQeTxnQVX6FpVBogp+Ii3SnjAJBgUrDgMCHQUAMDkxNzA1BgNVBAMeLgBJAE8ATgBJAEMAUwBcAGMAaABhAHIAbABpAGUALgBnAGUAcgBvAGQAaQBhAHMwHhcNMTMwNTMwMDkzODA1WhcNMTQwNTMwMTUzODA1WjA5MTcwNQYDVQQDHi4ASQBPAE4ASQBDAFMAXABjAGgAYQByAGwAaQBlAC4AZwBlAHIAbwBkAGkAYQBzMIGfMA0GCSqGSIb3DQEBAQUAA4GNADCBiQKBgQDkG1tBI7ys+GaxNEfRjbozndlOEn6dSO5igOeqIGBX892dl4mMZDZuzkAvNZv9sCoVlmfS0FFa6IFKm+Po5PdY+1TlJPQJV0L5mkUAHAPvZC7oC5v1kVG7AKPX6kHkTOK5bZS3wAELOlqZ7eV943OgStZvjXLCuRCgcEUS0FhcTwIDAQABMAkGBSsOAwIdBQADgYEAtDfGKCa7lgB6c43lZX63ZN1gBgUlbWaPkZRFAtSkIJNoEbfydq8eriGeO01/73IFrCUZhIdSEXi7PRcEKp4oDSlCKbrJsF0m5aOAWKrJS0DFPC1oqTiTlV5ZdqU279ZAOm2AeR90jKNm3AHjImyb+ZGKEQQKZ0HH16OthENpZ4I=</X509Certificate></X509Data></KeyInfo></Signature></r:issuer></r:license></msrel:RelData></KeyInfo></Signature></asmv1:assembly>
|
@ -0,0 +1,88 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
||||
Partial Class PPInventoryForm
|
||||
Inherits System.Windows.Forms.Form
|
||||
|
||||
'Form overrides dispose to clean up the component list.
|
||||
<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
|
||||
|
||||
'Required by the Windows Form Designer
|
||||
Private components As System.ComponentModel.IContainer
|
||||
|
||||
'NOTE: The following procedure is required by the Windows Form Designer
|
||||
'It can be modified using the Windows Form Designer.
|
||||
'Do not modify it using the code editor.
|
||||
<System.Diagnostics.DebuggerStepThrough()> _
|
||||
Private Sub InitializeComponent()
|
||||
Me.components = New System.ComponentModel.Container()
|
||||
Dim DataGridViewCellStyle2 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
|
||||
Me.Timer1 = New System.Windows.Forms.Timer(Me.components)
|
||||
Me.GroupBox2 = New System.Windows.Forms.GroupBox()
|
||||
Me.dg_inventory = New System.Windows.Forms.DataGridView()
|
||||
Me.GroupBox2.SuspendLayout()
|
||||
CType(Me.dg_inventory, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'Timer1
|
||||
'
|
||||
'
|
||||
'GroupBox2
|
||||
'
|
||||
Me.GroupBox2.Controls.Add(Me.dg_inventory)
|
||||
Me.GroupBox2.Font = New System.Drawing.Font("Calibri", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.GroupBox2.Location = New System.Drawing.Point(6, 3)
|
||||
Me.GroupBox2.Name = "GroupBox2"
|
||||
Me.GroupBox2.Size = New System.Drawing.Size(752, 587)
|
||||
Me.GroupBox2.TabIndex = 4
|
||||
Me.GroupBox2.TabStop = False
|
||||
Me.GroupBox2.Text = "Inventory Part Number"
|
||||
'
|
||||
'dg_inventory
|
||||
'
|
||||
Me.dg_inventory.AllowUserToAddRows = False
|
||||
Me.dg_inventory.AllowUserToDeleteRows = False
|
||||
Me.dg_inventory.AllowUserToResizeColumns = False
|
||||
Me.dg_inventory.AllowUserToResizeRows = False
|
||||
DataGridViewCellStyle2.BackColor = System.Drawing.SystemColors.InactiveCaptionText
|
||||
Me.dg_inventory.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle2
|
||||
Me.dg_inventory.BackgroundColor = System.Drawing.SystemColors.Control
|
||||
Me.dg_inventory.BorderStyle = System.Windows.Forms.BorderStyle.Fixed3D
|
||||
Me.dg_inventory.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
|
||||
Me.dg_inventory.GridColor = System.Drawing.Color.SteelBlue
|
||||
Me.dg_inventory.Location = New System.Drawing.Point(6, 15)
|
||||
Me.dg_inventory.Name = "dg_inventory"
|
||||
Me.dg_inventory.RowHeadersVisible = False
|
||||
Me.dg_inventory.RowHeadersWidth = 20
|
||||
Me.dg_inventory.RowHeadersWidthSizeMode = System.Windows.Forms.DataGridViewRowHeadersWidthSizeMode.DisableResizing
|
||||
Me.dg_inventory.Size = New System.Drawing.Size(740, 566)
|
||||
Me.dg_inventory.TabIndex = 17
|
||||
'
|
||||
'PPInventoryForm
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.ClientSize = New System.Drawing.Size(764, 594)
|
||||
Me.ControlBox = False
|
||||
Me.Controls.Add(Me.GroupBox2)
|
||||
Me.Font = New System.Drawing.Font("Calibri", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedSingle
|
||||
Me.Name = "PPInventoryForm"
|
||||
Me.StartPosition = System.Windows.Forms.FormStartPosition.Manual
|
||||
Me.Text = "Parts Preparation Inventory"
|
||||
Me.GroupBox2.ResumeLayout(False)
|
||||
CType(Me.dg_inventory, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.ResumeLayout(False)
|
||||
|
||||
End Sub
|
||||
Friend WithEvents Timer1 As System.Windows.Forms.Timer
|
||||
Friend WithEvents GroupBox2 As System.Windows.Forms.GroupBox
|
||||
Friend WithEvents dg_inventory As System.Windows.Forms.DataGridView
|
||||
End Class
|
@ -0,0 +1,163 @@
|
||||
<HTML>
|
||||
<HEAD>
|
||||
<TITLE>Kanban</TITLE>
|
||||
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=utf-8" />
|
||||
<STYLE TYPE="text/css">
|
||||
<!--
|
||||
BODY{margin-top:20px; margin-left:20px; margin-right:20px; color:#000000; font-family:Tahoma; background-color:white}
|
||||
A:link {font-weight:normal; color:#000066; text-decoration:none}
|
||||
A:visited {font-weight:normal; color:#000066; text-decoration:none}
|
||||
A:active {font-weight:normal; text-decoration:none}
|
||||
A:hover {font-weight:normal; color:#FF6600; text-decoration:none}
|
||||
P {margin-top:0px; margin-bottom:12px; color:#000000; font-family:Tahoma}
|
||||
PRE {border-right:#f0f0e0 1px solid; padding-right:5px; border-top:#f0f0e0 1px solid; margin-top:-5px; padding-left:5px; font-size:x-small; padding-bottom:5px; border-left:#f0f0e0 1px solid; padding-top:5px; border-bottom:#f0f0e0 1px solid; font-family:Courier New; background-color:#e5e5cc}
|
||||
TD {font-size:12px; color:#000000; font-family:Tahoma}
|
||||
H2 {border-top: #003366 1px solid; margin-top:25px; font-weight:bold; font-size:1.5em; margin-bottom:10px; margin-left:-15px; color:#003366}
|
||||
H3 {margin-top:10px; font-size: 1.1em; margin-bottom: 10px; margin-left: -15px; color: #000000}
|
||||
UL {margin-top:10px; margin-left:20px}
|
||||
OL {margin-top:10px; margin-left:20px}
|
||||
LI {margin-top:10px; color: #000000}
|
||||
FONT.value {font-weight:bold; color:darkblue}
|
||||
FONT.key {font-weight: bold; color: darkgreen}
|
||||
.divTag {border:1px; border-style:solid; background-color:#FFFFFF; text-decoration:none; height:auto; width:auto; background-color:#cecece}
|
||||
.BannerColumn {background-color:#000000}
|
||||
.Banner {border:0; padding:0; height:8px; margin-top:0px; color:#ffffff; filter:progid:DXImageTransform.Microsoft.Gradient(GradientType=1,StartColorStr='#1c5280',EndColorStr='#FFFFFF');}
|
||||
.BannerTextCompany {font:bold; font-size:18pt; color:#cecece; font-family:Tahoma; height:0px; margin-top:0; margin-left:8px; margin-bottom:0; padding:0px; white-space:nowrap; filter:progid:DXImageTransform.Microsoft.dropshadow(OffX=2,OffY=2,Color='black',Positive='true');}
|
||||
.BannerTextApplication {font:bold; font-size:18pt; font-family:Tahoma; height:0px; margin-top:0; margin-left:8px; margin-bottom:0; padding:0px; white-space:nowrap; filter:progid:DXImageTransform.Microsoft.dropshadow(OffX=2,OffY=2,Color='black',Positive='true');}
|
||||
.BannerText {font:bold; font-size:18pt; font-family:Tahoma; height:0px; margin-top:0; margin-left:8px; margin-bottom:0; padding:0px; filter:progid:DXImageTransform.Microsoft.dropshadow(OffX=2,OffY=2,Color='black',Positive='true');}
|
||||
.BannerSubhead {border:0; padding:0; height:16px; margin-top:0px; margin-left:10px; color:#ffffff; filter:progid:DXImageTransform.Microsoft.Gradient(GradientType=1,StartColorStr='#4B3E1A',EndColorStr='#FFFFFF');}
|
||||
.BannerSubheadText {font:bold; height:11px; font-size:11px; font-family:Tahoma; margin-top:1; margin-left:10; filter:progid:DXImageTransform.Microsoft.dropshadow(OffX=2,OffY=2,Color='black',Positive='true');}
|
||||
.FooterRule {border:0; padding:0; height:1px; margin:0px; color:#ffffff; filter:progid:DXImageTransform.Microsoft.Gradient(GradientType=1,StartColorStr='#4B3E1A',EndColorStr='#FFFFFF');}
|
||||
.FooterText {font-size:11px; font-weight:normal; text-decoration:none; font-family:Tahoma; margin-top:10; margin-left:0px; margin-bottom:2; padding:0px; color:#999999; white-space:nowrap}
|
||||
.FooterText A:link {font-weight:normal; color:#999999; text-decoration:underline}
|
||||
.FooterText A:visited {font-weight:normal; color:#999999; text-decoration:underline}
|
||||
.FooterText A:active {font-weight:normal; color:#999999; text-decoration:underline}
|
||||
.FooterText A:hover {font-weight:normal; color:#FF6600; text-decoration:underline}
|
||||
.ClickOnceInfoText {font-size:11px; font-weight:normal; text-decoration:none; font-family:Tahoma; margin-top:0; margin-right:2px; margin-bottom:0; padding:0px; color:#000000}
|
||||
.InstallTextStyle {font:bold; font-size:14pt; font-family:Tahoma; a:#FF0000; text-decoration:None}
|
||||
.DetailsStyle {margin-left:30px}
|
||||
.ItemStyle {margin-left:-15px; font-weight:bold}
|
||||
.StartColorStr {background-color:#4B3E1A}
|
||||
.JustThisApp A:link {font-weight:normal; color:#000066; text-decoration:underline}
|
||||
.JustThisApp A:visited {font-weight:normal; color:#000066; text-decoration:underline}
|
||||
.JustThisApp A:active {font-weight:normal; text-decoration:underline}
|
||||
.JustThisApp A:hover {font-weight:normal; color:#FF6600; text-decoration:underline}
|
||||
-->
|
||||
|
||||
</STYLE>
|
||||
|
||||
<SCRIPT LANGUAGE="JavaScript">
|
||||
<!--
|
||||
runtimeVersion = "2.0.0";
|
||||
checkClient = false;
|
||||
directLink = "Kanban System.application";
|
||||
|
||||
|
||||
function Initialize()
|
||||
{
|
||||
if (HasRuntimeVersion(runtimeVersion, false) || (checkClient && HasRuntimeVersion(runtimeVersion, checkClient)))
|
||||
{
|
||||
InstallButton.href = directLink;
|
||||
BootstrapperSection.style.display = "none";
|
||||
}
|
||||
}
|
||||
function HasRuntimeVersion(v, c)
|
||||
{
|
||||
var va = GetVersion(v);
|
||||
var i;
|
||||
var a = navigator.userAgent.match(/\.NET CLR [0-9.]+/g);
|
||||
if(va[0]==4)
|
||||
a = navigator.userAgent.match(/\.NET[0-9.]+E/g);
|
||||
if (c)
|
||||
{
|
||||
a = navigator.userAgent.match(/\.NET Client [0-9.]+/g);
|
||||
if (va[0]==4)
|
||||
a = navigator.userAgent.match(/\.NET[0-9.]+C/g);
|
||||
}
|
||||
if (a != null)
|
||||
for (i = 0; i < a.length; ++i)
|
||||
if (CompareVersions(va, GetVersion(a[i])) <= 0)
|
||||
return true;
|
||||
return false;
|
||||
}
|
||||
function GetVersion(v)
|
||||
{
|
||||
var a = v.match(/([0-9]+)\.([0-9]+)\.([0-9]+)/i);
|
||||
if(a==null)
|
||||
a = v.match(/([0-9]+)\.([0-9]+)/i);
|
||||
return a.slice(1);
|
||||
}
|
||||
function CompareVersions(v1, v2)
|
||||
{
|
||||
if(v1.length>v2.length)
|
||||
{
|
||||
v2[v2.length]=0;
|
||||
}
|
||||
else if(v1.length<v2.length)
|
||||
{
|
||||
v1[v1.length]=0;
|
||||
}
|
||||
|
||||
for (i = 0; i < v1.length; ++i)
|
||||
{
|
||||
var n1 = new Number(v1[i]);
|
||||
var n2 = new Number(v2[i]);
|
||||
if (n1 < n2)
|
||||
return -1;
|
||||
if (n1 > n2)
|
||||
return 1;
|
||||
}
|
||||
return 0;
|
||||
}
|
||||
|
||||
-->
|
||||
</SCRIPT>
|
||||
|
||||
</HEAD>
|
||||
<BODY ONLOAD="Initialize()">
|
||||
<TABLE WIDTH="100%" CELLPADDING="0" CELLSPACING="2" BORDER="0">
|
||||
|
||||
<!-- Begin Banner -->
|
||||
<TR><TD><TABLE CELLPADDING="2" CELLSPACING="0" BORDER="0" BGCOLOR="#cecece" WIDTH="100%"><TR><TD><TABLE BGCOLOR="#1c5280" WIDTH="100%" CELLPADDING="0" CELLSPACING="0" BORDER="0"><TR><TD CLASS="Banner" /></TR><TR><TD CLASS="Banner"><SPAN CLASS="BannerTextCompany">Ionics EMS, Inc.</SPAN></TD></TR><TR><TD CLASS="Banner"><SPAN CLASS="BannerTextApplication">Kanban</SPAN></TD></TR><TR><TD CLASS="Banner" ALIGN="RIGHT" /></TR></TABLE></TD></TR></TABLE></TD></TR>
|
||||
<!-- End Banner -->
|
||||
|
||||
|
||||
<!-- Begin Dialog -->
|
||||
<TR><TD ALIGN="LEFT"><TABLE CELLPADDING="2" CELLSPACING="0" BORDER="0" WIDTH="540"><TR><TD WIDTH="496">
|
||||
|
||||
<!-- Begin AppInfo -->
|
||||
<TABLE><TR><TD COLSPAN="3"> </TD></TR><TR><TD><B>Name:</B></TD><TD WIDTH="5"><SPACER TYPE="block" WIDTH="10" /></TD><TD>Kanban</TD></TR><TR><TD COLSPAN="3"> </TD></TR><TR><TD><B>Version:</B></TD><TD WIDTH="5"><SPACER TYPE="block" WIDTH="10" /></TD><TD>1.0.0.25</TD></TR><TR><TD COLSPAN="3"> </TD></TR><TR><TD><B>Publisher:</B></TD><TD WIDTH="5"><SPACER TYPE="block" WIDTH="10" /></TD><TD>Ionics EMS, Inc.</TD></TR><tr><td colspan="3"> </td></tr></TABLE>
|
||||
<!-- End AppInfo -->
|
||||
|
||||
|
||||
<!-- Begin Prerequisites -->
|
||||
<TABLE ID="BootstrapperSection" BORDER="0"><TR><TD COLSPAN="2">The following prerequisites are required:</TD></TR><TR><TD WIDTH="10"> </TD><TD><UL>
|
||||
<LI>.NET Framework 2.0 (x86)</LI>
|
||||
</UL></TD></TR><TR><TD COLSPAN="2">
|
||||
If these components are already installed, you can <SPAN CLASS="JustThisApp"><A HREF="Kanban System.application">launch</A></SPAN> the application now. Otherwise, click the button below to install the prerequisites and run the application.
|
||||
</TD></TR><TR><TD COLSPAN="2"> </TD></TR></TABLE>
|
||||
<!-- End Prerequisites -->
|
||||
|
||||
|
||||
</TD></TR></TABLE>
|
||||
<!-- Begin Buttons -->
|
||||
<TR><TD ALIGN="LEFT"><TABLE CELLPADDING="2" CELLSPACING="0" BORDER="0" WIDTH="540" STYLE="cursor:hand" ONCLICK="window.navigate(InstallButton.href)"><TR><TD ALIGN="LEFT"><TABLE CELLPADDING="1" BGCOLOR="#333333" CELLSPACING="0" BORDER="0"><TR><TD><TABLE CELLPADDING="1" BGCOLOR="#cecece" CELLSPACING="0" BORDER="0"><TR><TD><TABLE CELLPADDING="1" BGCOLOR="#efefef" CELLSPACING="0" BORDER="0"><TR><TD WIDTH="20"><SPACER TYPE="block" WIDTH="20" HEIGHT="1" /></TD><TD><A ID="InstallButton" HREF="setup.exe">Install</A></TD><TD width="20"><SPACER TYPE="block" WIDTH="20" HEIGHT="1" /></TD></TR></TABLE></TD></TR></TABLE></TD></TR></TABLE></TD><TD WIDTH="15%" ALIGN="right" /></TR></TABLE></TD></TR>
|
||||
<!-- End Buttons -->
|
||||
</TD></TR>
|
||||
<!-- End Dialog -->
|
||||
|
||||
|
||||
|
||||
<!-- Spacer Row -->
|
||||
<TR><TD> </TD></TR>
|
||||
|
||||
<TR><TD>
|
||||
<!-- Begin Footer -->
|
||||
<TABLE WIDTH="100%" CELLPADDING="0" CELLSPACING="0" BORDER="0" BGCOLOR="#ffffff"><TR><TD HEIGHT="5"><SPACER TYPE="block" HEIGHT="5" /></TD></TR><TR><TD CLASS="FooterText" ALIGN="center"><A HREF="http://go.microsoft.com/fwlink/?LinkId=154571">ClickOnce and .NET Framework Resources</A>
|
||||
</TD></TR><TR><TD HEIGHT="5"><SPACER TYPE="block" HEIGHT="5" /></TD></TR><TR><TD HEIGHT="1" bgcolor="#cecece"><SPACER TYPE="block" HEIGHT="1" /></TD></TR></TABLE>
|
||||
<!-- End Footer -->
|
||||
</TD></TR>
|
||||
|
||||
</TABLE>
|
||||
</BODY>
|
||||
</HTML>
|
@ -0,0 +1,38 @@
|
||||
'------------------------------------------------------------------------------
|
||||
' <auto-generated>
|
||||
' This code was generated by a tool.
|
||||
' Runtime Version:4.0.30319.1
|
||||
'
|
||||
' Changes to this file may cause incorrect behavior and will be lost if
|
||||
' the code is regenerated.
|
||||
' </auto-generated>
|
||||
'------------------------------------------------------------------------------
|
||||
|
||||
Option Strict On
|
||||
Option Explicit On
|
||||
|
||||
|
||||
Namespace My
|
||||
|
||||
'NOTE: This file is auto-generated; do not modify it directly. To make changes,
|
||||
' or if you encounter build errors in this file, go to the Project Designer
|
||||
' (go to Project Properties or double-click the My Project node in
|
||||
' Solution Explorer), and make changes on the Application tab.
|
||||
'
|
||||
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.Mounting_Sequence.loginForm
|
||||
End Sub
|
||||
End Class
|
||||
End Namespace
|
Binary file not shown.
@ -0,0 +1,38 @@
|
||||
'------------------------------------------------------------------------------
|
||||
' <auto-generated>
|
||||
' This code was generated by a tool.
|
||||
' Runtime Version:2.0.50727.1433
|
||||
'
|
||||
' Changes to this file may cause incorrect behavior and will be lost if
|
||||
' the code is regenerated.
|
||||
' </auto-generated>
|
||||
'------------------------------------------------------------------------------
|
||||
|
||||
Option Strict On
|
||||
Option Explicit On
|
||||
|
||||
|
||||
Namespace My
|
||||
|
||||
'NOTE: This file is auto-generated; do not modify it directly. To make changes,
|
||||
' or if you encounter build errors in this file, go to the Project Designer
|
||||
' (go to Project Properties or double-click the My Project node in
|
||||
' Solution Explorer), and make changes on the Application tab.
|
||||
'
|
||||
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.Mounting_Sequence.loginForm
|
||||
End Sub
|
||||
End Class
|
||||
End Namespace
|
@ -0,0 +1,179 @@
|
||||
Public Class mainForm
|
||||
|
||||
Public cnstr As String = loginForm.cnstr
|
||||
|
||||
Private Sub ManualToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
|
||||
mcSeqForm.Show()
|
||||
End Sub
|
||||
|
||||
Private Sub mainForm_FormClosed(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosedEventArgs) Handles Me.FormClosed
|
||||
loginForm.Close()
|
||||
End Sub
|
||||
|
||||
Private Sub mainForm_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
|
||||
Me.WindowState = FormWindowState.Maximized
|
||||
'Me.Text = "Kanban System v.1.2.1 Current User - " & loginForm.username
|
||||
'last edit: sir cha
|
||||
Me.Text = "Kanban System v.1.2.10 Current User - " & loginForm.username
|
||||
|
||||
Select Case loginForm.userType
|
||||
Case "Operator"
|
||||
MaintenanceToolStripMenuItem.Visible = False
|
||||
CheckRequestsToolStripMenuItem.Visible = False
|
||||
AdministrationToolStripMenuItem.Visible = False
|
||||
Case "Quality Control"
|
||||
AdministrationToolStripMenuItem.Visible = False
|
||||
CheckRequestsToolStripMenuItem.Visible = False
|
||||
Case "Engineer"
|
||||
CheckRequestsToolStripMenuItem.Visible = False
|
||||
AdministrationToolStripMenuItem.Visible = False
|
||||
Case "PPC"
|
||||
MountingToolStripMenuItem.Visible = False
|
||||
MaintenanceToolStripMenuItem.Visible = False
|
||||
AdministrationToolStripMenuItem.Visible = False
|
||||
End Select
|
||||
End Sub
|
||||
|
||||
Private Sub tsClose_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles tsClose.Click
|
||||
Try
|
||||
Dim activeForm As String = ActiveMdiChild.Name
|
||||
Select Case activeForm
|
||||
Case "mcSeqForm"
|
||||
mcSeqForm.Close()
|
||||
Case "uploadMcSeq"
|
||||
uploadMcSeq.Close()
|
||||
Case "mountingForm"
|
||||
mountingForm.Close()
|
||||
Case "machineForm"
|
||||
machineForm.Close()
|
||||
Case "userForm"
|
||||
userForm.Close()
|
||||
Case "requestForm"
|
||||
requestForm.Close()
|
||||
Case "PPReceiveForm"
|
||||
PPReceiveForm.Close()
|
||||
Case "PPReturnForm"
|
||||
PPReturnForm.Close()
|
||||
Case "PPInventoryForm"
|
||||
PPInventoryForm.Close()
|
||||
Case "PCBScanForm"
|
||||
PCBScanForm.Close()
|
||||
Case "kittingForm"
|
||||
kittingForm.Close()
|
||||
Case "issuanceForm"
|
||||
issuanceForm.Close()
|
||||
Case "kittedReportForm"
|
||||
kittedReportForm.Close()
|
||||
End Select
|
||||
Catch ex As Exception
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
Private Sub ExitToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ExitToolStripMenuItem.Click
|
||||
Me.Close()
|
||||
End Sub
|
||||
|
||||
Private Sub MountingToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MountingToolStripMenuItem.Click
|
||||
mountingForm.Show()
|
||||
End Sub
|
||||
|
||||
Private Sub UsersToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles UsersToolStripMenuItem.Click
|
||||
userForm.Show()
|
||||
End Sub
|
||||
|
||||
Private Sub tsFirst_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles tsFirst.Click
|
||||
Try
|
||||
Dim activeForm As String = ActiveMdiChild.Name
|
||||
Select Case activeForm
|
||||
Case "machineForm"
|
||||
machineForm.moveFirst()
|
||||
Case "userForm"
|
||||
userForm.moveFirst()
|
||||
End Select
|
||||
Catch ex As Exception
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
Private Sub tsPrevious_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles tsPrevious.Click
|
||||
Try
|
||||
Dim activeForm As String = ActiveMdiChild.Name
|
||||
Select Case activeForm
|
||||
Case "machineForm"
|
||||
machineForm.movePrevious()
|
||||
Case "userForm"
|
||||
userForm.movePrevious()
|
||||
End Select
|
||||
Catch ex As Exception
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
Private Sub tsNext_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles tsNext.Click
|
||||
Try
|
||||
Dim activeForm As String = ActiveMdiChild.Name
|
||||
Select Case activeForm
|
||||
Case "machineForm"
|
||||
machineForm.moveNext()
|
||||
Case "userForm"
|
||||
userForm.moveNext()
|
||||
End Select
|
||||
Catch ex As Exception
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
Private Sub tsLast_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles tsLast.Click
|
||||
Try
|
||||
Dim activeForm As String = ActiveMdiChild.Name
|
||||
Select Case activeForm
|
||||
Case "machineForm"
|
||||
machineForm.moveLast()
|
||||
Case "userForm"
|
||||
userForm.moveLast()
|
||||
End Select
|
||||
Catch ex As Exception
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
Private Sub MachineToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MachineToolStripMenuItem.Click
|
||||
machineForm.Show()
|
||||
End Sub
|
||||
|
||||
Private Sub FileUploadToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles FileUploadToolStripMenuItem.Click
|
||||
mcSeqForm.Show()
|
||||
End Sub
|
||||
|
||||
Private Sub CheckRequestsToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckRequestsToolStripMenuItem.Click
|
||||
requestForm.Show()
|
||||
End Sub
|
||||
|
||||
Private Sub ReceiveToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ReceiveToolStripMenuItem.Click
|
||||
PPReceiveForm.Show()
|
||||
End Sub
|
||||
|
||||
Private Sub ReturnToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ReturnToolStripMenuItem.Click
|
||||
PPReturnForm.Show()
|
||||
End Sub
|
||||
|
||||
Private Sub InventoryToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles InventoryToolStripMenuItem.Click
|
||||
PPInventoryForm.Show()
|
||||
End Sub
|
||||
|
||||
Private Sub PCBScanningToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles PCBScanningToolStripMenuItem.Click
|
||||
PCBScanForm.Show()
|
||||
End Sub
|
||||
|
||||
Private Sub PartNumbersToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles PartNumbersToolStripMenuItem.Click
|
||||
partsForm.Show()
|
||||
End Sub
|
||||
|
||||
Private Sub PlantToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
|
||||
PlantMaintenanceForm.Show()
|
||||
End Sub
|
||||
|
||||
Private Sub KittingToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles KittingToolStripMenuItem.Click
|
||||
kittingForm.Show()
|
||||
End Sub
|
||||
|
||||
Private Sub IssuanceToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles IssuanceToolStripMenuItem.Click
|
||||
issuanceForm.Show()
|
||||
End Sub
|
||||
End Class
|
@ -0,0 +1,193 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
||||
Partial Class requestForm
|
||||
Inherits System.Windows.Forms.Form
|
||||
|
||||
'Form overrides dispose to clean up the component list.
|
||||
<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
|
||||
|
||||
'Required by the Windows Form Designer
|
||||
Private components As System.ComponentModel.IContainer
|
||||
|
||||
'NOTE: The following procedure is required by the Windows Form Designer
|
||||
'It can be modified using the Windows Form Designer.
|
||||
'Do not modify it using the code editor.
|
||||
<System.Diagnostics.DebuggerStepThrough()> _
|
||||
Private Sub InitializeComponent()
|
||||
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(requestForm))
|
||||
Me.ToolStrip1 = New System.Windows.Forms.ToolStrip()
|
||||
Me.ts_new = New System.Windows.Forms.ToolStripButton()
|
||||
Me.ToolStripSeparator1 = New System.Windows.Forms.ToolStripSeparator()
|
||||
Me.ts_edit = New System.Windows.Forms.ToolStripButton()
|
||||
Me.ToolStripSeparator2 = New System.Windows.Forms.ToolStripSeparator()
|
||||
Me.ts_delete = New System.Windows.Forms.ToolStripButton()
|
||||
Me.ToolStripSeparator3 = New System.Windows.Forms.ToolStripSeparator()
|
||||
Me.ts_revert = New System.Windows.Forms.ToolStripButton()
|
||||
Me.ToolStripSeparator5 = New System.Windows.Forms.ToolStripSeparator()
|
||||
Me.ts_save = New System.Windows.Forms.ToolStripButton()
|
||||
Me.ToolStripSeparator4 = New System.Windows.Forms.ToolStripSeparator()
|
||||
Me.ts_find = New System.Windows.Forms.ToolStripButton()
|
||||
Me.DataGridView1 = New System.Windows.Forms.DataGridView()
|
||||
Me.Label1 = New System.Windows.Forms.Label()
|
||||
Me.txtfile = New System.Windows.Forms.TextBox()
|
||||
Me.ToolStrip1.SuspendLayout()
|
||||
CType(Me.DataGridView1, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'ToolStrip1
|
||||
'
|
||||
Me.ToolStrip1.Font = New System.Drawing.Font("Calibri", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.ToolStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ts_new, Me.ToolStripSeparator1, Me.ts_edit, Me.ToolStripSeparator2, Me.ts_delete, Me.ToolStripSeparator3, Me.ts_revert, Me.ToolStripSeparator5, Me.ts_save, Me.ToolStripSeparator4, Me.ts_find})
|
||||
Me.ToolStrip1.Location = New System.Drawing.Point(0, 0)
|
||||
Me.ToolStrip1.Name = "ToolStrip1"
|
||||
Me.ToolStrip1.Size = New System.Drawing.Size(731, 25)
|
||||
Me.ToolStrip1.TabIndex = 4
|
||||
'
|
||||
'ts_new
|
||||
'
|
||||
Me.ts_new.Image = CType(resources.GetObject("ts_new.Image"), System.Drawing.Image)
|
||||
Me.ts_new.ImageTransparentColor = System.Drawing.Color.Magenta
|
||||
Me.ts_new.Name = "ts_new"
|
||||
Me.ts_new.Size = New System.Drawing.Size(59, 22)
|
||||
Me.ts_new.Text = "Insert"
|
||||
'
|
||||
'ToolStripSeparator1
|
||||
'
|
||||
Me.ToolStripSeparator1.Name = "ToolStripSeparator1"
|
||||
Me.ToolStripSeparator1.Size = New System.Drawing.Size(6, 25)
|
||||
'
|
||||
'ts_edit
|
||||
'
|
||||
Me.ts_edit.Image = CType(resources.GetObject("ts_edit.Image"), System.Drawing.Image)
|
||||
Me.ts_edit.ImageTransparentColor = System.Drawing.Color.Magenta
|
||||
Me.ts_edit.Name = "ts_edit"
|
||||
Me.ts_edit.Size = New System.Drawing.Size(67, 22)
|
||||
Me.ts_edit.Text = "Update"
|
||||
'
|
||||
'ToolStripSeparator2
|
||||
'
|
||||
Me.ToolStripSeparator2.Name = "ToolStripSeparator2"
|
||||
Me.ToolStripSeparator2.Size = New System.Drawing.Size(6, 25)
|
||||
'
|
||||
'ts_delete
|
||||
'
|
||||
Me.ts_delete.Image = CType(resources.GetObject("ts_delete.Image"), System.Drawing.Image)
|
||||
Me.ts_delete.ImageTransparentColor = System.Drawing.Color.Magenta
|
||||
Me.ts_delete.Name = "ts_delete"
|
||||
Me.ts_delete.Size = New System.Drawing.Size(64, 22)
|
||||
Me.ts_delete.Text = "Delete"
|
||||
'
|
||||
'ToolStripSeparator3
|
||||
'
|
||||
Me.ToolStripSeparator3.Name = "ToolStripSeparator3"
|
||||
Me.ToolStripSeparator3.Size = New System.Drawing.Size(6, 25)
|
||||
'
|
||||
'ts_revert
|
||||
'
|
||||
Me.ts_revert.Enabled = False
|
||||
Me.ts_revert.Image = CType(resources.GetObject("ts_revert.Image"), System.Drawing.Image)
|
||||
Me.ts_revert.ImageTransparentColor = System.Drawing.Color.Magenta
|
||||
Me.ts_revert.Name = "ts_revert"
|
||||
Me.ts_revert.Size = New System.Drawing.Size(61, 22)
|
||||
Me.ts_revert.Text = "Revert"
|
||||
'
|
||||
'ToolStripSeparator5
|
||||
'
|
||||
Me.ToolStripSeparator5.Name = "ToolStripSeparator5"
|
||||
Me.ToolStripSeparator5.Size = New System.Drawing.Size(6, 25)
|
||||
'
|
||||
'ts_save
|
||||
'
|
||||
Me.ts_save.Enabled = False
|
||||
Me.ts_save.Image = CType(resources.GetObject("ts_save.Image"), System.Drawing.Image)
|
||||
Me.ts_save.ImageTransparentColor = System.Drawing.Color.Magenta
|
||||
Me.ts_save.Name = "ts_save"
|
||||
Me.ts_save.Size = New System.Drawing.Size(81, 22)
|
||||
Me.ts_save.Text = "Save Data"
|
||||
'
|
||||
'ToolStripSeparator4
|
||||
'
|
||||
Me.ToolStripSeparator4.Name = "ToolStripSeparator4"
|
||||
Me.ToolStripSeparator4.Size = New System.Drawing.Size(6, 25)
|
||||
'
|
||||
'ts_find
|
||||
'
|
||||
Me.ts_find.Image = CType(resources.GetObject("ts_find.Image"), System.Drawing.Image)
|
||||
Me.ts_find.ImageTransparentColor = System.Drawing.Color.Magenta
|
||||
Me.ts_find.Name = "ts_find"
|
||||
Me.ts_find.Size = New System.Drawing.Size(51, 22)
|
||||
Me.ts_find.Text = "Find"
|
||||
'
|
||||
'DataGridView1
|
||||
'
|
||||
Me.DataGridView1.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
|
||||
Me.DataGridView1.Location = New System.Drawing.Point(1, 63)
|
||||
Me.DataGridView1.Name = "DataGridView1"
|
||||
Me.DataGridView1.Size = New System.Drawing.Size(728, 460)
|
||||
Me.DataGridView1.TabIndex = 5
|
||||
'
|
||||
'Label1
|
||||
'
|
||||
Me.Label1.AutoSize = True
|
||||
Me.Label1.Font = New System.Drawing.Font("Calibri", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label1.Location = New System.Drawing.Point(5, 38)
|
||||
Me.Label1.Name = "Label1"
|
||||
Me.Label1.Size = New System.Drawing.Size(144, 15)
|
||||
Me.Label1.TabIndex = 6
|
||||
Me.Label1.Text = "Kanban Request Number:"
|
||||
'
|
||||
'txtfile
|
||||
'
|
||||
Me.txtfile.Enabled = False
|
||||
Me.txtfile.Font = New System.Drawing.Font("Calibri", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.txtfile.Location = New System.Drawing.Point(152, 34)
|
||||
Me.txtfile.Name = "txtfile"
|
||||
Me.txtfile.Size = New System.Drawing.Size(185, 23)
|
||||
Me.txtfile.TabIndex = 7
|
||||
'
|
||||
'requestForm
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.ClientSize = New System.Drawing.Size(731, 523)
|
||||
Me.ControlBox = False
|
||||
Me.Controls.Add(Me.txtfile)
|
||||
Me.Controls.Add(Me.Label1)
|
||||
Me.Controls.Add(Me.DataGridView1)
|
||||
Me.Controls.Add(Me.ToolStrip1)
|
||||
Me.Font = New System.Drawing.Font("Calibri", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedSingle
|
||||
Me.Name = "requestForm"
|
||||
Me.StartPosition = System.Windows.Forms.FormStartPosition.Manual
|
||||
Me.Text = "Kanban Request"
|
||||
Me.ToolStrip1.ResumeLayout(False)
|
||||
Me.ToolStrip1.PerformLayout()
|
||||
CType(Me.DataGridView1, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.ResumeLayout(False)
|
||||
Me.PerformLayout()
|
||||
|
||||
End Sub
|
||||
Friend WithEvents ToolStrip1 As System.Windows.Forms.ToolStrip
|
||||
Friend WithEvents ts_new As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents ToolStripSeparator1 As System.Windows.Forms.ToolStripSeparator
|
||||
Friend WithEvents ts_edit As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents ToolStripSeparator2 As System.Windows.Forms.ToolStripSeparator
|
||||
Friend WithEvents ts_delete As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents ToolStripSeparator3 As System.Windows.Forms.ToolStripSeparator
|
||||
Friend WithEvents ts_revert As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents ToolStripSeparator5 As System.Windows.Forms.ToolStripSeparator
|
||||
Friend WithEvents ts_save As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents ToolStripSeparator4 As System.Windows.Forms.ToolStripSeparator
|
||||
Friend WithEvents ts_find As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents DataGridView1 As System.Windows.Forms.DataGridView
|
||||
Friend WithEvents Label1 As System.Windows.Forms.Label
|
||||
Friend WithEvents txtfile As System.Windows.Forms.TextBox
|
||||
End Class
|
Binary file not shown.
@ -0,0 +1,326 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
||||
Partial Class mcSeqForm
|
||||
Inherits System.Windows.Forms.Form
|
||||
|
||||
'Form overrides dispose to clean up the component list.
|
||||
<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
|
||||
|
||||
'Required by the Windows Form Designer
|
||||
Private components As System.ComponentModel.IContainer
|
||||
|
||||
'NOTE: The following procedure is required by the Windows Form Designer
|
||||
'It can be modified using the Windows Form Designer.
|
||||
'Do not modify it using the code editor.
|
||||
<System.Diagnostics.DebuggerStepThrough()> _
|
||||
Private Sub InitializeComponent()
|
||||
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(mcSeqForm))
|
||||
Me.basicInfo = New System.Windows.Forms.GroupBox
|
||||
Me.cmbRev = New System.Windows.Forms.ComboBox
|
||||
Me.Label2 = New System.Windows.Forms.Label
|
||||
Me.cmbSeq = New System.Windows.Forms.ComboBox
|
||||
Me.Label1 = New System.Windows.Forms.Label
|
||||
Me.GroupBox1 = New System.Windows.Forms.GroupBox
|
||||
Me.dg_mtSeq = New System.Windows.Forms.DataGridView
|
||||
Me.ToolStrip1 = New System.Windows.Forms.ToolStrip
|
||||
Me.ts_new = New System.Windows.Forms.ToolStripButton
|
||||
Me.ToolStripSeparator1 = New System.Windows.Forms.ToolStripSeparator
|
||||
Me.ts_edit = New System.Windows.Forms.ToolStripButton
|
||||
Me.ToolStripSeparator2 = New System.Windows.Forms.ToolStripSeparator
|
||||
Me.ts_delete = New System.Windows.Forms.ToolStripButton
|
||||
Me.ToolStripSeparator3 = New System.Windows.Forms.ToolStripSeparator
|
||||
Me.ts_revert = New System.Windows.Forms.ToolStripButton
|
||||
Me.ToolStripSeparator5 = New System.Windows.Forms.ToolStripSeparator
|
||||
Me.ts_save = New System.Windows.Forms.ToolStripButton
|
||||
Me.ToolStripSeparator4 = New System.Windows.Forms.ToolStripSeparator
|
||||
Me.ts_find = New System.Windows.Forms.ToolStripButton
|
||||
Me.verifyBox = New System.Windows.Forms.GroupBox
|
||||
Me.btn_verify = New System.Windows.Forms.Button
|
||||
Me.txtVerDate = New System.Windows.Forms.TextBox
|
||||
Me.txtVerBy = New System.Windows.Forms.TextBox
|
||||
Me.Label4 = New System.Windows.Forms.Label
|
||||
Me.Label3 = New System.Windows.Forms.Label
|
||||
Me.basicInfo.SuspendLayout()
|
||||
Me.GroupBox1.SuspendLayout()
|
||||
CType(Me.dg_mtSeq, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.ToolStrip1.SuspendLayout()
|
||||
Me.verifyBox.SuspendLayout()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'basicInfo
|
||||
'
|
||||
Me.basicInfo.Controls.Add(Me.cmbRev)
|
||||
Me.basicInfo.Controls.Add(Me.Label2)
|
||||
Me.basicInfo.Controls.Add(Me.cmbSeq)
|
||||
Me.basicInfo.Controls.Add(Me.Label1)
|
||||
Me.basicInfo.Location = New System.Drawing.Point(4, 29)
|
||||
Me.basicInfo.Name = "basicInfo"
|
||||
Me.basicInfo.Size = New System.Drawing.Size(396, 79)
|
||||
Me.basicInfo.TabIndex = 0
|
||||
Me.basicInfo.TabStop = False
|
||||
Me.basicInfo.Text = "Basic Information"
|
||||
'
|
||||
'cmbRev
|
||||
'
|
||||
Me.cmbRev.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
|
||||
Me.cmbRev.FormattingEnabled = True
|
||||
Me.cmbRev.Location = New System.Drawing.Point(124, 48)
|
||||
Me.cmbRev.Name = "cmbRev"
|
||||
Me.cmbRev.Size = New System.Drawing.Size(164, 21)
|
||||
Me.cmbRev.TabIndex = 4
|
||||
'
|
||||
'Label2
|
||||
'
|
||||
Me.Label2.AutoSize = True
|
||||
Me.Label2.Location = New System.Drawing.Point(70, 53)
|
||||
Me.Label2.Name = "Label2"
|
||||
Me.Label2.Size = New System.Drawing.Size(51, 13)
|
||||
Me.Label2.TabIndex = 3
|
||||
Me.Label2.Text = "Revision:"
|
||||
'
|
||||
'cmbSeq
|
||||
'
|
||||
Me.cmbSeq.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
|
||||
Me.cmbSeq.FormattingEnabled = True
|
||||
Me.cmbSeq.Location = New System.Drawing.Point(124, 21)
|
||||
Me.cmbSeq.Name = "cmbSeq"
|
||||
Me.cmbSeq.Size = New System.Drawing.Size(164, 21)
|
||||
Me.cmbSeq.TabIndex = 0
|
||||
'
|
||||
'Label1
|
||||
'
|
||||
Me.Label1.AutoSize = True
|
||||
Me.Label1.Location = New System.Drawing.Point(24, 26)
|
||||
Me.Label1.Name = "Label1"
|
||||
Me.Label1.Size = New System.Drawing.Size(99, 13)
|
||||
Me.Label1.TabIndex = 0
|
||||
Me.Label1.Text = "Sequence Number:"
|
||||
'
|
||||
'GroupBox1
|
||||
'
|
||||
Me.GroupBox1.Controls.Add(Me.dg_mtSeq)
|
||||
Me.GroupBox1.Location = New System.Drawing.Point(2, 109)
|
||||
Me.GroupBox1.Name = "GroupBox1"
|
||||
Me.GroupBox1.Size = New System.Drawing.Size(997, 474)
|
||||
Me.GroupBox1.TabIndex = 1
|
||||
Me.GroupBox1.TabStop = False
|
||||
Me.GroupBox1.Text = "Mounting Sequence"
|
||||
'
|
||||
'dg_mtSeq
|
||||
'
|
||||
Me.dg_mtSeq.AllowUserToAddRows = False
|
||||
Me.dg_mtSeq.AllowUserToDeleteRows = False
|
||||
Me.dg_mtSeq.AllowUserToResizeColumns = False
|
||||
Me.dg_mtSeq.AllowUserToResizeRows = False
|
||||
Me.dg_mtSeq.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
|
||||
Me.dg_mtSeq.EditMode = System.Windows.Forms.DataGridViewEditMode.EditOnEnter
|
||||
Me.dg_mtSeq.Location = New System.Drawing.Point(6, 19)
|
||||
Me.dg_mtSeq.Name = "dg_mtSeq"
|
||||
Me.dg_mtSeq.RowHeadersWidth = 20
|
||||
Me.dg_mtSeq.RowHeadersWidthSizeMode = System.Windows.Forms.DataGridViewRowHeadersWidthSizeMode.DisableResizing
|
||||
Me.dg_mtSeq.RowTemplate.Height = 18
|
||||
Me.dg_mtSeq.Size = New System.Drawing.Size(983, 449)
|
||||
Me.dg_mtSeq.TabIndex = 0
|
||||
'
|
||||
'ToolStrip1
|
||||
'
|
||||
Me.ToolStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ts_new, Me.ToolStripSeparator1, Me.ts_edit, Me.ToolStripSeparator2, Me.ts_delete, Me.ToolStripSeparator3, Me.ts_revert, Me.ToolStripSeparator5, Me.ts_save, Me.ToolStripSeparator4, Me.ts_find})
|
||||
Me.ToolStrip1.Location = New System.Drawing.Point(0, 0)
|
||||
Me.ToolStrip1.Name = "ToolStrip1"
|
||||
Me.ToolStrip1.Size = New System.Drawing.Size(1003, 25)
|
||||
Me.ToolStrip1.TabIndex = 4
|
||||
'
|
||||
'ts_new
|
||||
'
|
||||
Me.ts_new.Enabled = False
|
||||
Me.ts_new.Image = CType(resources.GetObject("ts_new.Image"), System.Drawing.Image)
|
||||
Me.ts_new.ImageTransparentColor = System.Drawing.Color.Magenta
|
||||
Me.ts_new.Name = "ts_new"
|
||||
Me.ts_new.Size = New System.Drawing.Size(46, 22)
|
||||
Me.ts_new.Text = "Add"
|
||||
'
|
||||
'ToolStripSeparator1
|
||||
'
|
||||
Me.ToolStripSeparator1.Name = "ToolStripSeparator1"
|
||||
Me.ToolStripSeparator1.Size = New System.Drawing.Size(6, 25)
|
||||
'
|
||||
'ts_edit
|
||||
'
|
||||
Me.ts_edit.Image = CType(resources.GetObject("ts_edit.Image"), System.Drawing.Image)
|
||||
Me.ts_edit.ImageTransparentColor = System.Drawing.Color.Magenta
|
||||
Me.ts_edit.Name = "ts_edit"
|
||||
Me.ts_edit.Size = New System.Drawing.Size(62, 22)
|
||||
Me.ts_edit.Text = "Update"
|
||||
'
|
||||
'ToolStripSeparator2
|
||||
'
|
||||
Me.ToolStripSeparator2.Name = "ToolStripSeparator2"
|
||||
Me.ToolStripSeparator2.Size = New System.Drawing.Size(6, 25)
|
||||
'
|
||||
'ts_delete
|
||||
'
|
||||
Me.ts_delete.Image = CType(resources.GetObject("ts_delete.Image"), System.Drawing.Image)
|
||||
Me.ts_delete.ImageTransparentColor = System.Drawing.Color.Magenta
|
||||
Me.ts_delete.Name = "ts_delete"
|
||||
Me.ts_delete.Size = New System.Drawing.Size(58, 22)
|
||||
Me.ts_delete.Text = "Delete"
|
||||
'
|
||||
'ToolStripSeparator3
|
||||
'
|
||||
Me.ToolStripSeparator3.Name = "ToolStripSeparator3"
|
||||
Me.ToolStripSeparator3.Size = New System.Drawing.Size(6, 25)
|
||||
'
|
||||
'ts_revert
|
||||
'
|
||||
Me.ts_revert.Enabled = False
|
||||
Me.ts_revert.Image = CType(resources.GetObject("ts_revert.Image"), System.Drawing.Image)
|
||||
Me.ts_revert.ImageTransparentColor = System.Drawing.Color.Magenta
|
||||
Me.ts_revert.Name = "ts_revert"
|
||||
Me.ts_revert.Size = New System.Drawing.Size(60, 22)
|
||||
Me.ts_revert.Text = "Revert"
|
||||
'
|
||||
'ToolStripSeparator5
|
||||
'
|
||||
Me.ToolStripSeparator5.Name = "ToolStripSeparator5"
|
||||
Me.ToolStripSeparator5.Size = New System.Drawing.Size(6, 25)
|
||||
'
|
||||
'ts_save
|
||||
'
|
||||
Me.ts_save.Enabled = False
|
||||
Me.ts_save.Image = CType(resources.GetObject("ts_save.Image"), System.Drawing.Image)
|
||||
Me.ts_save.ImageTransparentColor = System.Drawing.Color.Magenta
|
||||
Me.ts_save.Name = "ts_save"
|
||||
Me.ts_save.Size = New System.Drawing.Size(77, 22)
|
||||
Me.ts_save.Text = "Save Data"
|
||||
'
|
||||
'ToolStripSeparator4
|
||||
'
|
||||
Me.ToolStripSeparator4.Name = "ToolStripSeparator4"
|
||||
Me.ToolStripSeparator4.Size = New System.Drawing.Size(6, 25)
|
||||
'
|
||||
'ts_find
|
||||
'
|
||||
Me.ts_find.Image = CType(resources.GetObject("ts_find.Image"), System.Drawing.Image)
|
||||
Me.ts_find.ImageTransparentColor = System.Drawing.Color.Magenta
|
||||
Me.ts_find.Name = "ts_find"
|
||||
Me.ts_find.Size = New System.Drawing.Size(47, 22)
|
||||
Me.ts_find.Text = "Find"
|
||||
'
|
||||
'verifyBox
|
||||
'
|
||||
Me.verifyBox.Controls.Add(Me.btn_verify)
|
||||
Me.verifyBox.Controls.Add(Me.txtVerDate)
|
||||
Me.verifyBox.Controls.Add(Me.txtVerBy)
|
||||
Me.verifyBox.Controls.Add(Me.Label4)
|
||||
Me.verifyBox.Controls.Add(Me.Label3)
|
||||
Me.verifyBox.Location = New System.Drawing.Point(406, 29)
|
||||
Me.verifyBox.Name = "verifyBox"
|
||||
Me.verifyBox.Size = New System.Drawing.Size(593, 79)
|
||||
Me.verifyBox.TabIndex = 5
|
||||
Me.verifyBox.TabStop = False
|
||||
Me.verifyBox.Text = "Verify"
|
||||
'
|
||||
'btn_verify
|
||||
'
|
||||
Me.btn_verify.Enabled = False
|
||||
Me.btn_verify.Location = New System.Drawing.Point(314, 19)
|
||||
Me.btn_verify.Name = "btn_verify"
|
||||
Me.btn_verify.Size = New System.Drawing.Size(134, 47)
|
||||
Me.btn_verify.TabIndex = 4
|
||||
Me.btn_verify.Text = "Approve Sequence"
|
||||
Me.btn_verify.UseVisualStyleBackColor = True
|
||||
'
|
||||
'txtVerDate
|
||||
'
|
||||
Me.txtVerDate.Enabled = False
|
||||
Me.txtVerDate.Location = New System.Drawing.Point(114, 47)
|
||||
Me.txtVerDate.Name = "txtVerDate"
|
||||
Me.txtVerDate.Size = New System.Drawing.Size(183, 20)
|
||||
Me.txtVerDate.TabIndex = 3
|
||||
'
|
||||
'txtVerBy
|
||||
'
|
||||
Me.txtVerBy.Enabled = False
|
||||
Me.txtVerBy.Location = New System.Drawing.Point(114, 22)
|
||||
Me.txtVerBy.Name = "txtVerBy"
|
||||
Me.txtVerBy.Size = New System.Drawing.Size(183, 20)
|
||||
Me.txtVerBy.TabIndex = 2
|
||||
'
|
||||
'Label4
|
||||
'
|
||||
Me.Label4.AutoSize = True
|
||||
Me.Label4.Location = New System.Drawing.Point(26, 51)
|
||||
Me.Label4.Name = "Label4"
|
||||
Me.Label4.Size = New System.Drawing.Size(88, 13)
|
||||
Me.Label4.TabIndex = 1
|
||||
Me.Label4.Text = "Verification Date:"
|
||||
'
|
||||
'Label3
|
||||
'
|
||||
Me.Label3.AutoSize = True
|
||||
Me.Label3.Location = New System.Drawing.Point(53, 26)
|
||||
Me.Label3.Name = "Label3"
|
||||
Me.Label3.Size = New System.Drawing.Size(60, 13)
|
||||
Me.Label3.TabIndex = 0
|
||||
Me.Label3.Text = "Verified By:"
|
||||
'
|
||||
'mcSeqForm
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.ClientSize = New System.Drawing.Size(1003, 587)
|
||||
Me.ControlBox = False
|
||||
Me.Controls.Add(Me.verifyBox)
|
||||
Me.Controls.Add(Me.ToolStrip1)
|
||||
Me.Controls.Add(Me.GroupBox1)
|
||||
Me.Controls.Add(Me.basicInfo)
|
||||
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedSingle
|
||||
Me.Name = "mcSeqForm"
|
||||
Me.StartPosition = System.Windows.Forms.FormStartPosition.Manual
|
||||
Me.Text = "Machine Sequence Maitenance"
|
||||
Me.basicInfo.ResumeLayout(False)
|
||||
Me.basicInfo.PerformLayout()
|
||||
Me.GroupBox1.ResumeLayout(False)
|
||||
CType(Me.dg_mtSeq, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.ToolStrip1.ResumeLayout(False)
|
||||
Me.ToolStrip1.PerformLayout()
|
||||
Me.verifyBox.ResumeLayout(False)
|
||||
Me.verifyBox.PerformLayout()
|
||||
Me.ResumeLayout(False)
|
||||
Me.PerformLayout()
|
||||
|
||||
End Sub
|
||||
Friend WithEvents basicInfo As System.Windows.Forms.GroupBox
|
||||
Friend WithEvents Label1 As System.Windows.Forms.Label
|
||||
Friend WithEvents GroupBox1 As System.Windows.Forms.GroupBox
|
||||
Friend WithEvents dg_mtSeq As System.Windows.Forms.DataGridView
|
||||
Friend WithEvents cmbSeq As System.Windows.Forms.ComboBox
|
||||
Friend WithEvents cmbRev As System.Windows.Forms.ComboBox
|
||||
Friend WithEvents Label2 As System.Windows.Forms.Label
|
||||
Friend WithEvents ToolStrip1 As System.Windows.Forms.ToolStrip
|
||||
Friend WithEvents ts_new As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents ToolStripSeparator1 As System.Windows.Forms.ToolStripSeparator
|
||||
Friend WithEvents ts_edit As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents ToolStripSeparator2 As System.Windows.Forms.ToolStripSeparator
|
||||
Friend WithEvents ts_delete As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents ToolStripSeparator3 As System.Windows.Forms.ToolStripSeparator
|
||||
Friend WithEvents ts_revert As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents ToolStripSeparator5 As System.Windows.Forms.ToolStripSeparator
|
||||
Friend WithEvents ts_save As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents ToolStripSeparator4 As System.Windows.Forms.ToolStripSeparator
|
||||
Friend WithEvents ts_find As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents verifyBox As System.Windows.Forms.GroupBox
|
||||
Friend WithEvents Label3 As System.Windows.Forms.Label
|
||||
Friend WithEvents Label4 As System.Windows.Forms.Label
|
||||
Friend WithEvents txtVerDate As System.Windows.Forms.TextBox
|
||||
Friend WithEvents txtVerBy As System.Windows.Forms.TextBox
|
||||
Friend WithEvents btn_verify As System.Windows.Forms.Button
|
||||
End Class
|
@ -0,0 +1,104 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<asmv1:assembly xsi:schemaLocation="urn:schemas-microsoft-com:asm.v1 assembly.adaptive.xsd" manifestVersion="1.0" xmlns:asmv1="urn:schemas-microsoft-com:asm.v1" xmlns="urn:schemas-microsoft-com:asm.v2" xmlns:asmv2="urn:schemas-microsoft-com:asm.v2" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:co.v1="urn:schemas-microsoft-com:clickonce.v1" xmlns:asmv3="urn:schemas-microsoft-com:asm.v3" xmlns:dsig="http://www.w3.org/2000/09/xmldsig#" xmlns:co.v2="urn:schemas-microsoft-com:clickonce.v2">
|
||||
<asmv1:assemblyIdentity name="Kanban System.exe" version="1.0.0.25" publicKeyToken="5d07c66b26499fa2" language="neutral" processorArchitecture="msil" type="win32" />
|
||||
<application />
|
||||
<entryPoint>
|
||||
<assemblyIdentity name="Kanban System" version="1.0.0.0" language="neutral" processorArchitecture="msil" />
|
||||
<commandLine file="Kanban System.exe" parameters="" />
|
||||
</entryPoint>
|
||||
<trustInfo>
|
||||
<security>
|
||||
<applicationRequestMinimum>
|
||||
<PermissionSet Unrestricted="true" ID="Custom" SameSite="site" />
|
||||
<defaultAssemblyRequest permissionSetReference="Custom" />
|
||||
</applicationRequestMinimum>
|
||||
<requestedPrivileges xmlns="urn:schemas-microsoft-com:asm.v3">
|
||||
<!-- UAC Manifest Options
|
||||
If you want to change the Windows User Account Control level replace the
|
||||
requestedExecutionLevel node with one of the following.
|
||||
|
||||
<requestedExecutionLevel level="asInvoker" uiAccess="false" />
|
||||
<requestedExecutionLevel level="requireAdministrator" uiAccess="false" />
|
||||
<requestedExecutionLevel level="highestAvailable" uiAccess="false" />
|
||||
|
||||
Specifying requestedExecutionLevel node will disable file and registry virtualization.
|
||||
If you want to utilize File and Registry Virtualization for backward
|
||||
compatibility then delete the requestedExecutionLevel node.
|
||||
-->
|
||||
<requestedExecutionLevel level="asInvoker" uiAccess="false" />
|
||||
</requestedPrivileges>
|
||||
</security>
|
||||
</trustInfo>
|
||||
<dependency>
|
||||
<dependentOS>
|
||||
<osVersionInfo>
|
||||
<os majorVersion="4" minorVersion="10" buildNumber="0" servicePackMajor="0" />
|
||||
</osVersionInfo>
|
||||
</dependentOS>
|
||||
</dependency>
|
||||
<dependency>
|
||||
<dependentAssembly dependencyType="preRequisite" allowDelayedBinding="true">
|
||||
<assemblyIdentity name="Microsoft.Windows.CommonLanguageRuntime" version="2.0.50727.0" />
|
||||
</dependentAssembly>
|
||||
</dependency>
|
||||
<dependency>
|
||||
<dependentAssembly dependencyType="preRequisite" allowDelayedBinding="true">
|
||||
<assemblyIdentity name="Microsoft.ReportViewer.Common" version="10.0.0.0" publicKeyToken="B03F5F7F11D50A3A" language="neutral" processorArchitecture="msil" />
|
||||
</dependentAssembly>
|
||||
</dependency>
|
||||
<dependency>
|
||||
<dependentAssembly dependencyType="preRequisite" allowDelayedBinding="true">
|
||||
<assemblyIdentity name="Microsoft.ReportViewer.DataVisualization" version="10.0.0.0" publicKeyToken="B03F5F7F11D50A3A" language="neutral" processorArchitecture="msil" />
|
||||
</dependentAssembly>
|
||||
</dependency>
|
||||
<dependency>
|
||||
<dependentAssembly dependencyType="preRequisite" allowDelayedBinding="true">
|
||||
<assemblyIdentity name="Microsoft.ReportViewer.ProcessingObjectModel" version="10.0.0.0" publicKeyToken="B03F5F7F11D50A3A" language="neutral" processorArchitecture="msil" />
|
||||
</dependentAssembly>
|
||||
</dependency>
|
||||
<dependency>
|
||||
<dependentAssembly dependencyType="preRequisite" allowDelayedBinding="true">
|
||||
<assemblyIdentity name="Microsoft.ReportViewer.WinForms" version="10.0.0.0" publicKeyToken="B03F5F7F11D50A3A" language="neutral" processorArchitecture="msil" />
|
||||
</dependentAssembly>
|
||||
</dependency>
|
||||
<dependency>
|
||||
<dependentAssembly dependencyType="install" allowDelayedBinding="true" codebase="Interop.Microsoft.Office.Interop.Excel.dll" size="1544192">
|
||||
<assemblyIdentity name="Interop.Microsoft.Office.Interop.Excel" version="1.7.0.0" language="neutral" processorArchitecture="msil" />
|
||||
<hash>
|
||||
<dsig:Transforms>
|
||||
<dsig:Transform Algorithm="urn:schemas-microsoft-com:HashTransforms.Identity" />
|
||||
</dsig:Transforms>
|
||||
<dsig:DigestMethod Algorithm="http://www.w3.org/2000/09/xmldsig#sha1" />
|
||||
<dsig:DigestValue>7YA85eufIXItcsMaDGw0Skomhfw=</dsig:DigestValue>
|
||||
</hash>
|
||||
</dependentAssembly>
|
||||
</dependency>
|
||||
<dependency>
|
||||
<dependentAssembly dependencyType="install" allowDelayedBinding="true" codebase="Kanban System.exe" size="3449856">
|
||||
<assemblyIdentity name="Kanban System" version="1.0.0.0" language="neutral" processorArchitecture="msil" />
|
||||
<hash>
|
||||
<dsig:Transforms>
|
||||
<dsig:Transform Algorithm="urn:schemas-microsoft-com:HashTransforms.Identity" />
|
||||
</dsig:Transforms>
|
||||
<dsig:DigestMethod Algorithm="http://www.w3.org/2000/09/xmldsig#sha1" />
|
||||
<dsig:DigestValue>RZpF9ypMD0v28buCuXXH4Nlhf5Y=</dsig:DigestValue>
|
||||
</hash>
|
||||
</dependentAssembly>
|
||||
</dependency>
|
||||
<file name="Kanban System.exe.config" size="2969">
|
||||
<hash>
|
||||
<dsig:Transforms>
|
||||
<dsig:Transform Algorithm="urn:schemas-microsoft-com:HashTransforms.Identity" />
|
||||
</dsig:Transforms>
|
||||
<dsig:DigestMethod Algorithm="http://www.w3.org/2000/09/xmldsig#sha1" />
|
||||
<dsig:DigestValue>C9pAdhw8fwBinl452Gdw9ZjgnPk=</dsig:DigestValue>
|
||||
</hash>
|
||||
</file>
|
||||
<compatibility xmlns="urn:schemas-microsoft-com:compatibility.v1">
|
||||
<application>
|
||||
<!-- A list of all Windows versions that this application is designed to work with. Windows will automatically select the most compatible environment.-->
|
||||
<!-- If your application is designed to work with Windows 7, uncomment the following supportedOS node-->
|
||||
<!--<supportedOS Id="{35138b9a-5d96-4fbd-8e2d-a2440225f93a}"/>-->
|
||||
</application>
|
||||
</compatibility>
|
||||
<publisherIdentity name="CN=IONICS\franz.delomen" issuerKeyHash="bbd06e099f0d6067eaa95fc0a29d173cdf7ef6c7" /><Signature Id="StrongNameSignature" xmlns="http://www.w3.org/2000/09/xmldsig#"><SignedInfo><CanonicalizationMethod Algorithm="http://www.w3.org/2001/10/xml-exc-c14n#" /><SignatureMethod Algorithm="http://www.w3.org/2000/09/xmldsig#rsa-sha1" /><Reference URI=""><Transforms><Transform Algorithm="http://www.w3.org/2000/09/xmldsig#enveloped-signature" /><Transform Algorithm="http://www.w3.org/2001/10/xml-exc-c14n#" /></Transforms><DigestMethod Algorithm="http://www.w3.org/2000/09/xmldsig#sha1" /><DigestValue>kykYV7M/qNSysIhfpbYJnmK74fY=</DigestValue></Reference></SignedInfo><SignatureValue>iXmYMHUWOJrHnGPZVp4iNrURmk7K/gRZU7JR5BlCezcerd0M1lKMewjzDPGGTvPRhoOD6Hq+6oBYiIOGjyZcHMV62YXkZMGHK9skUywg1Ws/jY5Sk60uLmpovX/11MFgb6lsNM1UQzz956soIetfPJzWuucNqR0Ql1HYWpWJO5U=</SignatureValue><KeyInfo Id="StrongNameKeyInfo"><KeyValue><RSAKeyValue><Modulus>zzlNnkONlM4M+vRtennY42p0oPQdXOQ8T6g9AITLp3Xk/SVC5a/dxEkh2L6MFGbQGsl8qBMl+5MV2v9Pn4zHo+mnBe0KeuaiBZKrhgf+/YfLQidAuq7MIwzMnLqlb0pvqUKq1dtpDGjpjM9PsLyo5t3gvLl0pI8EFU4u0eMLGYs=</Modulus><Exponent>AQAB</Exponent></RSAKeyValue></KeyValue><msrel:RelData xmlns:msrel="http://schemas.microsoft.com/windows/rel/2005/reldata"><r:license xmlns:r="urn:mpeg:mpeg21:2003:01-REL-R-NS" xmlns:as="http://schemas.microsoft.com/windows/pki/2005/Authenticode"><r:grant><as:ManifestInformation Hash="f6e1bb629e09b6a55f88b0b2d4a83fb357182993" Description="" Url=""><as:assemblyIdentity name="Kanban System.exe" version="1.0.0.25" publicKeyToken="5d07c66b26499fa2" language="neutral" processorArchitecture="msil" type="win32" /></as:ManifestInformation><as:SignedBy /><as:AuthenticodePublisher><as:X509SubjectName>CN=IONICS\franz.delomen</as:X509SubjectName></as:AuthenticodePublisher></r:grant><r:issuer><Signature Id="AuthenticodeSignature" xmlns="http://www.w3.org/2000/09/xmldsig#"><SignedInfo><CanonicalizationMethod Algorithm="http://www.w3.org/2001/10/xml-exc-c14n#" /><SignatureMethod Algorithm="http://www.w3.org/2000/09/xmldsig#rsa-sha1" /><Reference URI=""><Transforms><Transform Algorithm="http://www.w3.org/2000/09/xmldsig#enveloped-signature" /><Transform Algorithm="http://www.w3.org/2001/10/xml-exc-c14n#" /></Transforms><DigestMethod Algorithm="http://www.w3.org/2000/09/xmldsig#sha1" /><DigestValue>DX61mU1WDETfCNOtiLUxUmx3wpI=</DigestValue></Reference></SignedInfo><SignatureValue>qp6H1lkbf2M2GjI6wHCPAiQHBJy9jdj+neZqx1EF0mFQ9BeTXqntZ7JufYl8MuhzCdO0cpzfpRU1DUNAbCWgu2vrKUOZYi4Pe5dh8hcewMVtJMhRRZKgeNs7q5EfE1jiNJ71nExNZrCzc81lof8kpzPVSLz+z9s5rrTrtZZR+k8=</SignatureValue><KeyInfo><KeyValue><RSAKeyValue><Modulus>zzlNnkONlM4M+vRtennY42p0oPQdXOQ8T6g9AITLp3Xk/SVC5a/dxEkh2L6MFGbQGsl8qBMl+5MV2v9Pn4zHo+mnBe0KeuaiBZKrhgf+/YfLQidAuq7MIwzMnLqlb0pvqUKq1dtpDGjpjM9PsLyo5t3gvLl0pI8EFU4u0eMLGYs=</Modulus><Exponent>AQAB</Exponent></RSAKeyValue></KeyValue><X509Data><X509Certificate>MIIB6TCCAVKgAwIBAgIQGB+RTAzS47VNDBz+bQd1AjANBgkqhkiG9w0BAQUFADAzMTEwLwYDVQQDHigASQBPAE4ASQBDAFMAXABmAHIAYQBuAHoALgBkAGUAbABvAG0AZQBuMB4XDTE1MDQyMzAzMTMwNloXDTE2MDQyMjA5MTMwNlowMzExMC8GA1UEAx4oAEkATwBOAEkAQwBTAFwAZgByAGEAbgB6AC4AZABlAGwAbwBtAGUAbjCBnzANBgkqhkiG9w0BAQEFAAOBjQAwgYkCgYEAzzlNnkONlM4M+vRtennY42p0oPQdXOQ8T6g9AITLp3Xk/SVC5a/dxEkh2L6MFGbQGsl8qBMl+5MV2v9Pn4zHo+mnBe0KeuaiBZKrhgf+/YfLQidAuq7MIwzMnLqlb0pvqUKq1dtpDGjpjM9PsLyo5t3gvLl0pI8EFU4u0eMLGYsCAwEAATANBgkqhkiG9w0BAQUFAAOBgQAPhufllRWQgSEM7L7BgV66S9sXXLE1AbOEk3J9uz5/vLAjAxD81JKy+2XJjAWlW6VmEQGI5nNxiMV+hEdZnzdboG9MZdhP5OrdOiPFhS8zsnccKagMcZHarAEAC7vDaD4H79+gfU4saX6q3CozhSho3zOLXCxFnR8SKcbBtO06pQ==</X509Certificate></X509Data></KeyInfo></Signature></r:issuer></r:license></msrel:RelData></KeyInfo></Signature></asmv1:assembly>
|
@ -0,0 +1,106 @@
|
||||
Imports System
|
||||
Imports System.Data
|
||||
Imports System.Data.SqlClient
|
||||
Imports System.IO
|
||||
Imports System.Security
|
||||
Imports System.Security.Cryptography
|
||||
Imports System.Text
|
||||
|
||||
Public Class Connection
|
||||
|
||||
#Region "Properties"
|
||||
|
||||
Dim _server As String
|
||||
Dim _database As String
|
||||
Dim _dbserver As String
|
||||
Dim _username As String
|
||||
Dim _password As String
|
||||
Dim _isActive As Boolean
|
||||
Dim _trusted As Boolean
|
||||
|
||||
Public Property server() As String
|
||||
Get
|
||||
Return _server
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_server = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property database() As String
|
||||
Get
|
||||
Return _database
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_database = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property dbserver() As String
|
||||
Get
|
||||
Return _dbserver
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_dbserver = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property username() As String
|
||||
Get
|
||||
Return _username
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_username = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property password() As String
|
||||
Get
|
||||
Return _password
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_password = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property isTrusted() As Boolean
|
||||
Get
|
||||
Return _trusted
|
||||
End Get
|
||||
Set(ByVal value As Boolean)
|
||||
_trusted = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public ReadOnly Property cnStr() As String
|
||||
Get
|
||||
Dim conn As String = String.Empty
|
||||
|
||||
Select Case Me.dbserver
|
||||
Case "DBF"
|
||||
conn = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
|
||||
"Data Source=" & Me.server & "\" & Me.database & ";" & _
|
||||
"Extended Properties=dBASE IV;" & _
|
||||
"User ID=" & Me.username & ";" & _
|
||||
"Password=" & Me.password & ";"
|
||||
Case "SQL Server"
|
||||
If Me.isTrusted = True Then
|
||||
conn = "Data Source=" & Me.server & ";" & _
|
||||
"Initial Catalog=" & Me.database & ";" & _
|
||||
"Trusted_Connection=True"
|
||||
Else
|
||||
conn = "Data Source=" & Me.server & ";" & _
|
||||
"Initial Catalog=" & Me.database & ";" & _
|
||||
"User ID=" & Me.username & ";" & _
|
||||
"Password=" & Me.password & ";"
|
||||
End If
|
||||
End Select
|
||||
|
||||
Return conn
|
||||
|
||||
End Get
|
||||
End Property
|
||||
|
||||
#End Region
|
||||
|
||||
End Class
|
@ -0,0 +1,243 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
||||
Partial Class PPReturnForm
|
||||
Inherits System.Windows.Forms.Form
|
||||
|
||||
'Form overrides dispose to clean up the component list.
|
||||
<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
|
||||
|
||||
'Required by the Windows Form Designer
|
||||
Private components As System.ComponentModel.IContainer
|
||||
|
||||
'NOTE: The following procedure is required by the Windows Form Designer
|
||||
'It can be modified using the Windows Form Designer.
|
||||
'Do not modify it using the code editor.
|
||||
<System.Diagnostics.DebuggerStepThrough()> _
|
||||
Private Sub InitializeComponent()
|
||||
Me.components = New System.ComponentModel.Container()
|
||||
Dim DataGridViewCellStyle3 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
|
||||
Me.GroupBox1 = New System.Windows.Forms.GroupBox()
|
||||
Me.txtPartDesc = New System.Windows.Forms.TextBox()
|
||||
Me.dtNow = New System.Windows.Forms.DateTimePicker()
|
||||
Me.txtOperator = New System.Windows.Forms.TextBox()
|
||||
Me.Label5 = New System.Windows.Forms.Label()
|
||||
Me.Label4 = New System.Windows.Forms.Label()
|
||||
Me.txtLotNum = New System.Windows.Forms.TextBox()
|
||||
Me.Label3 = New System.Windows.Forms.Label()
|
||||
Me.txtQuantity = New System.Windows.Forms.TextBox()
|
||||
Me.txtPartNo = New System.Windows.Forms.TextBox()
|
||||
Me.Label2 = New System.Windows.Forms.Label()
|
||||
Me.Label1 = New System.Windows.Forms.Label()
|
||||
Me.txtStart = New System.Windows.Forms.TextBox()
|
||||
Me.Timer1 = New System.Windows.Forms.Timer(Me.components)
|
||||
Me.GroupBox2 = New System.Windows.Forms.GroupBox()
|
||||
Me.dg_inventory = New System.Windows.Forms.DataGridView()
|
||||
Me.GroupBox1.SuspendLayout()
|
||||
Me.GroupBox2.SuspendLayout()
|
||||
CType(Me.dg_inventory, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'GroupBox1
|
||||
'
|
||||
Me.GroupBox1.Controls.Add(Me.txtPartDesc)
|
||||
Me.GroupBox1.Controls.Add(Me.dtNow)
|
||||
Me.GroupBox1.Controls.Add(Me.txtOperator)
|
||||
Me.GroupBox1.Controls.Add(Me.Label5)
|
||||
Me.GroupBox1.Controls.Add(Me.Label4)
|
||||
Me.GroupBox1.Controls.Add(Me.txtLotNum)
|
||||
Me.GroupBox1.Controls.Add(Me.Label3)
|
||||
Me.GroupBox1.Controls.Add(Me.txtQuantity)
|
||||
Me.GroupBox1.Controls.Add(Me.txtPartNo)
|
||||
Me.GroupBox1.Controls.Add(Me.Label2)
|
||||
Me.GroupBox1.Controls.Add(Me.Label1)
|
||||
Me.GroupBox1.Controls.Add(Me.txtStart)
|
||||
Me.GroupBox1.Font = New System.Drawing.Font("Calibri", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.GroupBox1.Location = New System.Drawing.Point(6, 2)
|
||||
Me.GroupBox1.Name = "GroupBox1"
|
||||
Me.GroupBox1.Size = New System.Drawing.Size(752, 159)
|
||||
Me.GroupBox1.TabIndex = 0
|
||||
Me.GroupBox1.TabStop = False
|
||||
Me.GroupBox1.Text = "Information"
|
||||
'
|
||||
'txtPartDesc
|
||||
'
|
||||
Me.txtPartDesc.Enabled = False
|
||||
Me.txtPartDesc.Font = New System.Drawing.Font("Calibri", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.txtPartDesc.Location = New System.Drawing.Point(378, 18)
|
||||
Me.txtPartDesc.Multiline = True
|
||||
Me.txtPartDesc.Name = "txtPartDesc"
|
||||
Me.txtPartDesc.Size = New System.Drawing.Size(340, 52)
|
||||
Me.txtPartDesc.TabIndex = 34
|
||||
'
|
||||
'dtNow
|
||||
'
|
||||
Me.dtNow.CustomFormat = "MM/dd/yyyy hh:mm:ss"
|
||||
Me.dtNow.Enabled = False
|
||||
Me.dtNow.Format = System.Windows.Forms.DateTimePickerFormat.Custom
|
||||
Me.dtNow.Location = New System.Drawing.Point(128, 99)
|
||||
Me.dtNow.Name = "dtNow"
|
||||
Me.dtNow.Size = New System.Drawing.Size(194, 23)
|
||||
Me.dtNow.TabIndex = 27
|
||||
'
|
||||
'txtOperator
|
||||
'
|
||||
Me.txtOperator.Enabled = False
|
||||
Me.txtOperator.Location = New System.Drawing.Point(128, 126)
|
||||
Me.txtOperator.Name = "txtOperator"
|
||||
Me.txtOperator.Size = New System.Drawing.Size(194, 23)
|
||||
Me.txtOperator.TabIndex = 25
|
||||
'
|
||||
'Label5
|
||||
'
|
||||
Me.Label5.AutoSize = True
|
||||
Me.Label5.Location = New System.Drawing.Point(91, 130)
|
||||
Me.Label5.Name = "Label5"
|
||||
Me.Label5.Size = New System.Drawing.Size(35, 15)
|
||||
Me.Label5.TabIndex = 26
|
||||
Me.Label5.Text = "User:"
|
||||
'
|
||||
'Label4
|
||||
'
|
||||
Me.Label4.AutoSize = True
|
||||
Me.Label4.Location = New System.Drawing.Point(91, 103)
|
||||
Me.Label4.Name = "Label4"
|
||||
Me.Label4.Size = New System.Drawing.Size(35, 15)
|
||||
Me.Label4.TabIndex = 24
|
||||
Me.Label4.Text = "Date:"
|
||||
'
|
||||
'txtLotNum
|
||||
'
|
||||
Me.txtLotNum.Enabled = False
|
||||
Me.txtLotNum.Location = New System.Drawing.Point(128, 72)
|
||||
Me.txtLotNum.Name = "txtLotNum"
|
||||
Me.txtLotNum.Size = New System.Drawing.Size(194, 23)
|
||||
Me.txtLotNum.TabIndex = 2
|
||||
'
|
||||
'Label3
|
||||
'
|
||||
Me.Label3.AutoSize = True
|
||||
Me.Label3.Location = New System.Drawing.Point(54, 76)
|
||||
Me.Label3.Name = "Label3"
|
||||
Me.Label3.Size = New System.Drawing.Size(72, 15)
|
||||
Me.Label3.TabIndex = 22
|
||||
Me.Label3.Text = "Lot Number:"
|
||||
'
|
||||
'txtQuantity
|
||||
'
|
||||
Me.txtQuantity.Location = New System.Drawing.Point(128, 45)
|
||||
Me.txtQuantity.Name = "txtQuantity"
|
||||
Me.txtQuantity.Size = New System.Drawing.Size(67, 23)
|
||||
Me.txtQuantity.TabIndex = 1
|
||||
'
|
||||
'txtPartNo
|
||||
'
|
||||
Me.txtPartNo.Enabled = False
|
||||
Me.txtPartNo.Location = New System.Drawing.Point(128, 18)
|
||||
Me.txtPartNo.Name = "txtPartNo"
|
||||
Me.txtPartNo.Size = New System.Drawing.Size(243, 23)
|
||||
Me.txtPartNo.TabIndex = 0
|
||||
'
|
||||
'Label2
|
||||
'
|
||||
Me.Label2.AutoSize = True
|
||||
Me.Label2.Location = New System.Drawing.Point(68, 49)
|
||||
Me.Label2.Name = "Label2"
|
||||
Me.Label2.Size = New System.Drawing.Size(58, 15)
|
||||
Me.Label2.TabIndex = 1
|
||||
Me.Label2.Text = "Quantity:"
|
||||
'
|
||||
'Label1
|
||||
'
|
||||
Me.Label1.AutoSize = True
|
||||
Me.Label1.Location = New System.Drawing.Point(47, 22)
|
||||
Me.Label1.Name = "Label1"
|
||||
Me.Label1.Size = New System.Drawing.Size(79, 15)
|
||||
Me.Label1.TabIndex = 0
|
||||
Me.Label1.Text = "Part Number:"
|
||||
'
|
||||
'txtStart
|
||||
'
|
||||
Me.txtStart.Location = New System.Drawing.Point(128, 18)
|
||||
Me.txtStart.Name = "txtStart"
|
||||
Me.txtStart.Size = New System.Drawing.Size(243, 23)
|
||||
Me.txtStart.TabIndex = 0
|
||||
'
|
||||
'Timer1
|
||||
'
|
||||
'
|
||||
'GroupBox2
|
||||
'
|
||||
Me.GroupBox2.Controls.Add(Me.dg_inventory)
|
||||
Me.GroupBox2.Font = New System.Drawing.Font("Calibri", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.GroupBox2.Location = New System.Drawing.Point(6, 164)
|
||||
Me.GroupBox2.Name = "GroupBox2"
|
||||
Me.GroupBox2.Size = New System.Drawing.Size(752, 427)
|
||||
Me.GroupBox2.TabIndex = 4
|
||||
Me.GroupBox2.TabStop = False
|
||||
Me.GroupBox2.Text = "Inventory Transactions Per Part Number"
|
||||
'
|
||||
'dg_inventory
|
||||
'
|
||||
Me.dg_inventory.AllowUserToAddRows = False
|
||||
Me.dg_inventory.AllowUserToDeleteRows = False
|
||||
Me.dg_inventory.AllowUserToResizeColumns = False
|
||||
Me.dg_inventory.AllowUserToResizeRows = False
|
||||
DataGridViewCellStyle3.BackColor = System.Drawing.SystemColors.InactiveCaptionText
|
||||
Me.dg_inventory.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle3
|
||||
Me.dg_inventory.BackgroundColor = System.Drawing.SystemColors.Control
|
||||
Me.dg_inventory.BorderStyle = System.Windows.Forms.BorderStyle.Fixed3D
|
||||
Me.dg_inventory.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
|
||||
Me.dg_inventory.GridColor = System.Drawing.Color.SteelBlue
|
||||
Me.dg_inventory.Location = New System.Drawing.Point(6, 15)
|
||||
Me.dg_inventory.Name = "dg_inventory"
|
||||
Me.dg_inventory.RowHeadersVisible = False
|
||||
Me.dg_inventory.RowHeadersWidth = 20
|
||||
Me.dg_inventory.RowHeadersWidthSizeMode = System.Windows.Forms.DataGridViewRowHeadersWidthSizeMode.DisableResizing
|
||||
Me.dg_inventory.Size = New System.Drawing.Size(740, 406)
|
||||
Me.dg_inventory.TabIndex = 17
|
||||
'
|
||||
'PPReturnForm
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.ClientSize = New System.Drawing.Size(764, 594)
|
||||
Me.ControlBox = False
|
||||
Me.Controls.Add(Me.GroupBox1)
|
||||
Me.Controls.Add(Me.GroupBox2)
|
||||
Me.Font = New System.Drawing.Font("Calibri", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedSingle
|
||||
Me.Name = "PPReturnForm"
|
||||
Me.StartPosition = System.Windows.Forms.FormStartPosition.Manual
|
||||
Me.Text = "Parts Preparation Return"
|
||||
Me.GroupBox1.ResumeLayout(False)
|
||||
Me.GroupBox1.PerformLayout()
|
||||
Me.GroupBox2.ResumeLayout(False)
|
||||
CType(Me.dg_inventory, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.ResumeLayout(False)
|
||||
|
||||
End Sub
|
||||
Friend WithEvents GroupBox1 As System.Windows.Forms.GroupBox
|
||||
Friend WithEvents txtQuantity As System.Windows.Forms.TextBox
|
||||
Friend WithEvents txtPartNo As System.Windows.Forms.TextBox
|
||||
Friend WithEvents Label2 As System.Windows.Forms.Label
|
||||
Friend WithEvents Label1 As System.Windows.Forms.Label
|
||||
Friend WithEvents txtLotNum As System.Windows.Forms.TextBox
|
||||
Friend WithEvents Label3 As System.Windows.Forms.Label
|
||||
Friend WithEvents dtNow As System.Windows.Forms.DateTimePicker
|
||||
Friend WithEvents txtOperator As System.Windows.Forms.TextBox
|
||||
Friend WithEvents Label5 As System.Windows.Forms.Label
|
||||
Friend WithEvents Label4 As System.Windows.Forms.Label
|
||||
Friend WithEvents Timer1 As System.Windows.Forms.Timer
|
||||
Friend WithEvents GroupBox2 As System.Windows.Forms.GroupBox
|
||||
Friend WithEvents txtStart As System.Windows.Forms.TextBox
|
||||
Friend WithEvents txtPartDesc As System.Windows.Forms.TextBox
|
||||
Friend WithEvents dg_inventory As System.Windows.Forms.DataGridView
|
||||
End Class
|
@ -0,0 +1,121 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
||||
Partial Class uploadMcSeq
|
||||
Inherits System.Windows.Forms.Form
|
||||
|
||||
'Form overrides dispose to clean up the component list.
|
||||
<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
|
||||
|
||||
'Required by the Windows Form Designer
|
||||
Private components As System.ComponentModel.IContainer
|
||||
|
||||
'NOTE: The following procedure is required by the Windows Form Designer
|
||||
'It can be modified using the Windows Form Designer.
|
||||
'Do not modify it using the code editor.
|
||||
<System.Diagnostics.DebuggerStepThrough()> _
|
||||
Private Sub InitializeComponent()
|
||||
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(uploadMcSeq))
|
||||
Me.GroupBox1 = New System.Windows.Forms.GroupBox()
|
||||
Me.btn_cancel = New System.Windows.Forms.Button()
|
||||
Me.btn_upload = New System.Windows.Forms.Button()
|
||||
Me.btn_browse = New System.Windows.Forms.Button()
|
||||
Me.txtFName = New System.Windows.Forms.TextBox()
|
||||
Me.Label1 = New System.Windows.Forms.Label()
|
||||
Me.OpenFileDialog1 = New System.Windows.Forms.OpenFileDialog()
|
||||
Me.GroupBox1.SuspendLayout()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'GroupBox1
|
||||
'
|
||||
Me.GroupBox1.Controls.Add(Me.btn_cancel)
|
||||
Me.GroupBox1.Controls.Add(Me.btn_upload)
|
||||
Me.GroupBox1.Controls.Add(Me.btn_browse)
|
||||
Me.GroupBox1.Controls.Add(Me.txtFName)
|
||||
Me.GroupBox1.Controls.Add(Me.Label1)
|
||||
Me.GroupBox1.Location = New System.Drawing.Point(0, 2)
|
||||
Me.GroupBox1.Name = "GroupBox1"
|
||||
Me.GroupBox1.Size = New System.Drawing.Size(406, 117)
|
||||
Me.GroupBox1.TabIndex = 0
|
||||
Me.GroupBox1.TabStop = False
|
||||
Me.GroupBox1.Text = "Choose File to Upload"
|
||||
'
|
||||
'btn_cancel
|
||||
'
|
||||
Me.btn_cancel.Location = New System.Drawing.Point(214, 86)
|
||||
Me.btn_cancel.Name = "btn_cancel"
|
||||
Me.btn_cancel.Size = New System.Drawing.Size(75, 23)
|
||||
Me.btn_cancel.TabIndex = 4
|
||||
Me.btn_cancel.Text = "Cancel"
|
||||
Me.btn_cancel.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_upload
|
||||
'
|
||||
Me.btn_upload.Location = New System.Drawing.Point(111, 86)
|
||||
Me.btn_upload.Name = "btn_upload"
|
||||
Me.btn_upload.Size = New System.Drawing.Size(75, 23)
|
||||
Me.btn_upload.TabIndex = 3
|
||||
Me.btn_upload.Text = "Upload File"
|
||||
Me.btn_upload.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_browse
|
||||
'
|
||||
Me.btn_browse.Image = CType(resources.GetObject("btn_browse.Image"), System.Drawing.Image)
|
||||
Me.btn_browse.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
|
||||
Me.btn_browse.Location = New System.Drawing.Point(358, 49)
|
||||
Me.btn_browse.Name = "btn_browse"
|
||||
Me.btn_browse.Size = New System.Drawing.Size(32, 32)
|
||||
Me.btn_browse.TabIndex = 2
|
||||
Me.btn_browse.UseVisualStyleBackColor = True
|
||||
'
|
||||
'txtFName
|
||||
'
|
||||
Me.txtFName.Location = New System.Drawing.Point(37, 56)
|
||||
Me.txtFName.Name = "txtFName"
|
||||
Me.txtFName.Size = New System.Drawing.Size(317, 20)
|
||||
Me.txtFName.TabIndex = 1
|
||||
'
|
||||
'Label1
|
||||
'
|
||||
Me.Label1.AutoSize = True
|
||||
Me.Label1.Location = New System.Drawing.Point(11, 57)
|
||||
Me.Label1.Name = "Label1"
|
||||
Me.Label1.Size = New System.Drawing.Size(26, 13)
|
||||
Me.Label1.TabIndex = 0
|
||||
Me.Label1.Text = "File:"
|
||||
'
|
||||
'OpenFileDialog1
|
||||
'
|
||||
Me.OpenFileDialog1.FileName = "OpenFileDialog1"
|
||||
'
|
||||
'uploadMcSeq
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.ClientSize = New System.Drawing.Size(405, 119)
|
||||
Me.ControlBox = False
|
||||
Me.Controls.Add(Me.GroupBox1)
|
||||
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedSingle
|
||||
Me.Name = "uploadMcSeq"
|
||||
Me.StartPosition = System.Windows.Forms.FormStartPosition.Manual
|
||||
Me.Text = "Upload Machine Sequence"
|
||||
Me.GroupBox1.ResumeLayout(False)
|
||||
Me.GroupBox1.PerformLayout()
|
||||
Me.ResumeLayout(False)
|
||||
|
||||
End Sub
|
||||
Friend WithEvents GroupBox1 As System.Windows.Forms.GroupBox
|
||||
Friend WithEvents txtFName As System.Windows.Forms.TextBox
|
||||
Friend WithEvents Label1 As System.Windows.Forms.Label
|
||||
Friend WithEvents OpenFileDialog1 As System.Windows.Forms.OpenFileDialog
|
||||
Friend WithEvents btn_browse As System.Windows.Forms.Button
|
||||
Friend WithEvents btn_cancel As System.Windows.Forms.Button
|
||||
Friend WithEvents btn_upload As System.Windows.Forms.Button
|
||||
End Class
|
@ -0,0 +1,315 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
||||
Partial Class machineForm
|
||||
Inherits System.Windows.Forms.Form
|
||||
|
||||
'Form overrides dispose to clean up the component list.
|
||||
<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
|
||||
|
||||
'Required by the Windows Form Designer
|
||||
Private components As System.ComponentModel.IContainer
|
||||
|
||||
'NOTE: The following procedure is required by the Windows Form Designer
|
||||
'It can be modified using the Windows Form Designer.
|
||||
'Do not modify it using the code editor.
|
||||
<System.Diagnostics.DebuggerStepThrough()> _
|
||||
Private Sub InitializeComponent()
|
||||
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(machineForm))
|
||||
Me.GroupBox1 = New System.Windows.Forms.GroupBox()
|
||||
Me.txtLine = New System.Windows.Forms.TextBox()
|
||||
Me.Label6 = New System.Windows.Forms.Label()
|
||||
Me.cmbPlant = New System.Windows.Forms.ComboBox()
|
||||
Me.Label4 = New System.Windows.Forms.Label()
|
||||
Me.txtMchModel = New System.Windows.Forms.TextBox()
|
||||
Me.Label3 = New System.Windows.Forms.Label()
|
||||
Me.cbActive = New System.Windows.Forms.CheckBox()
|
||||
Me.txtMchName = New System.Windows.Forms.TextBox()
|
||||
Me.txtMchCode = New System.Windows.Forms.TextBox()
|
||||
Me.Label2 = New System.Windows.Forms.Label()
|
||||
Me.Label1 = New System.Windows.Forms.Label()
|
||||
Me.btn_find = New System.Windows.Forms.Button()
|
||||
Me.ts_new = New System.Windows.Forms.ToolStripButton()
|
||||
Me.ToolStripSeparator1 = New System.Windows.Forms.ToolStripSeparator()
|
||||
Me.ts_edit = New System.Windows.Forms.ToolStripButton()
|
||||
Me.ToolStripSeparator2 = New System.Windows.Forms.ToolStripSeparator()
|
||||
Me.ts_delete = New System.Windows.Forms.ToolStripButton()
|
||||
Me.ToolStripSeparator3 = New System.Windows.Forms.ToolStripSeparator()
|
||||
Me.ts_find = New System.Windows.Forms.ToolStripButton()
|
||||
Me.ToolStripSeparator4 = New System.Windows.Forms.ToolStripSeparator()
|
||||
Me.ts_save = New System.Windows.Forms.ToolStripButton()
|
||||
Me.ToolStrip1 = New System.Windows.Forms.ToolStrip()
|
||||
Me.ts_revert = New System.Windows.Forms.ToolStripButton()
|
||||
Me.ToolStripSeparator5 = New System.Windows.Forms.ToolStripSeparator()
|
||||
Me.GroupBox1.SuspendLayout()
|
||||
Me.ToolStrip1.SuspendLayout()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'GroupBox1
|
||||
'
|
||||
Me.GroupBox1.Controls.Add(Me.txtLine)
|
||||
Me.GroupBox1.Controls.Add(Me.Label6)
|
||||
Me.GroupBox1.Controls.Add(Me.cmbPlant)
|
||||
Me.GroupBox1.Controls.Add(Me.Label4)
|
||||
Me.GroupBox1.Controls.Add(Me.txtMchModel)
|
||||
Me.GroupBox1.Controls.Add(Me.Label3)
|
||||
Me.GroupBox1.Controls.Add(Me.cbActive)
|
||||
Me.GroupBox1.Controls.Add(Me.txtMchName)
|
||||
Me.GroupBox1.Controls.Add(Me.txtMchCode)
|
||||
Me.GroupBox1.Controls.Add(Me.Label2)
|
||||
Me.GroupBox1.Controls.Add(Me.Label1)
|
||||
Me.GroupBox1.Controls.Add(Me.btn_find)
|
||||
Me.GroupBox1.Font = New System.Drawing.Font("Calibri", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.GroupBox1.Location = New System.Drawing.Point(6, 27)
|
||||
Me.GroupBox1.Name = "GroupBox1"
|
||||
Me.GroupBox1.Size = New System.Drawing.Size(499, 156)
|
||||
Me.GroupBox1.TabIndex = 0
|
||||
Me.GroupBox1.TabStop = False
|
||||
Me.GroupBox1.Text = "Information"
|
||||
'
|
||||
'txtLine
|
||||
'
|
||||
Me.txtLine.Enabled = False
|
||||
Me.txtLine.Location = New System.Drawing.Point(124, 126)
|
||||
Me.txtLine.Name = "txtLine"
|
||||
Me.txtLine.Size = New System.Drawing.Size(76, 23)
|
||||
Me.txtLine.TabIndex = 4
|
||||
'
|
||||
'Label6
|
||||
'
|
||||
Me.Label6.AutoSize = True
|
||||
Me.Label6.Location = New System.Drawing.Point(89, 130)
|
||||
Me.Label6.Name = "Label6"
|
||||
Me.Label6.Size = New System.Drawing.Size(32, 15)
|
||||
Me.Label6.TabIndex = 27
|
||||
Me.Label6.Text = "Line:"
|
||||
'
|
||||
'cmbPlant
|
||||
'
|
||||
Me.cmbPlant.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
|
||||
Me.cmbPlant.Enabled = False
|
||||
Me.cmbPlant.FormattingEnabled = True
|
||||
Me.cmbPlant.Items.AddRange(New Object() {"", "Administrator", "Encoder", "Generator", "Guest"})
|
||||
Me.cmbPlant.Location = New System.Drawing.Point(124, 100)
|
||||
Me.cmbPlant.Name = "cmbPlant"
|
||||
Me.cmbPlant.Size = New System.Drawing.Size(159, 23)
|
||||
Me.cmbPlant.TabIndex = 3
|
||||
'
|
||||
'Label4
|
||||
'
|
||||
Me.Label4.AutoSize = True
|
||||
Me.Label4.Location = New System.Drawing.Point(83, 105)
|
||||
Me.Label4.Name = "Label4"
|
||||
Me.Label4.Size = New System.Drawing.Size(39, 15)
|
||||
Me.Label4.TabIndex = 25
|
||||
Me.Label4.Text = "Plant:"
|
||||
'
|
||||
'txtMchModel
|
||||
'
|
||||
Me.txtMchModel.Enabled = False
|
||||
Me.txtMchModel.Location = New System.Drawing.Point(124, 74)
|
||||
Me.txtMchModel.Name = "txtMchModel"
|
||||
Me.txtMchModel.Size = New System.Drawing.Size(159, 23)
|
||||
Me.txtMchModel.TabIndex = 2
|
||||
'
|
||||
'Label3
|
||||
'
|
||||
Me.Label3.AutoSize = True
|
||||
Me.Label3.Location = New System.Drawing.Point(25, 79)
|
||||
Me.Label3.Name = "Label3"
|
||||
Me.Label3.Size = New System.Drawing.Size(96, 15)
|
||||
Me.Label3.TabIndex = 22
|
||||
Me.Label3.Text = "Machine Model:"
|
||||
'
|
||||
'cbActive
|
||||
'
|
||||
Me.cbActive.AutoSize = True
|
||||
Me.cbActive.Enabled = False
|
||||
Me.cbActive.Location = New System.Drawing.Point(298, 21)
|
||||
Me.cbActive.Name = "cbActive"
|
||||
Me.cbActive.Size = New System.Drawing.Size(59, 19)
|
||||
Me.cbActive.TabIndex = 6
|
||||
Me.cbActive.Text = "Active"
|
||||
Me.cbActive.UseVisualStyleBackColor = True
|
||||
'
|
||||
'txtMchName
|
||||
'
|
||||
Me.txtMchName.Enabled = False
|
||||
Me.txtMchName.Location = New System.Drawing.Point(124, 48)
|
||||
Me.txtMchName.Name = "txtMchName"
|
||||
Me.txtMchName.Size = New System.Drawing.Size(159, 23)
|
||||
Me.txtMchName.TabIndex = 1
|
||||
'
|
||||
'txtMchCode
|
||||
'
|
||||
Me.txtMchCode.Enabled = False
|
||||
Me.txtMchCode.Location = New System.Drawing.Point(124, 21)
|
||||
Me.txtMchCode.Name = "txtMchCode"
|
||||
Me.txtMchCode.Size = New System.Drawing.Size(159, 23)
|
||||
Me.txtMchCode.TabIndex = 0
|
||||
'
|
||||
'Label2
|
||||
'
|
||||
Me.Label2.AutoSize = True
|
||||
Me.Label2.Location = New System.Drawing.Point(29, 51)
|
||||
Me.Label2.Name = "Label2"
|
||||
Me.Label2.Size = New System.Drawing.Size(92, 15)
|
||||
Me.Label2.TabIndex = 1
|
||||
Me.Label2.Text = "Machine Name:"
|
||||
'
|
||||
'Label1
|
||||
'
|
||||
Me.Label1.AutoSize = True
|
||||
Me.Label1.Location = New System.Drawing.Point(33, 24)
|
||||
Me.Label1.Name = "Label1"
|
||||
Me.Label1.Size = New System.Drawing.Size(88, 15)
|
||||
Me.Label1.TabIndex = 0
|
||||
Me.Label1.Text = "Machine Code:"
|
||||
'
|
||||
'btn_find
|
||||
'
|
||||
Me.btn_find.Location = New System.Drawing.Point(296, 19)
|
||||
Me.btn_find.Name = "btn_find"
|
||||
Me.btn_find.Size = New System.Drawing.Size(75, 23)
|
||||
Me.btn_find.TabIndex = 7
|
||||
Me.btn_find.Text = "GO"
|
||||
Me.btn_find.UseVisualStyleBackColor = True
|
||||
'
|
||||
'ts_new
|
||||
'
|
||||
Me.ts_new.Image = CType(resources.GetObject("ts_new.Image"), System.Drawing.Image)
|
||||
Me.ts_new.ImageTransparentColor = System.Drawing.Color.Magenta
|
||||
Me.ts_new.Name = "ts_new"
|
||||
Me.ts_new.Size = New System.Drawing.Size(59, 22)
|
||||
Me.ts_new.Text = "Insert"
|
||||
'
|
||||
'ToolStripSeparator1
|
||||
'
|
||||
Me.ToolStripSeparator1.Name = "ToolStripSeparator1"
|
||||
Me.ToolStripSeparator1.Size = New System.Drawing.Size(6, 25)
|
||||
'
|
||||
'ts_edit
|
||||
'
|
||||
Me.ts_edit.Image = CType(resources.GetObject("ts_edit.Image"), System.Drawing.Image)
|
||||
Me.ts_edit.ImageTransparentColor = System.Drawing.Color.Magenta
|
||||
Me.ts_edit.Name = "ts_edit"
|
||||
Me.ts_edit.Size = New System.Drawing.Size(67, 22)
|
||||
Me.ts_edit.Text = "Update"
|
||||
'
|
||||
'ToolStripSeparator2
|
||||
'
|
||||
Me.ToolStripSeparator2.Name = "ToolStripSeparator2"
|
||||
Me.ToolStripSeparator2.Size = New System.Drawing.Size(6, 25)
|
||||
'
|
||||
'ts_delete
|
||||
'
|
||||
Me.ts_delete.Image = CType(resources.GetObject("ts_delete.Image"), System.Drawing.Image)
|
||||
Me.ts_delete.ImageTransparentColor = System.Drawing.Color.Magenta
|
||||
Me.ts_delete.Name = "ts_delete"
|
||||
Me.ts_delete.Size = New System.Drawing.Size(64, 22)
|
||||
Me.ts_delete.Text = "Delete"
|
||||
'
|
||||
'ToolStripSeparator3
|
||||
'
|
||||
Me.ToolStripSeparator3.Name = "ToolStripSeparator3"
|
||||
Me.ToolStripSeparator3.Size = New System.Drawing.Size(6, 25)
|
||||
'
|
||||
'ts_find
|
||||
'
|
||||
Me.ts_find.Image = CType(resources.GetObject("ts_find.Image"), System.Drawing.Image)
|
||||
Me.ts_find.ImageTransparentColor = System.Drawing.Color.Magenta
|
||||
Me.ts_find.Name = "ts_find"
|
||||
Me.ts_find.Size = New System.Drawing.Size(51, 22)
|
||||
Me.ts_find.Text = "Find"
|
||||
'
|
||||
'ToolStripSeparator4
|
||||
'
|
||||
Me.ToolStripSeparator4.Name = "ToolStripSeparator4"
|
||||
Me.ToolStripSeparator4.Size = New System.Drawing.Size(6, 25)
|
||||
'
|
||||
'ts_save
|
||||
'
|
||||
Me.ts_save.Enabled = False
|
||||
Me.ts_save.Image = CType(resources.GetObject("ts_save.Image"), System.Drawing.Image)
|
||||
Me.ts_save.ImageTransparentColor = System.Drawing.Color.Magenta
|
||||
Me.ts_save.Name = "ts_save"
|
||||
Me.ts_save.Size = New System.Drawing.Size(81, 22)
|
||||
Me.ts_save.Text = "Save Data"
|
||||
'
|
||||
'ToolStrip1
|
||||
'
|
||||
Me.ToolStrip1.Font = New System.Drawing.Font("Calibri", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.ToolStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ts_new, Me.ToolStripSeparator1, Me.ts_edit, Me.ToolStripSeparator2, Me.ts_delete, Me.ToolStripSeparator3, Me.ts_revert, Me.ToolStripSeparator5, Me.ts_save, Me.ToolStripSeparator4, Me.ts_find})
|
||||
Me.ToolStrip1.Location = New System.Drawing.Point(0, 0)
|
||||
Me.ToolStrip1.Name = "ToolStrip1"
|
||||
Me.ToolStrip1.Size = New System.Drawing.Size(512, 25)
|
||||
Me.ToolStrip1.TabIndex = 3
|
||||
'
|
||||
'ts_revert
|
||||
'
|
||||
Me.ts_revert.Enabled = False
|
||||
Me.ts_revert.Image = CType(resources.GetObject("ts_revert.Image"), System.Drawing.Image)
|
||||
Me.ts_revert.ImageTransparentColor = System.Drawing.Color.Magenta
|
||||
Me.ts_revert.Name = "ts_revert"
|
||||
Me.ts_revert.Size = New System.Drawing.Size(61, 22)
|
||||
Me.ts_revert.Text = "Revert"
|
||||
'
|
||||
'ToolStripSeparator5
|
||||
'
|
||||
Me.ToolStripSeparator5.Name = "ToolStripSeparator5"
|
||||
Me.ToolStripSeparator5.Size = New System.Drawing.Size(6, 25)
|
||||
'
|
||||
'machineForm
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.ClientSize = New System.Drawing.Size(512, 186)
|
||||
Me.ControlBox = False
|
||||
Me.Controls.Add(Me.GroupBox1)
|
||||
Me.Controls.Add(Me.ToolStrip1)
|
||||
Me.Font = New System.Drawing.Font("Calibri", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedSingle
|
||||
Me.Name = "machineForm"
|
||||
Me.StartPosition = System.Windows.Forms.FormStartPosition.Manual
|
||||
Me.Text = "Machine Maintenance"
|
||||
Me.GroupBox1.ResumeLayout(False)
|
||||
Me.GroupBox1.PerformLayout()
|
||||
Me.ToolStrip1.ResumeLayout(False)
|
||||
Me.ToolStrip1.PerformLayout()
|
||||
Me.ResumeLayout(False)
|
||||
Me.PerformLayout()
|
||||
|
||||
End Sub
|
||||
Friend WithEvents GroupBox1 As System.Windows.Forms.GroupBox
|
||||
Friend WithEvents cbActive As System.Windows.Forms.CheckBox
|
||||
Friend WithEvents txtMchName As System.Windows.Forms.TextBox
|
||||
Friend WithEvents txtMchCode As System.Windows.Forms.TextBox
|
||||
Friend WithEvents Label2 As System.Windows.Forms.Label
|
||||
Friend WithEvents Label1 As System.Windows.Forms.Label
|
||||
Friend WithEvents ts_new As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents ToolStripSeparator1 As System.Windows.Forms.ToolStripSeparator
|
||||
Friend WithEvents ts_edit As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents ToolStripSeparator2 As System.Windows.Forms.ToolStripSeparator
|
||||
Friend WithEvents ts_delete As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents ToolStripSeparator3 As System.Windows.Forms.ToolStripSeparator
|
||||
Friend WithEvents ts_find As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents ToolStripSeparator4 As System.Windows.Forms.ToolStripSeparator
|
||||
Friend WithEvents ts_save As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents ToolStrip1 As System.Windows.Forms.ToolStrip
|
||||
Friend WithEvents btn_find As System.Windows.Forms.Button
|
||||
Friend WithEvents ts_revert As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents ToolStripSeparator5 As System.Windows.Forms.ToolStripSeparator
|
||||
Friend WithEvents cmbPlant As System.Windows.Forms.ComboBox
|
||||
Friend WithEvents Label4 As System.Windows.Forms.Label
|
||||
Friend WithEvents txtMchModel As System.Windows.Forms.TextBox
|
||||
Friend WithEvents Label3 As System.Windows.Forms.Label
|
||||
Friend WithEvents Label6 As System.Windows.Forms.Label
|
||||
Friend WithEvents txtLine As System.Windows.Forms.TextBox
|
||||
End Class
|
@ -0,0 +1,95 @@
|
||||
Imports System.IO
|
||||
Public Class uploadMcSeq
|
||||
|
||||
Private Sub uploadMcSeq_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
|
||||
Me.MdiParent = mainForm
|
||||
Control.CheckForIllegalCrossThreadCalls = False
|
||||
Me.Top = 5
|
||||
Me.Left = 5
|
||||
End Sub
|
||||
|
||||
Private Function browseFile() As String
|
||||
Dim stFileName As String = String.Empty
|
||||
Dim openFileDialog1 As New OpenFileDialog
|
||||
|
||||
openFileDialog1.InitialDirectory = "C:\"
|
||||
openFileDialog1.Title = "Open Machine Sequence Text File"
|
||||
openFileDialog1.Filter = "Text files (*.txt)|*.txt"
|
||||
openFileDialog1.FilterIndex = 1
|
||||
openFileDialog1.RestoreDirectory = True
|
||||
|
||||
If openFileDialog1.ShowDialog() = DialogResult.OK Then
|
||||
stFileName = openFileDialog1.FileName
|
||||
End If
|
||||
Return stFileName
|
||||
End Function
|
||||
|
||||
Private Sub btn_browse_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn_browse.Click
|
||||
txtFName.Text = browseFile()
|
||||
End Sub
|
||||
|
||||
Private Sub btn_cancel_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn_cancel.Click
|
||||
Me.Close()
|
||||
End Sub
|
||||
|
||||
Private Sub btn_upload_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn_upload.Click
|
||||
getfilecontents(txtFName.Text)
|
||||
End Sub
|
||||
|
||||
Private Sub getfilecontents(ByVal fullpath As String)
|
||||
Dim strcontent As String = String.Empty
|
||||
Dim line() As String
|
||||
Dim objreader As StreamReader
|
||||
Dim seq As New Sequence
|
||||
Dim addHeader As Boolean = False
|
||||
|
||||
Try
|
||||
objreader = New StreamReader(fullpath)
|
||||
strcontent = objreader.ReadLine 'disregard header
|
||||
strcontent = objreader.ReadLine
|
||||
While strcontent <> ""
|
||||
line = Split(strcontent, vbTab)
|
||||
seq.sequence = line(0)
|
||||
seq.revision = line(1)
|
||||
seq.machine = line(2)
|
||||
seq.model = line(3)
|
||||
seq.pcbside = line(4)
|
||||
seq.partno = line(5)
|
||||
seq.modules = line(6)
|
||||
seq.feeder = line(7)
|
||||
seq.feederType = line(8)
|
||||
seq.topsdloc = line(9)
|
||||
seq.fsbsqty = line(10)
|
||||
seq.desc1 = line(11)
|
||||
seq.desc2 = line(12)
|
||||
seq.topmark = line(13)
|
||||
seq.remarks = line(14)
|
||||
seq.prepby = loginForm.username
|
||||
seq.checkby = String.Empty
|
||||
seq.chkdate = String.Empty
|
||||
seq.updtime = DateTime.Now
|
||||
If addHeader = False Then
|
||||
If seq.addHeader() Then
|
||||
addHeader = True
|
||||
Else
|
||||
MessageBox.Show("An error was encountered.", "Upload Sequence", MessageBoxButtons.OK, MessageBoxIcon.Error)
|
||||
Exit Sub
|
||||
End If
|
||||
End If
|
||||
If Not seq.addDetail() Then
|
||||
MessageBox.Show("An error was encountered.", "Upload Sequence", MessageBoxButtons.OK, MessageBoxIcon.Error)
|
||||
Exit Sub
|
||||
End If
|
||||
strcontent = objreader.ReadLine
|
||||
End While
|
||||
|
||||
objreader.Close()
|
||||
MessageBox.Show("Successfully uploaded!")
|
||||
txtFName.Text = String.Empty
|
||||
mcSeqForm.getSequence()
|
||||
Catch ex As Exception
|
||||
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
End Class
|
Binary file not shown.
@ -0,0 +1,55 @@
|
||||
<?xml version="1.0" encoding="UTF-8"?><?xml-stylesheet type='text/xsl' href='_UpgradeReport_Files/UpgradeReport.xslt'?><UpgradeLog>
|
||||
<Properties><Property Name="Solution" Value="Mounting Sequence">
|
||||
</Property><Property Name="Solution File" Value="C:\Projects\Mounting Sequence\Mounting Sequence.sln">
|
||||
</Property><Property Name="User Options File" Value="C:\Projects\Mounting Sequence\Mounting Sequence.suo">
|
||||
</Property><Property Name="Date" Value="Tuesday, January 18, 2011">
|
||||
</Property><Property Name="Time" Value="13:22 PM">
|
||||
</Property></Properties><Event ErrorLevel="0" Project="" Source="Mounting Sequence.sln" Description="File successfully backed up as C:\Projects\Mounting Sequence\Backup\Mounting Sequence.sln">
|
||||
</Event><Event ErrorLevel="0" Project="" Source="Mounting Sequence.suo" Description="File successfully backed up as C:\Projects\Mounting Sequence\Backup\Mounting Sequence.suo">
|
||||
</Event><Event ErrorLevel="0" Project="Mounting Sequence" Source="Mounting Sequence\Mounting Sequence.vbproj" Description="Project file successfully backed up as C:\Projects\Mounting Sequence\Backup\Mounting Sequence\Mounting Sequence.vbproj">
|
||||
</Event><Event ErrorLevel="0" Project="Mounting Sequence" Source="Mounting Sequence\Mounting Sequence.vbproj.user" Description="Project user file successfully backed up as C:\Projects\Mounting Sequence\Backup\Mounting Sequence\Mounting Sequence.vbproj.user">
|
||||
</Event><Event ErrorLevel="0" Project="Mounting Sequence" Source="Mounting Sequence\Classes\Connection.vb" Description="File successfully backed up as C:\Projects\Mounting Sequence\Backup\Mounting Sequence\Classes\Connection.vb">
|
||||
</Event><Event ErrorLevel="0" Project="Mounting Sequence" Source="Mounting Sequence\Classes\Machine.vb" Description="File successfully backed up as C:\Projects\Mounting Sequence\Backup\Mounting Sequence\Classes\Machine.vb">
|
||||
</Event><Event ErrorLevel="0" Project="Mounting Sequence" Source="Mounting Sequence\Classes\Mounting.vb" Description="File successfully backed up as C:\Projects\Mounting Sequence\Backup\Mounting Sequence\Classes\Mounting.vb">
|
||||
</Event><Event ErrorLevel="0" Project="Mounting Sequence" Source="Mounting Sequence\Classes\Sequence.vb" Description="File successfully backed up as C:\Projects\Mounting Sequence\Backup\Mounting Sequence\Classes\Sequence.vb">
|
||||
</Event><Event ErrorLevel="0" Project="Mounting Sequence" Source="Mounting Sequence\Classes\User.vb" Description="File successfully backed up as C:\Projects\Mounting Sequence\Backup\Mounting Sequence\Classes\User.vb">
|
||||
</Event><Event ErrorLevel="0" Project="Mounting Sequence" Source="Mounting Sequence\Forms\machineForm.designer.vb" Description="File successfully backed up as C:\Projects\Mounting Sequence\Backup\Mounting Sequence\Forms\machineForm.designer.vb">
|
||||
</Event><Event ErrorLevel="0" Project="Mounting Sequence" Source="Mounting Sequence\Forms\machineForm.vb" Description="File successfully backed up as C:\Projects\Mounting Sequence\Backup\Mounting Sequence\Forms\machineForm.vb">
|
||||
</Event><Event ErrorLevel="0" Project="Mounting Sequence" Source="Mounting Sequence\Forms\loginForm.designer.vb" Description="File successfully backed up as C:\Projects\Mounting Sequence\Backup\Mounting Sequence\Forms\loginForm.designer.vb">
|
||||
</Event><Event ErrorLevel="0" Project="Mounting Sequence" Source="Mounting Sequence\Forms\loginForm.vb" Description="File successfully backed up as C:\Projects\Mounting Sequence\Backup\Mounting Sequence\Forms\loginForm.vb">
|
||||
</Event><Event ErrorLevel="0" Project="Mounting Sequence" Source="Mounting Sequence\Forms\mainForm.vb" Description="File successfully backed up as C:\Projects\Mounting Sequence\Backup\Mounting Sequence\Forms\mainForm.vb">
|
||||
</Event><Event ErrorLevel="0" Project="Mounting Sequence" Source="Mounting Sequence\Forms\mainForm.Designer.vb" Description="File successfully backed up as C:\Projects\Mounting Sequence\Backup\Mounting Sequence\Forms\mainForm.Designer.vb">
|
||||
</Event><Event ErrorLevel="0" Project="Mounting Sequence" Source="Mounting Sequence\Forms\mcSeqForm.Designer.vb" Description="File successfully backed up as C:\Projects\Mounting Sequence\Backup\Mounting Sequence\Forms\mcSeqForm.Designer.vb">
|
||||
</Event><Event ErrorLevel="0" Project="Mounting Sequence" Source="Mounting Sequence\Forms\mcSeqForm.vb" Description="File successfully backed up as C:\Projects\Mounting Sequence\Backup\Mounting Sequence\Forms\mcSeqForm.vb">
|
||||
</Event><Event ErrorLevel="0" Project="Mounting Sequence" Source="Mounting Sequence\Forms\mountingForm.Designer.vb" Description="File successfully backed up as C:\Projects\Mounting Sequence\Backup\Mounting Sequence\Forms\mountingForm.Designer.vb">
|
||||
</Event><Event ErrorLevel="0" Project="Mounting Sequence" Source="Mounting Sequence\Forms\mountingForm.vb" Description="File successfully backed up as C:\Projects\Mounting Sequence\Backup\Mounting Sequence\Forms\mountingForm.vb">
|
||||
</Event><Event ErrorLevel="0" Project="Mounting Sequence" Source="Mounting Sequence\Forms\requestForm.Designer.vb" Description="File successfully backed up as C:\Projects\Mounting Sequence\Backup\Mounting Sequence\Forms\requestForm.Designer.vb">
|
||||
</Event><Event ErrorLevel="0" Project="Mounting Sequence" Source="Mounting Sequence\Forms\requestForm.vb" Description="File successfully backed up as C:\Projects\Mounting Sequence\Backup\Mounting Sequence\Forms\requestForm.vb">
|
||||
</Event><Event ErrorLevel="0" Project="Mounting Sequence" Source="Mounting Sequence\Forms\uploadMcSeq.designer.vb" Description="File successfully backed up as C:\Projects\Mounting Sequence\Backup\Mounting Sequence\Forms\uploadMcSeq.designer.vb">
|
||||
</Event><Event ErrorLevel="0" Project="Mounting Sequence" Source="Mounting Sequence\Forms\uploadMcSeq.vb" Description="File successfully backed up as C:\Projects\Mounting Sequence\Backup\Mounting Sequence\Forms\uploadMcSeq.vb">
|
||||
</Event><Event ErrorLevel="0" Project="Mounting Sequence" Source="Mounting Sequence\Forms\userForm.designer.vb" Description="File successfully backed up as C:\Projects\Mounting Sequence\Backup\Mounting Sequence\Forms\userForm.designer.vb">
|
||||
</Event><Event ErrorLevel="0" Project="Mounting Sequence" Source="Mounting Sequence\Forms\userForm.vb" Description="File successfully backed up as C:\Projects\Mounting Sequence\Backup\Mounting Sequence\Forms\userForm.vb">
|
||||
</Event><Event ErrorLevel="0" Project="Mounting Sequence" Source="Mounting Sequence\My Project\AssemblyInfo.vb" Description="File successfully backed up as C:\Projects\Mounting Sequence\Backup\Mounting Sequence\My Project\AssemblyInfo.vb">
|
||||
</Event><Event ErrorLevel="0" Project="Mounting Sequence" Source="Mounting Sequence\My Project\Application.Designer.vb" Description="File successfully backed up as C:\Projects\Mounting Sequence\Backup\Mounting Sequence\My Project\Application.Designer.vb">
|
||||
</Event><Event ErrorLevel="0" Project="Mounting Sequence" Source="Mounting Sequence\My Project\Resources.Designer.vb" Description="File successfully backed up as C:\Projects\Mounting Sequence\Backup\Mounting Sequence\My Project\Resources.Designer.vb">
|
||||
</Event><Event ErrorLevel="0" Project="Mounting Sequence" Source="Mounting Sequence\My Project\Settings.Designer.vb" Description="File successfully backed up as C:\Projects\Mounting Sequence\Backup\Mounting Sequence\My Project\Settings.Designer.vb">
|
||||
</Event><Event ErrorLevel="0" Project="Mounting Sequence" Source="Mounting Sequence\app.config" Description="File successfully backed up as C:\Projects\Mounting Sequence\Backup\Mounting Sequence\app.config">
|
||||
</Event><Event ErrorLevel="0" Project="Mounting Sequence" Source="Mounting Sequence\Mounting Sequence_TemporaryKey.pfx" Description="File successfully backed up as C:\Projects\Mounting Sequence\Backup\Mounting Sequence\Mounting Sequence_TemporaryKey.pfx">
|
||||
</Event><Event ErrorLevel="0" Project="Mounting Sequence" Source="Mounting Sequence\My Project\Application.myapp" Description="File successfully backed up as C:\Projects\Mounting Sequence\Backup\Mounting Sequence\My Project\Application.myapp">
|
||||
</Event><Event ErrorLevel="0" Project="Mounting Sequence" Source="Mounting Sequence\My Project\Settings.settings" Description="File successfully backed up as C:\Projects\Mounting Sequence\Backup\Mounting Sequence\My Project\Settings.settings">
|
||||
</Event><Event ErrorLevel="0" Project="Mounting Sequence" Source="Mounting Sequence\Forms\machineForm.resx" Description="File successfully backed up as C:\Projects\Mounting Sequence\Backup\Mounting Sequence\Forms\machineForm.resx">
|
||||
</Event><Event ErrorLevel="0" Project="Mounting Sequence" Source="Mounting Sequence\Forms\loginForm.resx" Description="File successfully backed up as C:\Projects\Mounting Sequence\Backup\Mounting Sequence\Forms\loginForm.resx">
|
||||
</Event><Event ErrorLevel="0" Project="Mounting Sequence" Source="Mounting Sequence\Forms\mainForm.resx" Description="File successfully backed up as C:\Projects\Mounting Sequence\Backup\Mounting Sequence\Forms\mainForm.resx">
|
||||
</Event><Event ErrorLevel="0" Project="Mounting Sequence" Source="Mounting Sequence\Forms\mcSeqForm.resx" Description="File successfully backed up as C:\Projects\Mounting Sequence\Backup\Mounting Sequence\Forms\mcSeqForm.resx">
|
||||
</Event><Event ErrorLevel="0" Project="Mounting Sequence" Source="Mounting Sequence\Forms\mountingForm.resx" Description="File successfully backed up as C:\Projects\Mounting Sequence\Backup\Mounting Sequence\Forms\mountingForm.resx">
|
||||
</Event><Event ErrorLevel="0" Project="Mounting Sequence" Source="Mounting Sequence\Forms\requestForm.resx" Description="File successfully backed up as C:\Projects\Mounting Sequence\Backup\Mounting Sequence\Forms\requestForm.resx">
|
||||
</Event><Event ErrorLevel="0" Project="Mounting Sequence" Source="Mounting Sequence\Forms\uploadMcSeq.resx" Description="File successfully backed up as C:\Projects\Mounting Sequence\Backup\Mounting Sequence\Forms\uploadMcSeq.resx">
|
||||
</Event><Event ErrorLevel="0" Project="Mounting Sequence" Source="Mounting Sequence\Forms\userForm.resx" Description="File successfully backed up as C:\Projects\Mounting Sequence\Backup\Mounting Sequence\Forms\userForm.resx">
|
||||
</Event><Event ErrorLevel="0" Project="Mounting Sequence" Source="Mounting Sequence\My Project\Resources.resx" Description="File successfully backed up as C:\Projects\Mounting Sequence\Backup\Mounting Sequence\My Project\Resources.resx">
|
||||
</Event><Event ErrorLevel="1" Project="Mounting Sequence" Source="Mounting Sequence\Mounting Sequence.vbproj" Description="Your project is targeting .NET Framework 2.0 or 3.0. If your project uses assemblies requiring a newer .NET Framework, your project will fail to build. You can change the .NET Framework version by clicking Properties on the project menu and then selecting a new version in the '.NET Framework' dropdown box. (In Visual Basic, this is located on the Compile tab by clicking the 'Advanced Compiler Options...' button.)">
|
||||
</Event><Event ErrorLevel="0" Project="Mounting Sequence" Source="Mounting Sequence\Mounting Sequence.vbproj" Description="Project converted successfully">
|
||||
</Event><Event ErrorLevel="3" Project="Mounting Sequence" Source="Mounting Sequence\Mounting Sequence.vbproj" Description="Converted">
|
||||
</Event><Event ErrorLevel="0" Project="" Source="Mounting Sequence.sln" Description="Solution converted successfully">
|
||||
</Event><Event ErrorLevel="3" Project="" Source="Mounting Sequence.sln" Description="Converted">
|
||||
</Event><Event ErrorLevel="0" Project="Mounting Sequence" Source="Mounting Sequence\Mounting Sequence.vbproj" Description="Scan complete: Upgrade not required for project files.">
|
||||
</Event></UpgradeLog>
|
@ -0,0 +1,400 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
||||
Partial Class mcSeqForm
|
||||
Inherits System.Windows.Forms.Form
|
||||
|
||||
'Form overrides dispose to clean up the component list.
|
||||
<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
|
||||
|
||||
'Required by the Windows Form Designer
|
||||
Private components As System.ComponentModel.IContainer
|
||||
|
||||
'NOTE: The following procedure is required by the Windows Form Designer
|
||||
'It can be modified using the Windows Form Designer.
|
||||
'Do not modify it using the code editor.
|
||||
<System.Diagnostics.DebuggerStepThrough()> _
|
||||
Private Sub InitializeComponent()
|
||||
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(mcSeqForm))
|
||||
Me.basicInfo = New System.Windows.Forms.GroupBox()
|
||||
Me.cmbRev = New System.Windows.Forms.ComboBox()
|
||||
Me.Label2 = New System.Windows.Forms.Label()
|
||||
Me.cmbSeq = New System.Windows.Forms.ComboBox()
|
||||
Me.Label1 = New System.Windows.Forms.Label()
|
||||
Me.GroupBox1 = New System.Windows.Forms.GroupBox()
|
||||
Me.dg_mtSeq = New System.Windows.Forms.DataGridView()
|
||||
Me.ToolStrip1 = New System.Windows.Forms.ToolStrip()
|
||||
Me.ts_new = New System.Windows.Forms.ToolStripButton()
|
||||
Me.ToolStripSeparator1 = New System.Windows.Forms.ToolStripSeparator()
|
||||
Me.ts_edit = New System.Windows.Forms.ToolStripButton()
|
||||
Me.ToolStripSeparator2 = New System.Windows.Forms.ToolStripSeparator()
|
||||
Me.ts_delete = New System.Windows.Forms.ToolStripButton()
|
||||
Me.ToolStripSeparator3 = New System.Windows.Forms.ToolStripSeparator()
|
||||
Me.ts_revert = New System.Windows.Forms.ToolStripButton()
|
||||
Me.ToolStripSeparator5 = New System.Windows.Forms.ToolStripSeparator()
|
||||
Me.ts_save = New System.Windows.Forms.ToolStripButton()
|
||||
Me.ToolStripSeparator4 = New System.Windows.Forms.ToolStripSeparator()
|
||||
Me.ts_find = New System.Windows.Forms.ToolStripButton()
|
||||
Me.verifyBox = New System.Windows.Forms.GroupBox()
|
||||
Me.btn_verify = New System.Windows.Forms.Button()
|
||||
Me.txtVerDate = New System.Windows.Forms.TextBox()
|
||||
Me.txtVerBy = New System.Windows.Forms.TextBox()
|
||||
Me.Label4 = New System.Windows.Forms.Label()
|
||||
Me.Label3 = New System.Windows.Forms.Label()
|
||||
Me.cmbLine = New System.Windows.Forms.ComboBox()
|
||||
Me.Label7 = New System.Windows.Forms.Label()
|
||||
Me.cmbModel = New System.Windows.Forms.ComboBox()
|
||||
Me.Label5 = New System.Windows.Forms.Label()
|
||||
Me.cmbType = New System.Windows.Forms.ComboBox()
|
||||
Me.Label6 = New System.Windows.Forms.Label()
|
||||
Me.basicInfo.SuspendLayout()
|
||||
Me.GroupBox1.SuspendLayout()
|
||||
CType(Me.dg_mtSeq, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.ToolStrip1.SuspendLayout()
|
||||
Me.verifyBox.SuspendLayout()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'basicInfo
|
||||
'
|
||||
Me.basicInfo.Controls.Add(Me.cmbType)
|
||||
Me.basicInfo.Controls.Add(Me.Label6)
|
||||
Me.basicInfo.Controls.Add(Me.cmbModel)
|
||||
Me.basicInfo.Controls.Add(Me.Label5)
|
||||
Me.basicInfo.Controls.Add(Me.cmbLine)
|
||||
Me.basicInfo.Controls.Add(Me.Label7)
|
||||
Me.basicInfo.Controls.Add(Me.cmbRev)
|
||||
Me.basicInfo.Controls.Add(Me.Label2)
|
||||
Me.basicInfo.Controls.Add(Me.cmbSeq)
|
||||
Me.basicInfo.Controls.Add(Me.Label1)
|
||||
Me.basicInfo.Location = New System.Drawing.Point(3, 25)
|
||||
Me.basicInfo.Name = "basicInfo"
|
||||
Me.basicInfo.Size = New System.Drawing.Size(462, 167)
|
||||
Me.basicInfo.TabIndex = 0
|
||||
Me.basicInfo.TabStop = False
|
||||
Me.basicInfo.Text = "Basic Information"
|
||||
'
|
||||
'cmbRev
|
||||
'
|
||||
Me.cmbRev.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
|
||||
Me.cmbRev.FormattingEnabled = True
|
||||
Me.cmbRev.Location = New System.Drawing.Point(137, 130)
|
||||
Me.cmbRev.Name = "cmbRev"
|
||||
Me.cmbRev.Size = New System.Drawing.Size(145, 23)
|
||||
Me.cmbRev.TabIndex = 4
|
||||
'
|
||||
'Label2
|
||||
'
|
||||
Me.Label2.AutoSize = True
|
||||
Me.Label2.Location = New System.Drawing.Point(74, 133)
|
||||
Me.Label2.Name = "Label2"
|
||||
Me.Label2.Size = New System.Drawing.Size(57, 15)
|
||||
Me.Label2.TabIndex = 3
|
||||
Me.Label2.Text = "Revision:"
|
||||
'
|
||||
'cmbSeq
|
||||
'
|
||||
Me.cmbSeq.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
|
||||
Me.cmbSeq.FormattingEnabled = True
|
||||
Me.cmbSeq.Location = New System.Drawing.Point(137, 19)
|
||||
Me.cmbSeq.Name = "cmbSeq"
|
||||
Me.cmbSeq.Size = New System.Drawing.Size(310, 23)
|
||||
Me.cmbSeq.TabIndex = 0
|
||||
'
|
||||
'Label1
|
||||
'
|
||||
Me.Label1.AutoSize = True
|
||||
Me.Label1.Location = New System.Drawing.Point(76, 25)
|
||||
Me.Label1.Name = "Label1"
|
||||
Me.Label1.Size = New System.Drawing.Size(54, 15)
|
||||
Me.Label1.TabIndex = 0
|
||||
Me.Label1.Text = "Account:"
|
||||
'
|
||||
'GroupBox1
|
||||
'
|
||||
Me.GroupBox1.Controls.Add(Me.dg_mtSeq)
|
||||
Me.GroupBox1.Location = New System.Drawing.Point(3, 198)
|
||||
Me.GroupBox1.Name = "GroupBox1"
|
||||
Me.GroupBox1.Size = New System.Drawing.Size(994, 460)
|
||||
Me.GroupBox1.TabIndex = 1
|
||||
Me.GroupBox1.TabStop = False
|
||||
Me.GroupBox1.Text = "Mounting Sequence"
|
||||
'
|
||||
'dg_mtSeq
|
||||
'
|
||||
Me.dg_mtSeq.AllowUserToAddRows = False
|
||||
Me.dg_mtSeq.AllowUserToDeleteRows = False
|
||||
Me.dg_mtSeq.AllowUserToResizeColumns = False
|
||||
Me.dg_mtSeq.AllowUserToResizeRows = False
|
||||
Me.dg_mtSeq.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
|
||||
Me.dg_mtSeq.EditMode = System.Windows.Forms.DataGridViewEditMode.EditOnEnter
|
||||
Me.dg_mtSeq.Location = New System.Drawing.Point(6, 16)
|
||||
Me.dg_mtSeq.Name = "dg_mtSeq"
|
||||
Me.dg_mtSeq.RowHeadersWidth = 20
|
||||
Me.dg_mtSeq.RowHeadersWidthSizeMode = System.Windows.Forms.DataGridViewRowHeadersWidthSizeMode.DisableResizing
|
||||
Me.dg_mtSeq.RowTemplate.Height = 18
|
||||
Me.dg_mtSeq.Size = New System.Drawing.Size(982, 481)
|
||||
Me.dg_mtSeq.TabIndex = 0
|
||||
'
|
||||
'ToolStrip1
|
||||
'
|
||||
Me.ToolStrip1.Font = New System.Drawing.Font("Calibri", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.ToolStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ts_new, Me.ToolStripSeparator1, Me.ts_edit, Me.ToolStripSeparator2, Me.ts_delete, Me.ToolStripSeparator3, Me.ts_revert, Me.ToolStripSeparator5, Me.ts_save, Me.ToolStripSeparator4, Me.ts_find})
|
||||
Me.ToolStrip1.Location = New System.Drawing.Point(0, 0)
|
||||
Me.ToolStrip1.Name = "ToolStrip1"
|
||||
Me.ToolStrip1.Size = New System.Drawing.Size(1003, 25)
|
||||
Me.ToolStrip1.TabIndex = 4
|
||||
'
|
||||
'ts_new
|
||||
'
|
||||
Me.ts_new.Enabled = False
|
||||
Me.ts_new.Image = CType(resources.GetObject("ts_new.Image"), System.Drawing.Image)
|
||||
Me.ts_new.ImageTransparentColor = System.Drawing.Color.Magenta
|
||||
Me.ts_new.Name = "ts_new"
|
||||
Me.ts_new.Size = New System.Drawing.Size(48, 22)
|
||||
Me.ts_new.Text = "Add"
|
||||
'
|
||||
'ToolStripSeparator1
|
||||
'
|
||||
Me.ToolStripSeparator1.Name = "ToolStripSeparator1"
|
||||
Me.ToolStripSeparator1.Size = New System.Drawing.Size(6, 25)
|
||||
'
|
||||
'ts_edit
|
||||
'
|
||||
Me.ts_edit.Image = CType(resources.GetObject("ts_edit.Image"), System.Drawing.Image)
|
||||
Me.ts_edit.ImageTransparentColor = System.Drawing.Color.Magenta
|
||||
Me.ts_edit.Name = "ts_edit"
|
||||
Me.ts_edit.Size = New System.Drawing.Size(67, 22)
|
||||
Me.ts_edit.Text = "Update"
|
||||
'
|
||||
'ToolStripSeparator2
|
||||
'
|
||||
Me.ToolStripSeparator2.Name = "ToolStripSeparator2"
|
||||
Me.ToolStripSeparator2.Size = New System.Drawing.Size(6, 25)
|
||||
'
|
||||
'ts_delete
|
||||
'
|
||||
Me.ts_delete.Image = CType(resources.GetObject("ts_delete.Image"), System.Drawing.Image)
|
||||
Me.ts_delete.ImageTransparentColor = System.Drawing.Color.Magenta
|
||||
Me.ts_delete.Name = "ts_delete"
|
||||
Me.ts_delete.Size = New System.Drawing.Size(64, 22)
|
||||
Me.ts_delete.Text = "Delete"
|
||||
'
|
||||
'ToolStripSeparator3
|
||||
'
|
||||
Me.ToolStripSeparator3.Name = "ToolStripSeparator3"
|
||||
Me.ToolStripSeparator3.Size = New System.Drawing.Size(6, 25)
|
||||
'
|
||||
'ts_revert
|
||||
'
|
||||
Me.ts_revert.Enabled = False
|
||||
Me.ts_revert.Image = CType(resources.GetObject("ts_revert.Image"), System.Drawing.Image)
|
||||
Me.ts_revert.ImageTransparentColor = System.Drawing.Color.Magenta
|
||||
Me.ts_revert.Name = "ts_revert"
|
||||
Me.ts_revert.Size = New System.Drawing.Size(61, 22)
|
||||
Me.ts_revert.Text = "Revert"
|
||||
'
|
||||
'ToolStripSeparator5
|
||||
'
|
||||
Me.ToolStripSeparator5.Name = "ToolStripSeparator5"
|
||||
Me.ToolStripSeparator5.Size = New System.Drawing.Size(6, 25)
|
||||
'
|
||||
'ts_save
|
||||
'
|
||||
Me.ts_save.Enabled = False
|
||||
Me.ts_save.Image = CType(resources.GetObject("ts_save.Image"), System.Drawing.Image)
|
||||
Me.ts_save.ImageTransparentColor = System.Drawing.Color.Magenta
|
||||
Me.ts_save.Name = "ts_save"
|
||||
Me.ts_save.Size = New System.Drawing.Size(81, 22)
|
||||
Me.ts_save.Text = "Save Data"
|
||||
'
|
||||
'ToolStripSeparator4
|
||||
'
|
||||
Me.ToolStripSeparator4.Name = "ToolStripSeparator4"
|
||||
Me.ToolStripSeparator4.Size = New System.Drawing.Size(6, 25)
|
||||
'
|
||||
'ts_find
|
||||
'
|
||||
Me.ts_find.Image = CType(resources.GetObject("ts_find.Image"), System.Drawing.Image)
|
||||
Me.ts_find.ImageTransparentColor = System.Drawing.Color.Magenta
|
||||
Me.ts_find.Name = "ts_find"
|
||||
Me.ts_find.Size = New System.Drawing.Size(51, 22)
|
||||
Me.ts_find.Text = "Find"
|
||||
'
|
||||
'verifyBox
|
||||
'
|
||||
Me.verifyBox.Controls.Add(Me.btn_verify)
|
||||
Me.verifyBox.Controls.Add(Me.txtVerDate)
|
||||
Me.verifyBox.Controls.Add(Me.txtVerBy)
|
||||
Me.verifyBox.Controls.Add(Me.Label4)
|
||||
Me.verifyBox.Controls.Add(Me.Label3)
|
||||
Me.verifyBox.Location = New System.Drawing.Point(469, 25)
|
||||
Me.verifyBox.Name = "verifyBox"
|
||||
Me.verifyBox.Size = New System.Drawing.Size(528, 91)
|
||||
Me.verifyBox.TabIndex = 5
|
||||
Me.verifyBox.TabStop = False
|
||||
Me.verifyBox.Text = "Verify"
|
||||
'
|
||||
'btn_verify
|
||||
'
|
||||
Me.btn_verify.Enabled = False
|
||||
Me.btn_verify.Location = New System.Drawing.Point(366, 22)
|
||||
Me.btn_verify.Name = "btn_verify"
|
||||
Me.btn_verify.Size = New System.Drawing.Size(156, 54)
|
||||
Me.btn_verify.TabIndex = 4
|
||||
Me.btn_verify.Text = "Approve Sequence"
|
||||
Me.btn_verify.UseVisualStyleBackColor = True
|
||||
'
|
||||
'txtVerDate
|
||||
'
|
||||
Me.txtVerDate.Enabled = False
|
||||
Me.txtVerDate.Location = New System.Drawing.Point(133, 54)
|
||||
Me.txtVerDate.Name = "txtVerDate"
|
||||
Me.txtVerDate.Size = New System.Drawing.Size(213, 23)
|
||||
Me.txtVerDate.TabIndex = 3
|
||||
'
|
||||
'txtVerBy
|
||||
'
|
||||
Me.txtVerBy.Enabled = False
|
||||
Me.txtVerBy.Location = New System.Drawing.Point(133, 25)
|
||||
Me.txtVerBy.Name = "txtVerBy"
|
||||
Me.txtVerBy.Size = New System.Drawing.Size(213, 23)
|
||||
Me.txtVerBy.TabIndex = 2
|
||||
'
|
||||
'Label4
|
||||
'
|
||||
Me.Label4.AutoSize = True
|
||||
Me.Label4.Location = New System.Drawing.Point(30, 59)
|
||||
Me.Label4.Name = "Label4"
|
||||
Me.Label4.Size = New System.Drawing.Size(100, 15)
|
||||
Me.Label4.TabIndex = 1
|
||||
Me.Label4.Text = "Verification Date:"
|
||||
'
|
||||
'Label3
|
||||
'
|
||||
Me.Label3.AutoSize = True
|
||||
Me.Label3.Location = New System.Drawing.Point(62, 30)
|
||||
Me.Label3.Name = "Label3"
|
||||
Me.Label3.Size = New System.Drawing.Size(67, 15)
|
||||
Me.Label3.TabIndex = 0
|
||||
Me.Label3.Text = "Verified By:"
|
||||
'
|
||||
'cmbLine
|
||||
'
|
||||
Me.cmbLine.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
|
||||
Me.cmbLine.FormattingEnabled = True
|
||||
Me.cmbLine.Location = New System.Drawing.Point(137, 45)
|
||||
Me.cmbLine.Name = "cmbLine"
|
||||
Me.cmbLine.Size = New System.Drawing.Size(116, 23)
|
||||
Me.cmbLine.TabIndex = 10
|
||||
'
|
||||
'Label7
|
||||
'
|
||||
Me.Label7.AutoSize = True
|
||||
Me.Label7.Location = New System.Drawing.Point(98, 48)
|
||||
Me.Label7.Name = "Label7"
|
||||
Me.Label7.Size = New System.Drawing.Size(32, 15)
|
||||
Me.Label7.TabIndex = 9
|
||||
Me.Label7.Text = "Line:"
|
||||
'
|
||||
'cmbModel
|
||||
'
|
||||
Me.cmbModel.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
|
||||
Me.cmbModel.FormattingEnabled = True
|
||||
Me.cmbModel.Location = New System.Drawing.Point(137, 72)
|
||||
Me.cmbModel.Name = "cmbModel"
|
||||
Me.cmbModel.Size = New System.Drawing.Size(204, 23)
|
||||
Me.cmbModel.TabIndex = 12
|
||||
'
|
||||
'Label5
|
||||
'
|
||||
Me.Label5.AutoSize = True
|
||||
Me.Label5.Location = New System.Drawing.Point(84, 75)
|
||||
Me.Label5.Name = "Label5"
|
||||
Me.Label5.Size = New System.Drawing.Size(45, 15)
|
||||
Me.Label5.TabIndex = 11
|
||||
Me.Label5.Text = "Model:"
|
||||
'
|
||||
'cmbType
|
||||
'
|
||||
Me.cmbType.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
|
||||
Me.cmbType.FormattingEnabled = True
|
||||
Me.cmbType.Location = New System.Drawing.Point(137, 101)
|
||||
Me.cmbType.Name = "cmbType"
|
||||
Me.cmbType.Size = New System.Drawing.Size(145, 23)
|
||||
Me.cmbType.TabIndex = 14
|
||||
'
|
||||
'Label6
|
||||
'
|
||||
Me.Label6.AutoSize = True
|
||||
Me.Label6.Location = New System.Drawing.Point(93, 104)
|
||||
Me.Label6.Name = "Label6"
|
||||
Me.Label6.Size = New System.Drawing.Size(34, 15)
|
||||
Me.Label6.TabIndex = 13
|
||||
Me.Label6.Text = "Type:"
|
||||
'
|
||||
'mcSeqForm
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(7.0!, 15.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.ClientSize = New System.Drawing.Size(1003, 666)
|
||||
Me.ControlBox = False
|
||||
Me.Controls.Add(Me.verifyBox)
|
||||
Me.Controls.Add(Me.ToolStrip1)
|
||||
Me.Controls.Add(Me.GroupBox1)
|
||||
Me.Controls.Add(Me.basicInfo)
|
||||
Me.Font = New System.Drawing.Font("Calibri", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedSingle
|
||||
Me.Name = "mcSeqForm"
|
||||
Me.StartPosition = System.Windows.Forms.FormStartPosition.Manual
|
||||
Me.Text = "Machine Sequence Maitenance"
|
||||
Me.basicInfo.ResumeLayout(False)
|
||||
Me.basicInfo.PerformLayout()
|
||||
Me.GroupBox1.ResumeLayout(False)
|
||||
CType(Me.dg_mtSeq, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.ToolStrip1.ResumeLayout(False)
|
||||
Me.ToolStrip1.PerformLayout()
|
||||
Me.verifyBox.ResumeLayout(False)
|
||||
Me.verifyBox.PerformLayout()
|
||||
Me.ResumeLayout(False)
|
||||
Me.PerformLayout()
|
||||
|
||||
End Sub
|
||||
Friend WithEvents basicInfo As System.Windows.Forms.GroupBox
|
||||
Friend WithEvents Label1 As System.Windows.Forms.Label
|
||||
Friend WithEvents GroupBox1 As System.Windows.Forms.GroupBox
|
||||
Friend WithEvents dg_mtSeq As System.Windows.Forms.DataGridView
|
||||
Friend WithEvents cmbSeq As System.Windows.Forms.ComboBox
|
||||
Friend WithEvents cmbRev As System.Windows.Forms.ComboBox
|
||||
Friend WithEvents Label2 As System.Windows.Forms.Label
|
||||
Friend WithEvents ToolStrip1 As System.Windows.Forms.ToolStrip
|
||||
Friend WithEvents ts_new As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents ToolStripSeparator1 As System.Windows.Forms.ToolStripSeparator
|
||||
Friend WithEvents ts_edit As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents ToolStripSeparator2 As System.Windows.Forms.ToolStripSeparator
|
||||
Friend WithEvents ts_delete As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents ToolStripSeparator3 As System.Windows.Forms.ToolStripSeparator
|
||||
Friend WithEvents ts_revert As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents ToolStripSeparator5 As System.Windows.Forms.ToolStripSeparator
|
||||
Friend WithEvents ts_save As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents ToolStripSeparator4 As System.Windows.Forms.ToolStripSeparator
|
||||
Friend WithEvents ts_find As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents verifyBox As System.Windows.Forms.GroupBox
|
||||
Friend WithEvents Label3 As System.Windows.Forms.Label
|
||||
Friend WithEvents Label4 As System.Windows.Forms.Label
|
||||
Friend WithEvents txtVerDate As System.Windows.Forms.TextBox
|
||||
Friend WithEvents txtVerBy As System.Windows.Forms.TextBox
|
||||
Friend WithEvents btn_verify As System.Windows.Forms.Button
|
||||
Friend WithEvents cmbLine As System.Windows.Forms.ComboBox
|
||||
Friend WithEvents Label7 As System.Windows.Forms.Label
|
||||
Friend WithEvents cmbModel As System.Windows.Forms.ComboBox
|
||||
Friend WithEvents Label5 As System.Windows.Forms.Label
|
||||
Friend WithEvents cmbType As System.Windows.Forms.ComboBox
|
||||
Friend WithEvents Label6 As System.Windows.Forms.Label
|
||||
End Class
|
@ -0,0 +1,65 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<asmv1:assembly xsi:schemaLocation="urn:schemas-microsoft-com:asm.v1 assembly.adaptive.xsd" manifestVersion="1.0" xmlns:asmv1="urn:schemas-microsoft-com:asm.v1" xmlns="urn:schemas-microsoft-com:asm.v2" xmlns:asmv2="urn:schemas-microsoft-com:asm.v2" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:co.v1="urn:schemas-microsoft-com:clickonce.v1" xmlns:asmv3="urn:schemas-microsoft-com:asm.v3" xmlns:dsig="http://www.w3.org/2000/09/xmldsig#" xmlns:co.v2="urn:schemas-microsoft-com:clickonce.v2">
|
||||
<asmv1:assemblyIdentity name="Mounting Sequence.exe" version="1.0.0.2" publicKeyToken="0000000000000000" language="neutral" processorArchitecture="msil" type="win32" />
|
||||
<application />
|
||||
<entryPoint>
|
||||
<assemblyIdentity name="Mounting Sequence" version="1.0.0.0" language="neutral" processorArchitecture="msil" />
|
||||
<commandLine file="Mounting Sequence.exe" parameters="" />
|
||||
</entryPoint>
|
||||
<trustInfo>
|
||||
<security>
|
||||
<applicationRequestMinimum>
|
||||
<PermissionSet Unrestricted="true" ID="Custom" SameSite="site" />
|
||||
<defaultAssemblyRequest permissionSetReference="Custom" />
|
||||
</applicationRequestMinimum>
|
||||
<requestedPrivileges xmlns="urn:schemas-microsoft-com:asm.v3">
|
||||
<!--
|
||||
UAC Manifest Options
|
||||
If you want to change the Windows User Account Control level replace the
|
||||
requestedExecutionLevel node with one of the following.
|
||||
|
||||
<requestedExecutionLevel level="asInvoker" uiAccess="false" />
|
||||
<requestedExecutionLevel level="requireAdministrator" uiAccess="false" />
|
||||
<requestedExecutionLevel level="highestAvailable" uiAccess="false" />
|
||||
|
||||
If you want to utilize File and Registry Virtualization for backward
|
||||
compatibility then delete the requestedExecutionLevel node.
|
||||
-->
|
||||
<requestedExecutionLevel level="asInvoker" uiAccess="false" />
|
||||
</requestedPrivileges>
|
||||
</security>
|
||||
</trustInfo>
|
||||
<dependency>
|
||||
<dependentOS>
|
||||
<osVersionInfo>
|
||||
<os majorVersion="4" minorVersion="10" buildNumber="0" servicePackMajor="0" />
|
||||
</osVersionInfo>
|
||||
</dependentOS>
|
||||
</dependency>
|
||||
<dependency>
|
||||
<dependentAssembly dependencyType="preRequisite" allowDelayedBinding="true">
|
||||
<assemblyIdentity name="Microsoft.Windows.CommonLanguageRuntime" version="2.0.50727.0" />
|
||||
</dependentAssembly>
|
||||
</dependency>
|
||||
<dependency>
|
||||
<dependentAssembly dependencyType="install" allowDelayedBinding="true" codebase="Mounting Sequence.exe" size="585216">
|
||||
<assemblyIdentity name="Mounting Sequence" version="1.0.0.0" language="neutral" processorArchitecture="msil" />
|
||||
<hash>
|
||||
<dsig:Transforms>
|
||||
<dsig:Transform Algorithm="urn:schemas-microsoft-com:HashTransforms.Identity" />
|
||||
</dsig:Transforms>
|
||||
<dsig:DigestMethod Algorithm="http://www.w3.org/2000/09/xmldsig#sha1" />
|
||||
<dsig:DigestValue>ARJ+dgM6+A39dIgA7Bw/zudkpUw=</dsig:DigestValue>
|
||||
</hash>
|
||||
</dependentAssembly>
|
||||
</dependency>
|
||||
<file name="Mounting Sequence.exe.config" size="2657">
|
||||
<hash>
|
||||
<dsig:Transforms>
|
||||
<dsig:Transform Algorithm="urn:schemas-microsoft-com:HashTransforms.Identity" />
|
||||
</dsig:Transforms>
|
||||
<dsig:DigestMethod Algorithm="http://www.w3.org/2000/09/xmldsig#sha1" />
|
||||
<dsig:DigestValue>itsr0lDPoTEnRQYblCwApfW/vvY=</dsig:DigestValue>
|
||||
</hash>
|
||||
</file>
|
||||
</asmv1:assembly>
|
@ -0,0 +1,24 @@
|
||||
<?xml version="1.0"?>
|
||||
<doc>
|
||||
<assembly>
|
||||
<name>
|
||||
MountingSequence
|
||||
</name>
|
||||
</assembly>
|
||||
<members>
|
||||
<member name="P:Mounting_Sequence.My.Resources.Resources.ResourceManager">
|
||||
<summary>
|
||||
Returns the cached ResourceManager instance used by this class.
|
||||
</summary>
|
||||
</member><member name="P:Mounting_Sequence.My.Resources.Resources.Culture">
|
||||
<summary>
|
||||
Overrides the current thread's CurrentUICulture property for all
|
||||
resource lookups using this strongly typed resource class.
|
||||
</summary>
|
||||
</member><member name="T:Mounting_Sequence.My.Resources.Resources">
|
||||
<summary>
|
||||
A strongly-typed resource class, for looking up localized strings, etc.
|
||||
</summary>
|
||||
</member>
|
||||
</members>
|
||||
</doc>
|
Binary file not shown.
Binary file not shown.
@ -0,0 +1,312 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
||||
Partial Class machineForm
|
||||
Inherits System.Windows.Forms.Form
|
||||
|
||||
'Form overrides dispose to clean up the component list.
|
||||
<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
|
||||
|
||||
'Required by the Windows Form Designer
|
||||
Private components As System.ComponentModel.IContainer
|
||||
|
||||
'NOTE: The following procedure is required by the Windows Form Designer
|
||||
'It can be modified using the Windows Form Designer.
|
||||
'Do not modify it using the code editor.
|
||||
<System.Diagnostics.DebuggerStepThrough()> _
|
||||
Private Sub InitializeComponent()
|
||||
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(machineForm))
|
||||
Me.GroupBox1 = New System.Windows.Forms.GroupBox
|
||||
Me.txtLine = New System.Windows.Forms.TextBox
|
||||
Me.Label6 = New System.Windows.Forms.Label
|
||||
Me.cmbPlant = New System.Windows.Forms.ComboBox
|
||||
Me.Label4 = New System.Windows.Forms.Label
|
||||
Me.txtMchModel = New System.Windows.Forms.TextBox
|
||||
Me.Label3 = New System.Windows.Forms.Label
|
||||
Me.cbActive = New System.Windows.Forms.CheckBox
|
||||
Me.txtMchName = New System.Windows.Forms.TextBox
|
||||
Me.txtMchCode = New System.Windows.Forms.TextBox
|
||||
Me.Label2 = New System.Windows.Forms.Label
|
||||
Me.Label1 = New System.Windows.Forms.Label
|
||||
Me.btn_find = New System.Windows.Forms.Button
|
||||
Me.ts_new = New System.Windows.Forms.ToolStripButton
|
||||
Me.ToolStripSeparator1 = New System.Windows.Forms.ToolStripSeparator
|
||||
Me.ts_edit = New System.Windows.Forms.ToolStripButton
|
||||
Me.ToolStripSeparator2 = New System.Windows.Forms.ToolStripSeparator
|
||||
Me.ts_delete = New System.Windows.Forms.ToolStripButton
|
||||
Me.ToolStripSeparator3 = New System.Windows.Forms.ToolStripSeparator
|
||||
Me.ts_find = New System.Windows.Forms.ToolStripButton
|
||||
Me.ToolStripSeparator4 = New System.Windows.Forms.ToolStripSeparator
|
||||
Me.ts_save = New System.Windows.Forms.ToolStripButton
|
||||
Me.ToolStrip1 = New System.Windows.Forms.ToolStrip
|
||||
Me.ts_revert = New System.Windows.Forms.ToolStripButton
|
||||
Me.ToolStripSeparator5 = New System.Windows.Forms.ToolStripSeparator
|
||||
Me.GroupBox1.SuspendLayout()
|
||||
Me.ToolStrip1.SuspendLayout()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'GroupBox1
|
||||
'
|
||||
Me.GroupBox1.Controls.Add(Me.txtLine)
|
||||
Me.GroupBox1.Controls.Add(Me.Label6)
|
||||
Me.GroupBox1.Controls.Add(Me.cmbPlant)
|
||||
Me.GroupBox1.Controls.Add(Me.Label4)
|
||||
Me.GroupBox1.Controls.Add(Me.txtMchModel)
|
||||
Me.GroupBox1.Controls.Add(Me.Label3)
|
||||
Me.GroupBox1.Controls.Add(Me.cbActive)
|
||||
Me.GroupBox1.Controls.Add(Me.txtMchName)
|
||||
Me.GroupBox1.Controls.Add(Me.txtMchCode)
|
||||
Me.GroupBox1.Controls.Add(Me.Label2)
|
||||
Me.GroupBox1.Controls.Add(Me.Label1)
|
||||
Me.GroupBox1.Controls.Add(Me.btn_find)
|
||||
Me.GroupBox1.Location = New System.Drawing.Point(6, 27)
|
||||
Me.GroupBox1.Name = "GroupBox1"
|
||||
Me.GroupBox1.Size = New System.Drawing.Size(499, 156)
|
||||
Me.GroupBox1.TabIndex = 0
|
||||
Me.GroupBox1.TabStop = False
|
||||
Me.GroupBox1.Text = "Information"
|
||||
'
|
||||
'txtLine
|
||||
'
|
||||
Me.txtLine.Enabled = False
|
||||
Me.txtLine.Location = New System.Drawing.Point(124, 126)
|
||||
Me.txtLine.Name = "txtLine"
|
||||
Me.txtLine.Size = New System.Drawing.Size(76, 20)
|
||||
Me.txtLine.TabIndex = 4
|
||||
'
|
||||
'Label6
|
||||
'
|
||||
Me.Label6.AutoSize = True
|
||||
Me.Label6.Location = New System.Drawing.Point(88, 132)
|
||||
Me.Label6.Name = "Label6"
|
||||
Me.Label6.Size = New System.Drawing.Size(30, 13)
|
||||
Me.Label6.TabIndex = 27
|
||||
Me.Label6.Text = "Line:"
|
||||
'
|
||||
'cmbPlant
|
||||
'
|
||||
Me.cmbPlant.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
|
||||
Me.cmbPlant.Enabled = False
|
||||
Me.cmbPlant.FormattingEnabled = True
|
||||
Me.cmbPlant.Items.AddRange(New Object() {"", "Administrator", "Encoder", "Generator", "Guest"})
|
||||
Me.cmbPlant.Location = New System.Drawing.Point(124, 100)
|
||||
Me.cmbPlant.Name = "cmbPlant"
|
||||
Me.cmbPlant.Size = New System.Drawing.Size(159, 21)
|
||||
Me.cmbPlant.TabIndex = 3
|
||||
'
|
||||
'Label4
|
||||
'
|
||||
Me.Label4.AutoSize = True
|
||||
Me.Label4.Location = New System.Drawing.Point(84, 105)
|
||||
Me.Label4.Name = "Label4"
|
||||
Me.Label4.Size = New System.Drawing.Size(34, 13)
|
||||
Me.Label4.TabIndex = 25
|
||||
Me.Label4.Text = "Plant:"
|
||||
'
|
||||
'txtMchModel
|
||||
'
|
||||
Me.txtMchModel.Enabled = False
|
||||
Me.txtMchModel.Location = New System.Drawing.Point(124, 74)
|
||||
Me.txtMchModel.Name = "txtMchModel"
|
||||
Me.txtMchModel.Size = New System.Drawing.Size(159, 20)
|
||||
Me.txtMchModel.TabIndex = 2
|
||||
'
|
||||
'Label3
|
||||
'
|
||||
Me.Label3.AutoSize = True
|
||||
Me.Label3.Location = New System.Drawing.Point(36, 79)
|
||||
Me.Label3.Name = "Label3"
|
||||
Me.Label3.Size = New System.Drawing.Size(83, 13)
|
||||
Me.Label3.TabIndex = 22
|
||||
Me.Label3.Text = "Machine Model:"
|
||||
'
|
||||
'cbActive
|
||||
'
|
||||
Me.cbActive.AutoSize = True
|
||||
Me.cbActive.Enabled = False
|
||||
Me.cbActive.Location = New System.Drawing.Point(298, 24)
|
||||
Me.cbActive.Name = "cbActive"
|
||||
Me.cbActive.Size = New System.Drawing.Size(56, 17)
|
||||
Me.cbActive.TabIndex = 6
|
||||
Me.cbActive.Text = "Active"
|
||||
Me.cbActive.UseVisualStyleBackColor = True
|
||||
'
|
||||
'txtMchName
|
||||
'
|
||||
Me.txtMchName.Enabled = False
|
||||
Me.txtMchName.Location = New System.Drawing.Point(124, 48)
|
||||
Me.txtMchName.Name = "txtMchName"
|
||||
Me.txtMchName.Size = New System.Drawing.Size(159, 20)
|
||||
Me.txtMchName.TabIndex = 1
|
||||
'
|
||||
'txtMchCode
|
||||
'
|
||||
Me.txtMchCode.Enabled = False
|
||||
Me.txtMchCode.Location = New System.Drawing.Point(124, 21)
|
||||
Me.txtMchCode.Name = "txtMchCode"
|
||||
Me.txtMchCode.Size = New System.Drawing.Size(159, 20)
|
||||
Me.txtMchCode.TabIndex = 0
|
||||
'
|
||||
'Label2
|
||||
'
|
||||
Me.Label2.AutoSize = True
|
||||
Me.Label2.Location = New System.Drawing.Point(38, 51)
|
||||
Me.Label2.Name = "Label2"
|
||||
Me.Label2.Size = New System.Drawing.Size(82, 13)
|
||||
Me.Label2.TabIndex = 1
|
||||
Me.Label2.Text = "Machine Name:"
|
||||
'
|
||||
'Label1
|
||||
'
|
||||
Me.Label1.AutoSize = True
|
||||
Me.Label1.Location = New System.Drawing.Point(41, 24)
|
||||
Me.Label1.Name = "Label1"
|
||||
Me.Label1.Size = New System.Drawing.Size(79, 13)
|
||||
Me.Label1.TabIndex = 0
|
||||
Me.Label1.Text = "Machine Code:"
|
||||
'
|
||||
'btn_find
|
||||
'
|
||||
Me.btn_find.Location = New System.Drawing.Point(296, 19)
|
||||
Me.btn_find.Name = "btn_find"
|
||||
Me.btn_find.Size = New System.Drawing.Size(75, 23)
|
||||
Me.btn_find.TabIndex = 7
|
||||
Me.btn_find.Text = "GO"
|
||||
Me.btn_find.UseVisualStyleBackColor = True
|
||||
'
|
||||
'ts_new
|
||||
'
|
||||
Me.ts_new.Image = CType(resources.GetObject("ts_new.Image"), System.Drawing.Image)
|
||||
Me.ts_new.ImageTransparentColor = System.Drawing.Color.Magenta
|
||||
Me.ts_new.Name = "ts_new"
|
||||
Me.ts_new.Size = New System.Drawing.Size(56, 22)
|
||||
Me.ts_new.Text = "Insert"
|
||||
'
|
||||
'ToolStripSeparator1
|
||||
'
|
||||
Me.ToolStripSeparator1.Name = "ToolStripSeparator1"
|
||||
Me.ToolStripSeparator1.Size = New System.Drawing.Size(6, 25)
|
||||
'
|
||||
'ts_edit
|
||||
'
|
||||
Me.ts_edit.Image = CType(resources.GetObject("ts_edit.Image"), System.Drawing.Image)
|
||||
Me.ts_edit.ImageTransparentColor = System.Drawing.Color.Magenta
|
||||
Me.ts_edit.Name = "ts_edit"
|
||||
Me.ts_edit.Size = New System.Drawing.Size(62, 22)
|
||||
Me.ts_edit.Text = "Update"
|
||||
'
|
||||
'ToolStripSeparator2
|
||||
'
|
||||
Me.ToolStripSeparator2.Name = "ToolStripSeparator2"
|
||||
Me.ToolStripSeparator2.Size = New System.Drawing.Size(6, 25)
|
||||
'
|
||||
'ts_delete
|
||||
'
|
||||
Me.ts_delete.Image = CType(resources.GetObject("ts_delete.Image"), System.Drawing.Image)
|
||||
Me.ts_delete.ImageTransparentColor = System.Drawing.Color.Magenta
|
||||
Me.ts_delete.Name = "ts_delete"
|
||||
Me.ts_delete.Size = New System.Drawing.Size(58, 22)
|
||||
Me.ts_delete.Text = "Delete"
|
||||
'
|
||||
'ToolStripSeparator3
|
||||
'
|
||||
Me.ToolStripSeparator3.Name = "ToolStripSeparator3"
|
||||
Me.ToolStripSeparator3.Size = New System.Drawing.Size(6, 25)
|
||||
'
|
||||
'ts_find
|
||||
'
|
||||
Me.ts_find.Image = CType(resources.GetObject("ts_find.Image"), System.Drawing.Image)
|
||||
Me.ts_find.ImageTransparentColor = System.Drawing.Color.Magenta
|
||||
Me.ts_find.Name = "ts_find"
|
||||
Me.ts_find.Size = New System.Drawing.Size(47, 22)
|
||||
Me.ts_find.Text = "Find"
|
||||
'
|
||||
'ToolStripSeparator4
|
||||
'
|
||||
Me.ToolStripSeparator4.Name = "ToolStripSeparator4"
|
||||
Me.ToolStripSeparator4.Size = New System.Drawing.Size(6, 25)
|
||||
'
|
||||
'ts_save
|
||||
'
|
||||
Me.ts_save.Enabled = False
|
||||
Me.ts_save.Image = CType(resources.GetObject("ts_save.Image"), System.Drawing.Image)
|
||||
Me.ts_save.ImageTransparentColor = System.Drawing.Color.Magenta
|
||||
Me.ts_save.Name = "ts_save"
|
||||
Me.ts_save.Size = New System.Drawing.Size(77, 22)
|
||||
Me.ts_save.Text = "Save Data"
|
||||
'
|
||||
'ToolStrip1
|
||||
'
|
||||
Me.ToolStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ts_new, Me.ToolStripSeparator1, Me.ts_edit, Me.ToolStripSeparator2, Me.ts_delete, Me.ToolStripSeparator3, Me.ts_revert, Me.ToolStripSeparator5, Me.ts_save, Me.ToolStripSeparator4, Me.ts_find})
|
||||
Me.ToolStrip1.Location = New System.Drawing.Point(0, 0)
|
||||
Me.ToolStrip1.Name = "ToolStrip1"
|
||||
Me.ToolStrip1.Size = New System.Drawing.Size(512, 25)
|
||||
Me.ToolStrip1.TabIndex = 3
|
||||
'
|
||||
'ts_revert
|
||||
'
|
||||
Me.ts_revert.Enabled = False
|
||||
Me.ts_revert.Image = CType(resources.GetObject("ts_revert.Image"), System.Drawing.Image)
|
||||
Me.ts_revert.ImageTransparentColor = System.Drawing.Color.Magenta
|
||||
Me.ts_revert.Name = "ts_revert"
|
||||
Me.ts_revert.Size = New System.Drawing.Size(60, 22)
|
||||
Me.ts_revert.Text = "Revert"
|
||||
'
|
||||
'ToolStripSeparator5
|
||||
'
|
||||
Me.ToolStripSeparator5.Name = "ToolStripSeparator5"
|
||||
Me.ToolStripSeparator5.Size = New System.Drawing.Size(6, 25)
|
||||
'
|
||||
'machineForm
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.ClientSize = New System.Drawing.Size(512, 186)
|
||||
Me.ControlBox = False
|
||||
Me.Controls.Add(Me.GroupBox1)
|
||||
Me.Controls.Add(Me.ToolStrip1)
|
||||
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedSingle
|
||||
Me.Name = "machineForm"
|
||||
Me.StartPosition = System.Windows.Forms.FormStartPosition.Manual
|
||||
Me.Text = "Machine Maintenance"
|
||||
Me.GroupBox1.ResumeLayout(False)
|
||||
Me.GroupBox1.PerformLayout()
|
||||
Me.ToolStrip1.ResumeLayout(False)
|
||||
Me.ToolStrip1.PerformLayout()
|
||||
Me.ResumeLayout(False)
|
||||
Me.PerformLayout()
|
||||
|
||||
End Sub
|
||||
Friend WithEvents GroupBox1 As System.Windows.Forms.GroupBox
|
||||
Friend WithEvents cbActive As System.Windows.Forms.CheckBox
|
||||
Friend WithEvents txtMchName As System.Windows.Forms.TextBox
|
||||
Friend WithEvents txtMchCode As System.Windows.Forms.TextBox
|
||||
Friend WithEvents Label2 As System.Windows.Forms.Label
|
||||
Friend WithEvents Label1 As System.Windows.Forms.Label
|
||||
Friend WithEvents ts_new As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents ToolStripSeparator1 As System.Windows.Forms.ToolStripSeparator
|
||||
Friend WithEvents ts_edit As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents ToolStripSeparator2 As System.Windows.Forms.ToolStripSeparator
|
||||
Friend WithEvents ts_delete As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents ToolStripSeparator3 As System.Windows.Forms.ToolStripSeparator
|
||||
Friend WithEvents ts_find As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents ToolStripSeparator4 As System.Windows.Forms.ToolStripSeparator
|
||||
Friend WithEvents ts_save As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents ToolStrip1 As System.Windows.Forms.ToolStrip
|
||||
Friend WithEvents btn_find As System.Windows.Forms.Button
|
||||
Friend WithEvents ts_revert As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents ToolStripSeparator5 As System.Windows.Forms.ToolStripSeparator
|
||||
Friend WithEvents cmbPlant As System.Windows.Forms.ComboBox
|
||||
Friend WithEvents Label4 As System.Windows.Forms.Label
|
||||
Friend WithEvents txtMchModel As System.Windows.Forms.TextBox
|
||||
Friend WithEvents Label3 As System.Windows.Forms.Label
|
||||
Friend WithEvents Label6 As System.Windows.Forms.Label
|
||||
Friend WithEvents txtLine As System.Windows.Forms.TextBox
|
||||
End Class
|
@ -0,0 +1,315 @@
|
||||
Imports System
|
||||
Imports System.Data
|
||||
Imports System.Data.SqlClient
|
||||
Imports System.IO
|
||||
Imports System.Security
|
||||
Imports System.Security.Cryptography
|
||||
Imports System.Text
|
||||
Public Class Mounting
|
||||
Private _date As DateTime
|
||||
Private _sequence As String
|
||||
Private _revision As String
|
||||
Private _feeder As String
|
||||
Private _partNo As String
|
||||
Private _quantity As Double
|
||||
Private _lotNumber As String
|
||||
Private _operator As String
|
||||
Private _verify As Integer
|
||||
Private _3pL As String
|
||||
Private cnstr As String
|
||||
Private _sequenceno As String
|
||||
Private _lblserial As String
|
||||
|
||||
Public Property mDate() As DateTime
|
||||
Get
|
||||
Return _date
|
||||
End Get
|
||||
Set(ByVal value As DateTime)
|
||||
_date = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property machine() As String
|
||||
Get
|
||||
Return _sequence
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_sequence = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
|
||||
|
||||
|
||||
Public Property lblserial() As String
|
||||
Get
|
||||
Return _lblserial
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_lblserial = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
|
||||
Public Property sequenceno() As String
|
||||
Get
|
||||
Return _sequenceno
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_sequenceno = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property revision() As String
|
||||
Get
|
||||
Return _revision
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_revision = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property feeder() As String
|
||||
Get
|
||||
Return _feeder
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_feeder = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property partno() As String
|
||||
Get
|
||||
Return _partNo
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_partNo = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property quantity() As Double
|
||||
Get
|
||||
Return _quantity
|
||||
End Get
|
||||
Set(ByVal value As Double)
|
||||
_quantity = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property lotNumber As String
|
||||
Get
|
||||
Return _lotNumber
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_lotNumber = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property mOperator() As String
|
||||
Get
|
||||
Return _operator
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_operator = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property verify() As Integer
|
||||
Get
|
||||
Return _verify
|
||||
End Get
|
||||
Set(ByVal value As Integer)
|
||||
_verify = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property threePL() As String
|
||||
Get
|
||||
Return _3pL
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_3pL = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Sub New()
|
||||
cnstr = mainForm.cnstr
|
||||
End Sub
|
||||
|
||||
Public Sub add(ByVal reload As Boolean, ByVal qacheck As Boolean, ByVal status As Boolean)
|
||||
Dim conn As New SqlConnection(cnstr)
|
||||
Dim active As Integer = 0
|
||||
|
||||
Dim myQuery As String
|
||||
Dim myStatus As String = ""
|
||||
|
||||
If status = False Then
|
||||
myStatus = "fail"
|
||||
Else
|
||||
myStatus = "pass"
|
||||
End If
|
||||
|
||||
|
||||
If qacheck Then
|
||||
myQuery = "INSERT INTO kmounting VALUES (" & _
|
||||
"'" & Me.mDate & "'," & _
|
||||
"'" & Me.machine & "'," & _
|
||||
"'" & Me.revision & "'," & _
|
||||
"'" & Me.feeder & "'," & _
|
||||
"'" & Me.partno & "'," & _
|
||||
Me.quantity & "," & _
|
||||
"'" & Me.lotNumber & "'," & _
|
||||
"'" & Me.mOperator & "'," & _
|
||||
Me.verify & "," & _
|
||||
"'qa-" & myStatus & "'," & _
|
||||
"'" & Me.sequenceno & "'," & _
|
||||
"'" & Me.lblserial & "')"
|
||||
Else
|
||||
If reload Then
|
||||
myQuery = "INSERT INTO kmounting VALUES (" & _
|
||||
"'" & Me.mDate & "'," & _
|
||||
"'" & Me.machine & "'," & _
|
||||
"'" & Me.revision & "'," & _
|
||||
"'" & Me.feeder & "'," & _
|
||||
"'" & Me.partno & "'," & _
|
||||
Me.quantity & "," & _
|
||||
"'" & Me.lotNumber & "'," & _
|
||||
"'" & Me.mOperator & "'," & _
|
||||
Me.verify & "," & _
|
||||
"'reload-" & myStatus & "'," & _
|
||||
"'" & Me.sequenceno & "'," & _
|
||||
"'" & Me.lblserial & "')"
|
||||
Else
|
||||
myQuery = "INSERT INTO kmounting VALUES (" & _
|
||||
"'" & Me.mDate & "'," & _
|
||||
"'" & Me.machine & "'," & _
|
||||
"'" & Me.revision & "'," & _
|
||||
"'" & Me.feeder & "'," & _
|
||||
"'" & Me.partno & "'," & _
|
||||
Me.quantity & "," & _
|
||||
"'" & Me.lotNumber & "'," & _
|
||||
"'" & Me.mOperator & "'," & _
|
||||
Me.verify & "," & _
|
||||
"'op-" & myStatus & "'," & _
|
||||
"'" & Me.sequenceno & "'," & _
|
||||
"'" & Me.lblserial & "')"
|
||||
End If
|
||||
|
||||
End If
|
||||
|
||||
|
||||
Dim mycommand As SqlCommand
|
||||
mycommand = New SqlCommand(myQuery, conn)
|
||||
|
||||
Try
|
||||
conn.Open()
|
||||
mycommand.ExecuteNonQuery()
|
||||
Catch ex As Exception
|
||||
MessageBox.Show(ex.Message, "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
|
||||
Finally
|
||||
conn.Close()
|
||||
conn.Dispose()
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
Public Sub add_hist(ByVal reload As Boolean, ByVal qacheck As Boolean, ByVal status As Boolean)
|
||||
Dim conn As New SqlConnection(cnstr)
|
||||
Dim active As Integer = 0
|
||||
|
||||
Dim myQuery As String
|
||||
Dim myStatus As String = ""
|
||||
|
||||
If status = False Then
|
||||
myStatus = "-fail"
|
||||
End If
|
||||
|
||||
If reload = True And qacheck = False Then
|
||||
myQuery = "INSERT INTO kmounting_hist VALUES (" & _
|
||||
"'" & Me.mDate & "'," & _
|
||||
"'" & Me.machine & "'," & _
|
||||
"'" & Me.revision & "'," & _
|
||||
"'" & Me.feeder & "'," & _
|
||||
"'" & Me.partno & "'," & _
|
||||
Me.quantity & "," & _
|
||||
"'" & Me.lotNumber & "'," & _
|
||||
"'" & Me.mOperator & "'," & _
|
||||
Me.verify & "," & _
|
||||
"'reload" & myStatus & "')"
|
||||
ElseIf reload = False And qacheck = True Then
|
||||
myQuery = "INSERT INTO kmounting_hist VALUES (" & _
|
||||
"'" & Me.mDate & "'," & _
|
||||
"'" & Me.machine & "'," & _
|
||||
"'" & Me.revision & "'," & _
|
||||
"'" & Me.feeder & "'," & _
|
||||
"'" & Me.partno & "'," & _
|
||||
"0," & _
|
||||
"''," & _
|
||||
"'" & Me.mOperator & "'," & _
|
||||
Me.verify & "," & _
|
||||
"'check" & myStatus & "')"
|
||||
Else
|
||||
myQuery = "INSERT INTO kmounting_hist VALUES (" & _
|
||||
"'" & Me.mDate & "'," & _
|
||||
"'" & Me.machine & "'," & _
|
||||
"'" & Me.revision & "'," & _
|
||||
"'" & Me.feeder & "'," & _
|
||||
"'" & Me.partno & "'," & _
|
||||
Me.quantity & "," & _
|
||||
"'" & Me.lotNumber & "'," & _
|
||||
"'" & Me.mOperator & "'," & _
|
||||
Me.verify & "," & _
|
||||
"'" & Me.threePL & myStatus & "')"
|
||||
End If
|
||||
|
||||
|
||||
Dim mycommand As SqlCommand
|
||||
mycommand = New SqlCommand(myQuery, conn)
|
||||
|
||||
Try
|
||||
conn.Open()
|
||||
mycommand.ExecuteNonQuery()
|
||||
Catch ex As Exception
|
||||
MessageBox.Show(ex.Message, "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
|
||||
Finally
|
||||
conn.Close()
|
||||
conn.Dispose()
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
Public Sub addSettings(ByVal line As String, ByVal ksequence As String)
|
||||
Dim conn As New SqlConnection(cnstr)
|
||||
Dim active As Integer = 0
|
||||
|
||||
Dim myQuery As String
|
||||
Dim myStatus As String = ""
|
||||
|
||||
myQuery = "SELECT * from KSETTINGS WHERE line = '" & line & "'"
|
||||
|
||||
Dim mycommand As SqlCommand
|
||||
mycommand = New SqlCommand(myQuery, conn)
|
||||
|
||||
Try
|
||||
conn.Open()
|
||||
Dim reader = mycommand.ExecuteReader
|
||||
If reader.HasRows Then
|
||||
reader.Close()
|
||||
myQuery = "UPDATE KSETTINGS SET ksequence = '" & ksequence & "' WHERE line = '" & line & "'"
|
||||
mycommand = New SqlCommand(myQuery, conn)
|
||||
mycommand.ExecuteNonQuery()
|
||||
Else
|
||||
reader.Close()
|
||||
myQuery = "INSERT INTO KSETTINGS(line,ksequence) VALUES(" & line & ",'" & ksequence & "')"
|
||||
mycommand = New SqlCommand(myQuery, conn)
|
||||
mycommand.ExecuteNonQuery()
|
||||
End If
|
||||
Catch ex As Exception
|
||||
MessageBox.Show(ex.Message, "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
|
||||
Finally
|
||||
conn.Close()
|
||||
conn.Dispose()
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
|
||||
|
||||
End Class
|
@ -0,0 +1,25 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<asmv1:assembly xsi:schemaLocation="urn:schemas-microsoft-com:asm.v1 assembly.adaptive.xsd" manifestVersion="1.0" xmlns:asmv3="urn:schemas-microsoft-com:asm.v3" xmlns:dsig="http://www.w3.org/2000/09/xmldsig#" xmlns:co.v1="urn:schemas-microsoft-com:clickonce.v1" xmlns:co.v2="urn:schemas-microsoft-com:clickonce.v2" xmlns="urn:schemas-microsoft-com:asm.v2" xmlns:asmv1="urn:schemas-microsoft-com:asm.v1" xmlns:asmv2="urn:schemas-microsoft-com:asm.v2" xmlns:xrml="urn:mpeg:mpeg21:2003:01-REL-R-NS" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance">
|
||||
<assemblyIdentity name="Kanban System.application" version="1.0.0.10" publicKeyToken="23135af9664d69f7" language="neutral" processorArchitecture="msil" xmlns="urn:schemas-microsoft-com:asm.v1" />
|
||||
<description asmv2:publisher="Ionics EMS, Inc." asmv2:product="Kanban" xmlns="urn:schemas-microsoft-com:asm.v1" />
|
||||
<deployment install="true" mapFileExtensions="true">
|
||||
<subscription>
|
||||
<update>
|
||||
<beforeApplicationStartup />
|
||||
</update>
|
||||
</subscription>
|
||||
<deploymentProvider codebase="file://192.168.1.23/Projects/Mounting%20Sequence/Mounting%20Sequence/Installer/Kanban%20System.application" />
|
||||
</deployment>
|
||||
<dependency>
|
||||
<dependentAssembly dependencyType="install" codebase="Application Files\Kanban System_1_0_0_10\Kanban System.exe.manifest" size="7744">
|
||||
<assemblyIdentity name="Kanban System.exe" version="1.0.0.10" publicKeyToken="23135af9664d69f7" language="neutral" processorArchitecture="msil" type="win32" />
|
||||
<hash>
|
||||
<dsig:Transforms>
|
||||
<dsig:Transform Algorithm="urn:schemas-microsoft-com:HashTransforms.Identity" />
|
||||
</dsig:Transforms>
|
||||
<dsig:DigestMethod Algorithm="http://www.w3.org/2000/09/xmldsig#sha1" />
|
||||
<dsig:DigestValue>EzJeNI91CSjQZobLmJ7u9wM7O0Y=</dsig:DigestValue>
|
||||
</hash>
|
||||
</dependentAssembly>
|
||||
</dependency>
|
||||
<publisherIdentity name="CN=IONICS\charlie.gerodias" issuerKeyHash="709f262409d189ec19f7b1912bfef9069d56bffe" /><Signature Id="StrongNameSignature" xmlns="http://www.w3.org/2000/09/xmldsig#"><SignedInfo><CanonicalizationMethod Algorithm="http://www.w3.org/2001/10/xml-exc-c14n#" /><SignatureMethod Algorithm="http://www.w3.org/2000/09/xmldsig#rsa-sha1" /><Reference URI=""><Transforms><Transform Algorithm="http://www.w3.org/2000/09/xmldsig#enveloped-signature" /><Transform Algorithm="http://www.w3.org/2001/10/xml-exc-c14n#" /></Transforms><DigestMethod Algorithm="http://www.w3.org/2000/09/xmldsig#sha1" /><DigestValue>MByRp9EK3Jh/hxlEJ+plr3YvHcU=</DigestValue></Reference></SignedInfo><SignatureValue>i16tjHLN5ZPL1kkKn5/yHUj5vku6BrYlJg2gxud/IIeMrNESBWvc9DvQbrqAOQefUSyoRKljtwHijNMUSh7pAQJ7wYCMC587c3A7jpIlximu7Q/lnSNpxbgCxm6rdRRaTO6OzFCkf5UekPXXDsu0J0Xiu2Pq34JUREgNySuGvWY=</SignatureValue><KeyInfo Id="StrongNameKeyInfo"><KeyValue><RSAKeyValue><Modulus>5BtbQSO8rPhmsTRH0Y26M53ZThJ+nUjuYoDnqiBgV/PdnZeJjGQ2bs5ALzWb/bAqFZZn0tBRWuiBSpvj6OT3WPtU5ST0CVdC+ZpFABwD72Qu6Aub9ZFRuwCj1+pB5EziuW2Ut8ABCzpame3lfeNzoErWb41ywrkQoHBFEtBYXE8=</Modulus><Exponent>AQAB</Exponent></RSAKeyValue></KeyValue><msrel:RelData xmlns:msrel="http://schemas.microsoft.com/windows/rel/2005/reldata"><r:license xmlns:r="urn:mpeg:mpeg21:2003:01-REL-R-NS" xmlns:as="http://schemas.microsoft.com/windows/pki/2005/Authenticode"><r:grant><as:ManifestInformation Hash="c51d2f76af65ea274419877f98dc0ad1a7911c30" Description="" Url=""><as:assemblyIdentity name="Kanban System.application" version="1.0.0.10" publicKeyToken="23135af9664d69f7" language="neutral" processorArchitecture="msil" xmlns="urn:schemas-microsoft-com:asm.v1" /></as:ManifestInformation><as:SignedBy /><as:AuthenticodePublisher><as:X509SubjectName>CN=IONICS\charlie.gerodias</as:X509SubjectName></as:AuthenticodePublisher></r:grant><r:issuer><Signature Id="AuthenticodeSignature" xmlns="http://www.w3.org/2000/09/xmldsig#"><SignedInfo><CanonicalizationMethod Algorithm="http://www.w3.org/2001/10/xml-exc-c14n#" /><SignatureMethod Algorithm="http://www.w3.org/2000/09/xmldsig#rsa-sha1" /><Reference URI=""><Transforms><Transform Algorithm="http://www.w3.org/2000/09/xmldsig#enveloped-signature" /><Transform Algorithm="http://www.w3.org/2001/10/xml-exc-c14n#" /></Transforms><DigestMethod Algorithm="http://www.w3.org/2000/09/xmldsig#sha1" /><DigestValue>XG/JoppArMzQVuZIAFMypNCAgRI=</DigestValue></Reference></SignedInfo><SignatureValue>qPx8fL2/1jWSRkat03gO5MSh/8r1XZaOBiSnx8K5OvO+gVWyAIVIzplcQxDfmllVhOXSR+BmGomLuCLoCo0fuMEgReKndygEcD3/q3I7Hx2HBRsL4gfBO+BX2g7i906bsABhUOLFAiNF+zDi/kJyP8vjI2Kt5mjltwbPYHxAV44=</SignatureValue><KeyInfo><KeyValue><RSAKeyValue><Modulus>5BtbQSO8rPhmsTRH0Y26M53ZThJ+nUjuYoDnqiBgV/PdnZeJjGQ2bs5ALzWb/bAqFZZn0tBRWuiBSpvj6OT3WPtU5ST0CVdC+ZpFABwD72Qu6Aub9ZFRuwCj1+pB5EziuW2Ut8ABCzpame3lfeNzoErWb41ywrkQoHBFEtBYXE8=</Modulus><Exponent>AQAB</Exponent></RSAKeyValue></KeyValue><X509Data><X509Certificate>MIIB7TCCAVqgAwIBAgIQeTxnQVX6FpVBogp+Ii3SnjAJBgUrDgMCHQUAMDkxNzA1BgNVBAMeLgBJAE8ATgBJAEMAUwBcAGMAaABhAHIAbABpAGUALgBnAGUAcgBvAGQAaQBhAHMwHhcNMTMwNTMwMDkzODA1WhcNMTQwNTMwMTUzODA1WjA5MTcwNQYDVQQDHi4ASQBPAE4ASQBDAFMAXABjAGgAYQByAGwAaQBlAC4AZwBlAHIAbwBkAGkAYQBzMIGfMA0GCSqGSIb3DQEBAQUAA4GNADCBiQKBgQDkG1tBI7ys+GaxNEfRjbozndlOEn6dSO5igOeqIGBX892dl4mMZDZuzkAvNZv9sCoVlmfS0FFa6IFKm+Po5PdY+1TlJPQJV0L5mkUAHAPvZC7oC5v1kVG7AKPX6kHkTOK5bZS3wAELOlqZ7eV943OgStZvjXLCuRCgcEUS0FhcTwIDAQABMAkGBSsOAwIdBQADgYEAtDfGKCa7lgB6c43lZX63ZN1gBgUlbWaPkZRFAtSkIJNoEbfydq8eriGeO01/73IFrCUZhIdSEXi7PRcEKp4oDSlCKbrJsF0m5aOAWKrJS0DFPC1oqTiTlV5ZdqU279ZAOm2AeR90jKNm3AHjImyb+ZGKEQQKZ0HH16OthENpZ4I=</X509Certificate></X509Data></KeyInfo></Signature></r:issuer></r:license></msrel:RelData></KeyInfo></Signature></asmv1:assembly>
|
Binary file not shown.
Binary file not shown.
Binary file not shown.
141147
.svn/pristine/3f/3f8d71860f25c7d4b84d974ac560f08ac35f6b2d.svn-base
Normal file
141147
.svn/pristine/3f/3f8d71860f25c7d4b84d974ac560f08ac35f6b2d.svn-base
Normal file
File diff suppressed because it is too large
Load Diff
@ -0,0 +1,125 @@
|
||||
Public Class issuanceForm
|
||||
Private isUpdate = False
|
||||
Private Sub txtSerial_KeyPress(ByVal sender As System.Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles txtSerial.KeyPress
|
||||
If Asc(e.KeyChar) = 13 Then
|
||||
Dim parts = New PartsRecords(txtSerial.Text)
|
||||
If parts.Exist Then
|
||||
txtPN.Text = parts.IonicsPN
|
||||
txtDesc.Text = parts.Description
|
||||
txtLot.Text = parts.LotNo
|
||||
txtBox.Text = parts.Rack
|
||||
txtQuantity.Text = parts.Quantity
|
||||
lblStatus.Text = parts.Status
|
||||
lblMFGDate.Text = parts.MFGDate
|
||||
lblRCVDate.Text = parts.RCVDate
|
||||
lblPDate.Text = parts.PrintedDate
|
||||
lblBy.Text = parts.PrintedBy
|
||||
cmbStatus.SelectedItem = parts.Status
|
||||
enable()
|
||||
|
||||
If parts.Status <> "WHS" And parts.Status <> "LST" Then
|
||||
btnIssue.Enabled = False
|
||||
btnUpdate.Enabled = False
|
||||
ElseIf parts.Status = "LST" Then
|
||||
btnIssue.Enabled = False
|
||||
End If
|
||||
|
||||
If parts.Remarks <> "" Then
|
||||
txtRemarks.Text = parts.Remarks
|
||||
Else
|
||||
txtRemarks.Text = "N/A"
|
||||
End If
|
||||
|
||||
Else
|
||||
MessageBox.Show("Item not found.", "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
|
||||
End If
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Public Sub enable()
|
||||
btnIssue.Enabled = True
|
||||
btnReset.Enabled = True
|
||||
btnUpdate.Enabled = True
|
||||
End Sub
|
||||
|
||||
Public Sub reset()
|
||||
txtSerial.Text = Nothing
|
||||
txtPN.Text = Nothing
|
||||
txtDesc.Text = Nothing
|
||||
txtLot.Text = Nothing
|
||||
txtBox.Text = Nothing
|
||||
txtQuantity.Text = Nothing
|
||||
txtRemarks.ReadOnly = True
|
||||
txtRemarks.Text = Nothing
|
||||
cmbStatus.SelectedText = Nothing
|
||||
cmbStatus.Text = Nothing
|
||||
cmbStatus.Enabled = False
|
||||
lblStatus.Text = Nothing
|
||||
lblMFGDate.Text = Nothing
|
||||
lblRCVDate.Text = Nothing
|
||||
lblPDate.Text = Nothing
|
||||
lblBy.Text = Nothing
|
||||
btnIssue.Enabled = False
|
||||
btnReset.Enabled = False
|
||||
isUpdate = False
|
||||
btnUpdate.Text = "Update"
|
||||
btnUpdate.Enabled = False
|
||||
End Sub
|
||||
|
||||
Public Sub updatemode()
|
||||
txtRemarks.ReadOnly = False
|
||||
cmbStatus.Enabled = True
|
||||
btnUpdate.Text = "Save"
|
||||
btnIssue.Enabled = False
|
||||
isUpdate = True
|
||||
End Sub
|
||||
|
||||
Private Sub issuanceForm_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
|
||||
Me.MdiParent = mainForm
|
||||
Control.CheckForIllegalCrossThreadCalls = False
|
||||
If loginForm.userType = "Supervisor" Then
|
||||
btnUpdate.Visible = True
|
||||
Else
|
||||
btnUpdate.Visible = False
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub btnReset_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnReset.Click
|
||||
reset()
|
||||
End Sub
|
||||
|
||||
Private Sub btnIssue_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnIssue.Click
|
||||
Dim parts As New PartsRecords
|
||||
If Not parts.issue(txtSerial.Text, txtPN.Text, DateTime.Parse(lblMFGDate.Text)) Then
|
||||
If MessageBox.Show("There are older items are you sure you want to continue?", "Error", MessageBoxButtons.YesNo, MessageBoxIcon.Error) = Windows.Forms.DialogResult.Yes Then
|
||||
parts.issue2(txtSerial.Text, txtPN.Text, DateTime.Parse(lblMFGDate.Text))
|
||||
reset()
|
||||
End If
|
||||
Else
|
||||
reset()
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub btnUpdate_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnUpdate.Click
|
||||
If isUpdate Then
|
||||
Dim parts As New PartsRecords
|
||||
If cmbStatus.SelectedItem = "LST" And (txtRemarks.Text = "N/A" Or txtRemarks.Text = "") Then
|
||||
MessageBox.Show("Please provide proper remarks.", "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
|
||||
|
||||
Else
|
||||
If parts.updateStatus(txtSerial.Text, cmbStatus.SelectedItem, txtRemarks.Text) Then
|
||||
MessageBox.Show("Successfully Saved.", "Message", MessageBoxButtons.OK, MessageBoxIcon.Information)
|
||||
|
||||
End If
|
||||
reset()
|
||||
|
||||
End If
|
||||
Else
|
||||
updatemode()
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub txtRemarks_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles txtRemarks.TextChanged
|
||||
|
||||
End Sub
|
||||
End Class
|
@ -0,0 +1,235 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
||||
Partial Class partsForm
|
||||
Inherits System.Windows.Forms.Form
|
||||
|
||||
'Form overrides dispose to clean up the component list.
|
||||
<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
|
||||
|
||||
'Required by the Windows Form Designer
|
||||
Private components As System.ComponentModel.IContainer
|
||||
|
||||
'NOTE: The following procedure is required by the Windows Form Designer
|
||||
'It can be modified using the Windows Form Designer.
|
||||
'Do not modify it using the code editor.
|
||||
<System.Diagnostics.DebuggerStepThrough()> _
|
||||
Private Sub InitializeComponent()
|
||||
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(partsForm))
|
||||
Me.GroupBox1 = New System.Windows.Forms.GroupBox()
|
||||
Me.txtDesc = New System.Windows.Forms.TextBox()
|
||||
Me.txtPartno = New System.Windows.Forms.TextBox()
|
||||
Me.Label2 = New System.Windows.Forms.Label()
|
||||
Me.Label1 = New System.Windows.Forms.Label()
|
||||
Me.btn_find = New System.Windows.Forms.Button()
|
||||
Me.ToolStrip1 = New System.Windows.Forms.ToolStrip()
|
||||
Me.ts_new = New System.Windows.Forms.ToolStripButton()
|
||||
Me.ToolStripSeparator1 = New System.Windows.Forms.ToolStripSeparator()
|
||||
Me.ts_edit = New System.Windows.Forms.ToolStripButton()
|
||||
Me.ToolStripSeparator2 = New System.Windows.Forms.ToolStripSeparator()
|
||||
Me.ts_delete = New System.Windows.Forms.ToolStripButton()
|
||||
Me.ToolStripSeparator3 = New System.Windows.Forms.ToolStripSeparator()
|
||||
Me.ts_revert = New System.Windows.Forms.ToolStripButton()
|
||||
Me.ToolStripSeparator5 = New System.Windows.Forms.ToolStripSeparator()
|
||||
Me.ts_save = New System.Windows.Forms.ToolStripButton()
|
||||
Me.ToolStripSeparator4 = New System.Windows.Forms.ToolStripSeparator()
|
||||
Me.ts_find = New System.Windows.Forms.ToolStripButton()
|
||||
Me.txtUsername = New System.Windows.Forms.TextBox()
|
||||
Me.GroupBox1.SuspendLayout()
|
||||
Me.ToolStrip1.SuspendLayout()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'GroupBox1
|
||||
'
|
||||
Me.GroupBox1.Controls.Add(Me.txtDesc)
|
||||
Me.GroupBox1.Controls.Add(Me.txtPartno)
|
||||
Me.GroupBox1.Controls.Add(Me.Label2)
|
||||
Me.GroupBox1.Controls.Add(Me.Label1)
|
||||
Me.GroupBox1.Controls.Add(Me.btn_find)
|
||||
Me.GroupBox1.Font = New System.Drawing.Font("Calibri", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.GroupBox1.Location = New System.Drawing.Point(6, 30)
|
||||
Me.GroupBox1.Name = "GroupBox1"
|
||||
Me.GroupBox1.Size = New System.Drawing.Size(499, 92)
|
||||
Me.GroupBox1.TabIndex = 4
|
||||
Me.GroupBox1.TabStop = False
|
||||
Me.GroupBox1.Text = "Information"
|
||||
'
|
||||
'txtDesc
|
||||
'
|
||||
Me.txtDesc.Enabled = False
|
||||
Me.txtDesc.Location = New System.Drawing.Point(124, 48)
|
||||
Me.txtDesc.Name = "txtDesc"
|
||||
Me.txtDesc.Size = New System.Drawing.Size(360, 23)
|
||||
Me.txtDesc.TabIndex = 1
|
||||
'
|
||||
'txtPartno
|
||||
'
|
||||
Me.txtPartno.Enabled = False
|
||||
Me.txtPartno.Location = New System.Drawing.Point(124, 21)
|
||||
Me.txtPartno.Name = "txtPartno"
|
||||
Me.txtPartno.Size = New System.Drawing.Size(159, 23)
|
||||
Me.txtPartno.TabIndex = 0
|
||||
'
|
||||
'Label2
|
||||
'
|
||||
Me.Label2.AutoSize = True
|
||||
Me.Label2.Location = New System.Drawing.Point(47, 51)
|
||||
Me.Label2.Name = "Label2"
|
||||
Me.Label2.Size = New System.Drawing.Size(74, 15)
|
||||
Me.Label2.TabIndex = 1
|
||||
Me.Label2.Text = "Description:"
|
||||
'
|
||||
'Label1
|
||||
'
|
||||
Me.Label1.AutoSize = True
|
||||
Me.Label1.Location = New System.Drawing.Point(42, 25)
|
||||
Me.Label1.Name = "Label1"
|
||||
Me.Label1.Size = New System.Drawing.Size(79, 15)
|
||||
Me.Label1.TabIndex = 0
|
||||
Me.Label1.Text = "Part Number:"
|
||||
'
|
||||
'btn_find
|
||||
'
|
||||
Me.btn_find.Location = New System.Drawing.Point(296, 19)
|
||||
Me.btn_find.Name = "btn_find"
|
||||
Me.btn_find.Size = New System.Drawing.Size(75, 23)
|
||||
Me.btn_find.TabIndex = 7
|
||||
Me.btn_find.Text = "GO"
|
||||
Me.btn_find.UseVisualStyleBackColor = True
|
||||
'
|
||||
'ToolStrip1
|
||||
'
|
||||
Me.ToolStrip1.Font = New System.Drawing.Font("Calibri", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.ToolStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ts_new, Me.ToolStripSeparator1, Me.ts_edit, Me.ToolStripSeparator2, Me.ts_delete, Me.ToolStripSeparator3, Me.ts_revert, Me.ToolStripSeparator5, Me.ts_save, Me.ToolStripSeparator4, Me.ts_find})
|
||||
Me.ToolStrip1.Location = New System.Drawing.Point(0, 0)
|
||||
Me.ToolStrip1.Name = "ToolStrip1"
|
||||
Me.ToolStrip1.Size = New System.Drawing.Size(513, 25)
|
||||
Me.ToolStrip1.TabIndex = 5
|
||||
'
|
||||
'ts_new
|
||||
'
|
||||
Me.ts_new.Image = CType(resources.GetObject("ts_new.Image"), System.Drawing.Image)
|
||||
Me.ts_new.ImageTransparentColor = System.Drawing.Color.Magenta
|
||||
Me.ts_new.Name = "ts_new"
|
||||
Me.ts_new.Size = New System.Drawing.Size(59, 22)
|
||||
Me.ts_new.Text = "Insert"
|
||||
'
|
||||
'ToolStripSeparator1
|
||||
'
|
||||
Me.ToolStripSeparator1.Name = "ToolStripSeparator1"
|
||||
Me.ToolStripSeparator1.Size = New System.Drawing.Size(6, 25)
|
||||
'
|
||||
'ts_edit
|
||||
'
|
||||
Me.ts_edit.Image = CType(resources.GetObject("ts_edit.Image"), System.Drawing.Image)
|
||||
Me.ts_edit.ImageTransparentColor = System.Drawing.Color.Magenta
|
||||
Me.ts_edit.Name = "ts_edit"
|
||||
Me.ts_edit.Size = New System.Drawing.Size(67, 22)
|
||||
Me.ts_edit.Text = "Update"
|
||||
'
|
||||
'ToolStripSeparator2
|
||||
'
|
||||
Me.ToolStripSeparator2.Name = "ToolStripSeparator2"
|
||||
Me.ToolStripSeparator2.Size = New System.Drawing.Size(6, 25)
|
||||
'
|
||||
'ts_delete
|
||||
'
|
||||
Me.ts_delete.Image = CType(resources.GetObject("ts_delete.Image"), System.Drawing.Image)
|
||||
Me.ts_delete.ImageTransparentColor = System.Drawing.Color.Magenta
|
||||
Me.ts_delete.Name = "ts_delete"
|
||||
Me.ts_delete.Size = New System.Drawing.Size(64, 22)
|
||||
Me.ts_delete.Text = "Delete"
|
||||
'
|
||||
'ToolStripSeparator3
|
||||
'
|
||||
Me.ToolStripSeparator3.Name = "ToolStripSeparator3"
|
||||
Me.ToolStripSeparator3.Size = New System.Drawing.Size(6, 25)
|
||||
'
|
||||
'ts_revert
|
||||
'
|
||||
Me.ts_revert.Enabled = False
|
||||
Me.ts_revert.Image = CType(resources.GetObject("ts_revert.Image"), System.Drawing.Image)
|
||||
Me.ts_revert.ImageTransparentColor = System.Drawing.Color.Magenta
|
||||
Me.ts_revert.Name = "ts_revert"
|
||||
Me.ts_revert.Size = New System.Drawing.Size(61, 22)
|
||||
Me.ts_revert.Text = "Revert"
|
||||
'
|
||||
'ToolStripSeparator5
|
||||
'
|
||||
Me.ToolStripSeparator5.Name = "ToolStripSeparator5"
|
||||
Me.ToolStripSeparator5.Size = New System.Drawing.Size(6, 25)
|
||||
'
|
||||
'ts_save
|
||||
'
|
||||
Me.ts_save.Enabled = False
|
||||
Me.ts_save.Image = CType(resources.GetObject("ts_save.Image"), System.Drawing.Image)
|
||||
Me.ts_save.ImageTransparentColor = System.Drawing.Color.Magenta
|
||||
Me.ts_save.Name = "ts_save"
|
||||
Me.ts_save.Size = New System.Drawing.Size(81, 22)
|
||||
Me.ts_save.Text = "Save Data"
|
||||
'
|
||||
'ToolStripSeparator4
|
||||
'
|
||||
Me.ToolStripSeparator4.Name = "ToolStripSeparator4"
|
||||
Me.ToolStripSeparator4.Size = New System.Drawing.Size(6, 25)
|
||||
'
|
||||
'ts_find
|
||||
'
|
||||
Me.ts_find.Image = CType(resources.GetObject("ts_find.Image"), System.Drawing.Image)
|
||||
Me.ts_find.ImageTransparentColor = System.Drawing.Color.Magenta
|
||||
Me.ts_find.Name = "ts_find"
|
||||
Me.ts_find.Size = New System.Drawing.Size(51, 22)
|
||||
Me.ts_find.Text = "Find"
|
||||
'
|
||||
'txtUsername
|
||||
'
|
||||
Me.txtUsername.Enabled = False
|
||||
Me.txtUsername.Location = New System.Drawing.Point(124, 21)
|
||||
Me.txtUsername.Name = "txtUsername"
|
||||
Me.txtUsername.Size = New System.Drawing.Size(159, 20)
|
||||
Me.txtUsername.TabIndex = 0
|
||||
'
|
||||
'partsForm
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.ClientSize = New System.Drawing.Size(513, 130)
|
||||
Me.Controls.Add(Me.GroupBox1)
|
||||
Me.Controls.Add(Me.ToolStrip1)
|
||||
Me.Name = "partsForm"
|
||||
Me.Text = "Part Number Maintenance"
|
||||
Me.GroupBox1.ResumeLayout(False)
|
||||
Me.GroupBox1.PerformLayout()
|
||||
Me.ToolStrip1.ResumeLayout(False)
|
||||
Me.ToolStrip1.PerformLayout()
|
||||
Me.ResumeLayout(False)
|
||||
Me.PerformLayout()
|
||||
|
||||
End Sub
|
||||
Friend WithEvents GroupBox1 As System.Windows.Forms.GroupBox
|
||||
Friend WithEvents txtDesc As System.Windows.Forms.TextBox
|
||||
Friend WithEvents txtPartno As System.Windows.Forms.TextBox
|
||||
Friend WithEvents Label2 As System.Windows.Forms.Label
|
||||
Friend WithEvents Label1 As System.Windows.Forms.Label
|
||||
Friend WithEvents ToolStrip1 As System.Windows.Forms.ToolStrip
|
||||
Friend WithEvents ts_new As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents ToolStripSeparator1 As System.Windows.Forms.ToolStripSeparator
|
||||
Friend WithEvents ts_edit As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents ToolStripSeparator2 As System.Windows.Forms.ToolStripSeparator
|
||||
Friend WithEvents ts_delete As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents ToolStripSeparator3 As System.Windows.Forms.ToolStripSeparator
|
||||
Friend WithEvents ts_revert As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents ToolStripSeparator5 As System.Windows.Forms.ToolStripSeparator
|
||||
Friend WithEvents ts_save As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents ToolStripSeparator4 As System.Windows.Forms.ToolStripSeparator
|
||||
Friend WithEvents ts_find As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents btn_find As System.Windows.Forms.Button
|
||||
Friend WithEvents txtUsername As System.Windows.Forms.TextBox
|
||||
End Class
|
Binary file not shown.
Binary file not shown.
Binary file not shown.
@ -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>
|
@ -0,0 +1,227 @@
|
||||
<?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.Runtime.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:import namespace="http://www.w3.org/XML/1998/namespace" />
|
||||
<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" use="required" type="xsd:string" />
|
||||
<xsd:attribute name="type" type="xsd:string" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</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" use="required" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</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>
|
||||
<metadata name="ToolStrip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>17, 17</value>
|
||||
</metadata>
|
||||
<assembly alias="System.Drawing" name="System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
|
||||
<data name="ts_new.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
|
||||
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAAwdJREFUOE+N03lI
|
||||
k2EcB/A557HXY+/mdN7z3OaRm8cKu1CQolkRZQpiKZGZ/mPlgalZadqhqGlF5VXRQVJBYklGKmlaqRnk
|
||||
nVfqcnaIR97ot3eTIiyrH/z+ep7v53l5n9+jTvt7mVLLBlSD6tl/7P25LOY6alzyCdNsjshUHz2SoTa5
|
||||
J1ld7iLTqKLRaeHULmJlSJMRJT1ETKS1kLg5xcL1SRIF30hcHucgS2GAkLtsmG1gVlOA6HdEWzt+UzYX
|
||||
hTMcFI6RyP3IRuagDtIHdJDWx0ZCtzHiP5oj/K05zDcTnRRg9SviKdnBWSic5eDKJxZy5CQuDrGRr7BE
|
||||
0bAdriqMkCtnIek9DxFdfPhV8UE4EPcpgK5CCBFRfKKdi7wRFk5/MEBqnz4y+s3RM12B0fkPKPkchpQ+
|
||||
LaT3sxHbYYygTjs4xfAWqahUmWdKQvX6875xcLLHCDEdbES2MXC00whf5nqhrAfD0QhvpSGqQwfHugwR
|
||||
0mqD9XeswTDSjFICFrJUYiJ7xBARzTyc6fbBLXkkiofiMDavUAH1o/dwfTAcRYMHENtug33NFthQKgAp
|
||||
IbKUgFXAWWIyeYiH3Q1slCouqEJ/qrmFaUS3SBHQZALPUiF03XRzlIDhtjitr4lyE8hqjZHXmwTFTD+G
|
||||
ZwYwvzincsbmRjA03Ye28Qbsb/KAbz0fkmIRmAJmqhJQk+zUakwcMIFvrR221rhgV5079r72wuDU0j/I
|
||||
7zmHbS+c4FfnAVmNEF6vnGGbYQuaBt1/6RYM6DEhD7kIbreDtFwEyRM+vCvFGJ6Wq4CsjlNwLONhzVN7
|
||||
rK1whGu1K/R8uQPKr/8xC/rW3lpvDlJDsrVRBMfHzpCUeSCt5RwKuq8hsDYIwlIKLneB60t3mMVZKU8P
|
||||
Xj6NDrZbmG3+zyyw/Z0DpM9dYF0mhOUjAQTlqyCpdoO40hWm0XwwSMbxld6DCWmvmS84rDu58QYf60rs
|
||||
sbpEBPFtIWxSrKDvw2mmgoH/8yqdNAh6KClmprM8dM9rW2snUCEZ1XrLw98BygqlsVvsunwAAAAASUVO
|
||||
RK5CYII=
|
||||
</value>
|
||||
</data>
|
||||
<data name="ts_edit.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
|
||||
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAAmdJREFUOE91k0to
|
||||
E1EUhqdd6KKIG3XhSmwTWqwUwYU7V1KqBNy5EmqTggUhEG2yaB6LCEJ3QhcuFBEqNiDioiBFa5tY0dLn
|
||||
pJkkbdrEpNYmTTJJp5PJ5DHze2dCa2diD/wM53DOd/97uNNCaeMmSS8RQVdvJXmAKK6r/0uv9fQ8m5jw
|
||||
IfBtDrP+AGZm/Zj6PI1x3weMjr3CA7P5N+m+cRLgrN1uT4FEJl88UjpbwGZyF/PBDaRzBVit1t2TIBe8
|
||||
Xm+CFyrY/pPRKLWTRjiWILUs8iUeNpstZ6TOvSGg7uNuzns8nrhYrSOdzWuUybJIEkicgDejSYTuvsYS
|
||||
NQwT1b1KAGcOISqgKsnIscUmFTkRy7/28PHFJELUCAE8QV/r1WaARHawz/EocgdHKvAS+EIKsZ9erGwm
|
||||
sfB8Gi8HRnGx67JTcwW32xNXlsgLZRyUhIbKJOeKqAdvATEKOyuP8COawPcgja6uK8MagMvtVgFlsQKh
|
||||
LEKoAgK/jzrTB0QpYIVCLfKUdMhYYyIwdnY6NACnqwGo1mqo1IGKyEGKkGGGDK+2IL/sBcspHUCIYZoB
|
||||
DqdLBdRlGbUqC3m9F6DJMN2CuP8x1sLbYAsNwhoThtFo1DpwOJ0qQIWwi0BQOZnC0uQA/HM0sjkWkqSs
|
||||
mQBCDDqaAI4GoEausLcVQvjTEKbe3kdgbhl8SVQHZeJOiaAC6NA5sDtd6lMWBAH00jwWF2hsJfYOTWm+
|
||||
kfUNtLe3jxxf4imTyTS/f1D674C+OP7Oh7a2tnv6H+t67+077wcfDs2YLZavivp1sgwOzvSbLV8MBoPy
|
||||
iE4rgL8F11CPeKcziAAAAABJRU5ErkJggg==
|
||||
</value>
|
||||
</data>
|
||||
<data name="ts_delete.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
|
||||
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAAgxJREFUOE+Fk01I
|
||||
VGEUht/7M5NKKTQIzkgghNSQECguxt0sXBRBm2rRxtUgKm4SN7oQCjEmRUxwpduQwE3tWkRgUQRWpjA6
|
||||
TWVNt/JvDCdJZ8zTe4Zr+DOjFx7uzDnvec/3nft9Fo5+Akz7iJCtY7T/0xfPASMRE7MDXvzq92Kjy4Zz
|
||||
ycAzKlpISUEjG+hospGeKYFkiiHbJyBZskVWGHtQBAmZmKTB+UMmXqArSmGGok0TkuKyV8kKWSKLZN0D
|
||||
maZx2EKcBlV7TUJXvPi7TUHaLVQDZc1Ff/9QQwMyySZnDUzQwMyZVFt4OM/iP2437ZiPZca/aY4mnR7s
|
||||
sLRe64sjFr5mGfzJpOOKVJgPXYXy2IL4THSowZm7BtKbDH5R93BY1trbJdXaup+2Nkk1N4vj80mSuhds
|
||||
WGdgUA2q+oEN3XuC/B4fl6Mep7ZWPlP3ioSA+2pQfhtYXWdgTgcXjUrWcSSbTB4ik0jIQjAoH6l7SmqA
|
||||
XjUwrgFTOu15NSkrk3hlpcT9/v0EAhKvqJCYbedWMEY8wI3cV+BZ7XziTv4t3+/IdAFmGP9ArgMcBcp3
|
||||
z0JpI/DmkzvIKb7zoaYLpI8UAU0HT2PwKhB7zeR3dzvv3VXsdo3x/x1yGugpdB/8vEijt/hVHlH4nLwk
|
||||
ur1hwgazLLxZ8DLtSVw4CUR4zO41AEPVQDdzl8mpg8X/ACkEWbVU7DUpAAAAAElFTkSuQmCC
|
||||
</value>
|
||||
</data>
|
||||
<data name="ts_revert.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
|
||||
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAAgxJREFUOE+lkvtL
|
||||
U2EYx+0PEbtpFwnBKPGKiJImGP0gYhIYs1E5GF5gIxkpA00JRSmMEF0ohMh+GaRWYlqabMVcNdS2QpaI
|
||||
VqiDIYhk397vA6fXhCjyhYdzeM/5fp7vczkAdeL2cwho7v/wWzT1zcN+Pwhr51uY2/y41PQaF+wzKKiZ
|
||||
QvaN58g0jyLd5KEUcQbg+84P/Cm2tncQjW3j68YWIqubCC3FcOJc478BAuGoZM6zvoRnakXEruEIjhc4
|
||||
/g5gZop9c+voGAyLbQIfeBZxLL9BA1jzXvuGbWamuKh+GmmVbswE19A59FEBbmoAG7YbsLtm2mZmiml9
|
||||
cvabNDwpz6YB7LYBoMXCumkJr7LOmnnHzBQ/9X2Bo2cOibm1GsBREbAQiYmw/8lnuCeWkVzcgnZlnw1j
|
||||
3HV/wuNXK6i/9x5Hc6wawDlTXHbLJ+LZUBQPRyKwdQdxutwl1h+NLXHh5Ht1ewBHsiwawCW57HyDAfWR
|
||||
dvl0uhZQ1eqX8aVc7EKLqrum651ATLf9OJx5XQM4KmY0xPzZ0hFAiQJnXB0WwME0E3IsL5B17ZlADqWb
|
||||
NYDrOepdlcysmTWWOrxqbceRWtaLk0VO1XW72D5Vckd2gMBfq8zdpmUG62NJvKM4+XyziDk24xmfWoGE
|
||||
s1c0gHPmbrPTpHNJKOCo2G1mZs20zcwUJ5yp1AB5+8/zEwgF5GMVDxh4AAAAAElFTkSuQmCC
|
||||
</value>
|
||||
</data>
|
||||
<data name="ts_save.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
|
||||
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAAqhJREFUOE+tk8tP
|
||||
E0Ecxzlo/AM4eFMxhUYJgi1taXmWkoox0YMmRC6aEIiLEqEiWGhR1BgegQClFZAIJPiAIK9wMURxL4Zg
|
||||
jFGjQpdnFVqRLnT7Alv6dbZA4CB48Zd8spmZnc/8ZuY3ISH/I45e7Am/1DTb2zL8g+4anqSf7EH3yAyt
|
||||
77bSyit9erL2geD6mYbxwdYvwKIXJAJYD2AXyACJ1xbgxqNpRMYWnN8QGKfeltPAt3k3PE4HHI7dWIHX
|
||||
7UTHOw9ymy2Iji+6FhSoKhn6cm8AHyxueF0cOG43HFj1uFD9xoVzlZM4JtNQQYHiPkOf7QxgbMZFBHtn
|
||||
sEoyuP2Sg/IugwjJpkB8x0yrHq9jdMqJtX8I1rxOFA85EadnINgSROrMtNTkx/tZF+Bzwk9++jsc4Hej
|
||||
YIDDiWIzwkSbGQi1Zlps9CGjg0X2syVkEbKfLyGHp2sDvp31lP/aoTQtI0ZrxuEtQQQRSE0+HK+yQ1jJ
|
||||
IrxqBcJqQtUygUUE6RNUkH6CsMKOmBoW4pIdAiHZgrzJB1kDC2nNIuKrLUgzWKGqW0BawwLUjTaoDTYo
|
||||
amyQ1tkhq2chKd0h4M8gocUHeaMDqbXfkV/WiKv5WnQPvML4zCLmbC7M//LgwYAVJ2vtUBhYxOl2CvQM
|
||||
ndTqR7yJw2mjFTlXCyGPjcJgfw/WfXx5blRg84gdIiJIMK5AXsZsn0FUydex1DYg6aETZ0w2IiiCXBKN
|
||||
/r4X+L22LWgiAkn9MlIMS0gk13hErMkLFlJ4Zo9OoZtA4r05pOk/I09Tj5ysIrS3DWFsdBqfPi5gcuIn
|
||||
ytvNkJYySCaTozM6raEHT6VsPeb9h6LyLwhkt3LDRNcpWUIelZ6upZQqDZVMUKkLKXV6ISVSaCj+6gSx
|
||||
N3NDQ5P5yfv+AM8zgls5SSYnAAAAAElFTkSuQmCC
|
||||
</value>
|
||||
</data>
|
||||
<data name="ts_find.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
|
||||
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAAqZJREFUOE+Vk2lI
|
||||
E2AYx/3g5jHaB/PYPDAdJBlUA/siTEhSCIosIchAC4RZtCaeZWHepqamLo3yJJzmQTbDa5NmjqmZOnRu
|
||||
MZ3u8phuklLZh+DfqxZo67AXHh6e9/3/f+9tZ/f3xnSkUh+z2ewNTnAwWCzWCJGf/4dnZ5hGp99MSkqx
|
||||
dkkGMDg5A7laB+k7Bapr6sHhhHQSCfOPIDqdzi0oKoVEMYtXCi1kGhPkM0aIVTqIJmbROzCEsNNhcgI4
|
||||
8DuIT2xsrKVtSInnE1qMWT5jev3rdkx93IRYt4pauQp1wjaw/PwSbACH/f1TyutfoGBQjUbt6nY0zVvQ
|
||||
TKJpbicLFHo87R9DTMzVrTPZ28JDQ3tKRW8RL/2AvEkTiqcXUaZaQinJBVMm3B0zIEqiRnTrEOKS0z7Z
|
||||
AM6eOTeS0SHD5e4pJI/qkD5hQIbCSLJxu74xPIeIXhUiW4bBS70PG8ApTogku7UflzoVZDY9iqYXUK5e
|
||||
gkC9jEeqReSSVXGlGnA7RnGdz9+0AXi6MxLvFVeB16VA/rgBjXOr6DBYITKuoVVnQaV6ETyJCvmdckRc
|
||||
uDj5K4DiSKPVcnlJqHgtQ55Mg5aZFciW1zFs3kC3YQ3l43oUvlEivVAADw+P1N0AigvDS5hJBkYUKjS/
|
||||
7IGgXQyR0oARgwXjJiv6Z81oJFeYXfYMAQFHxcTs/BNAcWP4CLMeVsK4bIXWZEY0Nx4ngoLM/NuZqKhr
|
||||
QU2zCFlka+FR1764ujKrdj8iexc3T2FaTgnmF1ZgIoDckidwZ/o2ENEhEpEuDO8HDC/fCqoTjU/q43v2
|
||||
bU9xlFyJS0Tf4HsoNXpirgJZTRMROezr0zg4OWsSMkrQ0N6HW3dyQM5hy0zdl/mHyPvIsZPSwED2N/pB
|
||||
t2rSR/kf83e2J5PYrOByvQAAAABJRU5ErkJggg==
|
||||
</value>
|
||||
</data>
|
||||
</root>
|
@ -0,0 +1,104 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<asmv1:assembly xsi:schemaLocation="urn:schemas-microsoft-com:asm.v1 assembly.adaptive.xsd" manifestVersion="1.0" xmlns:asmv1="urn:schemas-microsoft-com:asm.v1" xmlns="urn:schemas-microsoft-com:asm.v2" xmlns:asmv2="urn:schemas-microsoft-com:asm.v2" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:co.v1="urn:schemas-microsoft-com:clickonce.v1" xmlns:asmv3="urn:schemas-microsoft-com:asm.v3" xmlns:dsig="http://www.w3.org/2000/09/xmldsig#" xmlns:co.v2="urn:schemas-microsoft-com:clickonce.v2">
|
||||
<asmv1:assemblyIdentity name="Kanban System.exe" version="1.0.0.25" publicKeyToken="0000000000000000" language="neutral" processorArchitecture="msil" type="win32" />
|
||||
<application />
|
||||
<entryPoint>
|
||||
<assemblyIdentity name="Kanban System" version="1.0.0.0" language="neutral" processorArchitecture="msil" />
|
||||
<commandLine file="Kanban System.exe" parameters="" />
|
||||
</entryPoint>
|
||||
<trustInfo>
|
||||
<security>
|
||||
<applicationRequestMinimum>
|
||||
<PermissionSet Unrestricted="true" ID="Custom" SameSite="site" />
|
||||
<defaultAssemblyRequest permissionSetReference="Custom" />
|
||||
</applicationRequestMinimum>
|
||||
<requestedPrivileges xmlns="urn:schemas-microsoft-com:asm.v3">
|
||||
<!-- UAC Manifest Options
|
||||
If you want to change the Windows User Account Control level replace the
|
||||
requestedExecutionLevel node with one of the following.
|
||||
|
||||
<requestedExecutionLevel level="asInvoker" uiAccess="false" />
|
||||
<requestedExecutionLevel level="requireAdministrator" uiAccess="false" />
|
||||
<requestedExecutionLevel level="highestAvailable" uiAccess="false" />
|
||||
|
||||
Specifying requestedExecutionLevel node will disable file and registry virtualization.
|
||||
If you want to utilize File and Registry Virtualization for backward
|
||||
compatibility then delete the requestedExecutionLevel node.
|
||||
-->
|
||||
<requestedExecutionLevel level="asInvoker" uiAccess="false" />
|
||||
</requestedPrivileges>
|
||||
</security>
|
||||
</trustInfo>
|
||||
<dependency>
|
||||
<dependentOS>
|
||||
<osVersionInfo>
|
||||
<os majorVersion="4" minorVersion="10" buildNumber="0" servicePackMajor="0" />
|
||||
</osVersionInfo>
|
||||
</dependentOS>
|
||||
</dependency>
|
||||
<dependency>
|
||||
<dependentAssembly dependencyType="preRequisite" allowDelayedBinding="true">
|
||||
<assemblyIdentity name="Microsoft.Windows.CommonLanguageRuntime" version="2.0.50727.0" />
|
||||
</dependentAssembly>
|
||||
</dependency>
|
||||
<dependency>
|
||||
<dependentAssembly dependencyType="preRequisite" allowDelayedBinding="true">
|
||||
<assemblyIdentity name="Microsoft.ReportViewer.Common" version="10.0.0.0" publicKeyToken="B03F5F7F11D50A3A" language="neutral" processorArchitecture="msil" />
|
||||
</dependentAssembly>
|
||||
</dependency>
|
||||
<dependency>
|
||||
<dependentAssembly dependencyType="preRequisite" allowDelayedBinding="true">
|
||||
<assemblyIdentity name="Microsoft.ReportViewer.DataVisualization" version="10.0.0.0" publicKeyToken="B03F5F7F11D50A3A" language="neutral" processorArchitecture="msil" />
|
||||
</dependentAssembly>
|
||||
</dependency>
|
||||
<dependency>
|
||||
<dependentAssembly dependencyType="preRequisite" allowDelayedBinding="true">
|
||||
<assemblyIdentity name="Microsoft.ReportViewer.ProcessingObjectModel" version="10.0.0.0" publicKeyToken="B03F5F7F11D50A3A" language="neutral" processorArchitecture="msil" />
|
||||
</dependentAssembly>
|
||||
</dependency>
|
||||
<dependency>
|
||||
<dependentAssembly dependencyType="preRequisite" allowDelayedBinding="true">
|
||||
<assemblyIdentity name="Microsoft.ReportViewer.WinForms" version="10.0.0.0" publicKeyToken="B03F5F7F11D50A3A" language="neutral" processorArchitecture="msil" />
|
||||
</dependentAssembly>
|
||||
</dependency>
|
||||
<dependency>
|
||||
<dependentAssembly dependencyType="install" allowDelayedBinding="true" codebase="Interop.Microsoft.Office.Interop.Excel.dll" size="1544192">
|
||||
<assemblyIdentity name="Interop.Microsoft.Office.Interop.Excel" version="1.7.0.0" language="neutral" processorArchitecture="msil" />
|
||||
<hash>
|
||||
<dsig:Transforms>
|
||||
<dsig:Transform Algorithm="urn:schemas-microsoft-com:HashTransforms.Identity" />
|
||||
</dsig:Transforms>
|
||||
<dsig:DigestMethod Algorithm="http://www.w3.org/2000/09/xmldsig#sha1" />
|
||||
<dsig:DigestValue>7YA85eufIXItcsMaDGw0Skomhfw=</dsig:DigestValue>
|
||||
</hash>
|
||||
</dependentAssembly>
|
||||
</dependency>
|
||||
<dependency>
|
||||
<dependentAssembly dependencyType="install" allowDelayedBinding="true" codebase="Kanban System.exe" size="3449856">
|
||||
<assemblyIdentity name="Kanban System" version="1.0.0.0" language="neutral" processorArchitecture="msil" />
|
||||
<hash>
|
||||
<dsig:Transforms>
|
||||
<dsig:Transform Algorithm="urn:schemas-microsoft-com:HashTransforms.Identity" />
|
||||
</dsig:Transforms>
|
||||
<dsig:DigestMethod Algorithm="http://www.w3.org/2000/09/xmldsig#sha1" />
|
||||
<dsig:DigestValue>RZpF9ypMD0v28buCuXXH4Nlhf5Y=</dsig:DigestValue>
|
||||
</hash>
|
||||
</dependentAssembly>
|
||||
</dependency>
|
||||
<file name="Kanban System.exe.config" size="2969">
|
||||
<hash>
|
||||
<dsig:Transforms>
|
||||
<dsig:Transform Algorithm="urn:schemas-microsoft-com:HashTransforms.Identity" />
|
||||
</dsig:Transforms>
|
||||
<dsig:DigestMethod Algorithm="http://www.w3.org/2000/09/xmldsig#sha1" />
|
||||
<dsig:DigestValue>C9pAdhw8fwBinl452Gdw9ZjgnPk=</dsig:DigestValue>
|
||||
</hash>
|
||||
</file>
|
||||
<compatibility xmlns="urn:schemas-microsoft-com:compatibility.v1">
|
||||
<application>
|
||||
<!-- A list of all Windows versions that this application is designed to work with. Windows will automatically select the most compatible environment.-->
|
||||
<!-- If your application is designed to work with Windows 7, uncomment the following supportedOS node-->
|
||||
<!--<supportedOS Id="{35138b9a-5d96-4fbd-8e2d-a2440225f93a}"/>-->
|
||||
</application>
|
||||
</compatibility>
|
||||
</asmv1:assembly>
|
@ -0,0 +1,131 @@
|
||||
Public Class mainForm
|
||||
|
||||
Public cnstr As String = loginForm.cnstr
|
||||
|
||||
Private Sub ManualToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
|
||||
mcSeqForm.Show()
|
||||
End Sub
|
||||
|
||||
Private Sub mainForm_FormClosed(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosedEventArgs) Handles Me.FormClosed
|
||||
loginForm.Close()
|
||||
End Sub
|
||||
|
||||
Private Sub mainForm_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
|
||||
Me.WindowState = FormWindowState.Maximized
|
||||
Me.Text = "Mounting Sequence v.1.0 Current User - " & loginForm.username
|
||||
|
||||
Select Case loginForm.userType
|
||||
Case "Operator"
|
||||
MaintenanceToolStripMenuItem.Visible = False
|
||||
CheckRequestsToolStripMenuItem.Visible = False
|
||||
AdministrationToolStripMenuItem.Visible = False
|
||||
Case "Quality Control"
|
||||
AdministrationToolStripMenuItem.Visible = False
|
||||
CheckRequestsToolStripMenuItem.Visible = False
|
||||
Case "Engineer"
|
||||
CheckRequestsToolStripMenuItem.Visible = False
|
||||
AdministrationToolStripMenuItem.Visible = False
|
||||
Case "PPC"
|
||||
MountingToolStripMenuItem.Visible = False
|
||||
MaintenanceToolStripMenuItem.Visible = False
|
||||
AdministrationToolStripMenuItem.Visible = False
|
||||
End Select
|
||||
End Sub
|
||||
|
||||
Private Sub tsClose_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles tsClose.Click
|
||||
Try
|
||||
Dim activeForm As String = ActiveMdiChild.Name
|
||||
Select Case activeForm
|
||||
Case "mcSeqForm"
|
||||
mcSeqForm.Close()
|
||||
Case "uploadMcSeq"
|
||||
uploadMcSeq.Close()
|
||||
Case "mountingForm"
|
||||
mountingForm.Close()
|
||||
Case "machineForm"
|
||||
machineForm.Close()
|
||||
Case "userForm"
|
||||
userForm.Close()
|
||||
Case "requestForm"
|
||||
requestForm.Close()
|
||||
End Select
|
||||
Catch ex As Exception
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
Private Sub ExitToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ExitToolStripMenuItem.Click
|
||||
Me.Close()
|
||||
End Sub
|
||||
|
||||
Private Sub MountingToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MountingToolStripMenuItem.Click
|
||||
mountingForm.Show()
|
||||
End Sub
|
||||
|
||||
Private Sub UsersToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles UsersToolStripMenuItem.Click
|
||||
userForm.Show()
|
||||
End Sub
|
||||
|
||||
Private Sub tsFirst_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles tsFirst.Click
|
||||
Try
|
||||
Dim activeForm As String = ActiveMdiChild.Name
|
||||
Select Case activeForm
|
||||
Case "machineForm"
|
||||
machineForm.moveFirst()
|
||||
Case "userForm"
|
||||
userForm.moveFirst()
|
||||
End Select
|
||||
Catch ex As Exception
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
Private Sub tsPrevious_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles tsPrevious.Click
|
||||
Try
|
||||
Dim activeForm As String = ActiveMdiChild.Name
|
||||
Select Case activeForm
|
||||
Case "machineForm"
|
||||
machineForm.movePrevious()
|
||||
Case "userForm"
|
||||
userForm.movePrevious()
|
||||
End Select
|
||||
Catch ex As Exception
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
Private Sub tsNext_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles tsNext.Click
|
||||
Try
|
||||
Dim activeForm As String = ActiveMdiChild.Name
|
||||
Select Case activeForm
|
||||
Case "machineForm"
|
||||
machineForm.moveNext()
|
||||
Case "userForm"
|
||||
userForm.moveNext()
|
||||
End Select
|
||||
Catch ex As Exception
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
Private Sub tsLast_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles tsLast.Click
|
||||
Try
|
||||
Dim activeForm As String = ActiveMdiChild.Name
|
||||
Select Case activeForm
|
||||
Case "machineForm"
|
||||
machineForm.moveLast()
|
||||
Case "userForm"
|
||||
userForm.moveLast()
|
||||
End Select
|
||||
Catch ex As Exception
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
Private Sub MachineToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MachineToolStripMenuItem.Click
|
||||
machineForm.Show()
|
||||
End Sub
|
||||
|
||||
Private Sub FileUploadToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles FileUploadToolStripMenuItem.Click
|
||||
mcSeqForm.Show()
|
||||
End Sub
|
||||
|
||||
Private Sub CheckRequestsToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckRequestsToolStripMenuItem.Click
|
||||
requestForm.Show()
|
||||
End Sub
|
||||
End Class
|
@ -0,0 +1,321 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
||||
Partial Class kittingForm
|
||||
Inherits System.Windows.Forms.Form
|
||||
|
||||
'Form overrides dispose to clean up the component list.
|
||||
<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
|
||||
|
||||
'Required by the Windows Form Designer
|
||||
Private components As System.ComponentModel.IContainer
|
||||
|
||||
'NOTE: The following procedure is required by the Windows Form Designer
|
||||
'It can be modified using the Windows Form Designer.
|
||||
'Do not modify it using the code editor.
|
||||
<System.Diagnostics.DebuggerStepThrough()> _
|
||||
Private Sub InitializeComponent()
|
||||
Dim DataGridViewCellStyle4 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
|
||||
Dim DataGridViewCellStyle5 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
|
||||
Dim DataGridViewCellStyle6 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
|
||||
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(kittingForm))
|
||||
Me.GroupBox1 = New System.Windows.Forms.GroupBox()
|
||||
Me.cmbType = New System.Windows.Forms.ComboBox()
|
||||
Me.Label6 = New System.Windows.Forms.Label()
|
||||
Me.cmbModel = New System.Windows.Forms.ComboBox()
|
||||
Me.Label5 = New System.Windows.Forms.Label()
|
||||
Me.cmbLine = New System.Windows.Forms.ComboBox()
|
||||
Me.Label7 = New System.Windows.Forms.Label()
|
||||
Me.cmbRev = New System.Windows.Forms.ComboBox()
|
||||
Me.Label2 = New System.Windows.Forms.Label()
|
||||
Me.cmbSeq = New System.Windows.Forms.ComboBox()
|
||||
Me.Label1 = New System.Windows.Forms.Label()
|
||||
Me.dgKitting = New System.Windows.Forms.DataGridView()
|
||||
Me.btnPrint = New System.Windows.Forms.Button()
|
||||
Me.ToolStrip1 = New System.Windows.Forms.ToolStrip()
|
||||
Me.ts_delete = New System.Windows.Forms.ToolStripButton()
|
||||
Me.ToolStripSeparator3 = New System.Windows.Forms.ToolStripSeparator()
|
||||
Me.SaveFileDialog = New System.Windows.Forms.SaveFileDialog()
|
||||
Me.btnClear = New System.Windows.Forms.Button()
|
||||
Me.Label3 = New System.Windows.Forms.Label()
|
||||
Me.txtLoading = New System.Windows.Forms.TextBox()
|
||||
Me.GroupBox1.SuspendLayout()
|
||||
CType(Me.dgKitting, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.ToolStrip1.SuspendLayout()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'GroupBox1
|
||||
'
|
||||
Me.GroupBox1.Controls.Add(Me.txtLoading)
|
||||
Me.GroupBox1.Controls.Add(Me.Label3)
|
||||
Me.GroupBox1.Controls.Add(Me.cmbType)
|
||||
Me.GroupBox1.Controls.Add(Me.Label6)
|
||||
Me.GroupBox1.Controls.Add(Me.cmbModel)
|
||||
Me.GroupBox1.Controls.Add(Me.Label5)
|
||||
Me.GroupBox1.Controls.Add(Me.cmbLine)
|
||||
Me.GroupBox1.Controls.Add(Me.Label7)
|
||||
Me.GroupBox1.Controls.Add(Me.cmbRev)
|
||||
Me.GroupBox1.Controls.Add(Me.Label2)
|
||||
Me.GroupBox1.Controls.Add(Me.cmbSeq)
|
||||
Me.GroupBox1.Controls.Add(Me.Label1)
|
||||
Me.GroupBox1.Font = New System.Drawing.Font("Calibri", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.GroupBox1.Location = New System.Drawing.Point(12, 2)
|
||||
Me.GroupBox1.Name = "GroupBox1"
|
||||
Me.GroupBox1.Size = New System.Drawing.Size(706, 135)
|
||||
Me.GroupBox1.TabIndex = 0
|
||||
Me.GroupBox1.TabStop = False
|
||||
Me.GroupBox1.Text = "Kitting"
|
||||
'
|
||||
'cmbType
|
||||
'
|
||||
Me.cmbType.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
|
||||
Me.cmbType.FormattingEnabled = True
|
||||
Me.cmbType.Location = New System.Drawing.Point(517, 59)
|
||||
Me.cmbType.Name = "cmbType"
|
||||
Me.cmbType.Size = New System.Drawing.Size(145, 27)
|
||||
Me.cmbType.TabIndex = 24
|
||||
'
|
||||
'Label6
|
||||
'
|
||||
Me.Label6.AutoSize = True
|
||||
Me.Label6.Location = New System.Drawing.Point(466, 62)
|
||||
Me.Label6.Name = "Label6"
|
||||
Me.Label6.Size = New System.Drawing.Size(43, 19)
|
||||
Me.Label6.TabIndex = 23
|
||||
Me.Label6.Text = "Type:"
|
||||
'
|
||||
'cmbModel
|
||||
'
|
||||
Me.cmbModel.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
|
||||
Me.cmbModel.FormattingEnabled = True
|
||||
Me.cmbModel.Location = New System.Drawing.Point(81, 90)
|
||||
Me.cmbModel.Name = "cmbModel"
|
||||
Me.cmbModel.Size = New System.Drawing.Size(204, 27)
|
||||
Me.cmbModel.TabIndex = 22
|
||||
'
|
||||
'Label5
|
||||
'
|
||||
Me.Label5.AutoSize = True
|
||||
Me.Label5.Location = New System.Drawing.Point(28, 93)
|
||||
Me.Label5.Name = "Label5"
|
||||
Me.Label5.Size = New System.Drawing.Size(54, 19)
|
||||
Me.Label5.TabIndex = 21
|
||||
Me.Label5.Text = "Model:"
|
||||
'
|
||||
'cmbLine
|
||||
'
|
||||
Me.cmbLine.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
|
||||
Me.cmbLine.FormattingEnabled = True
|
||||
Me.cmbLine.Location = New System.Drawing.Point(81, 58)
|
||||
Me.cmbLine.Name = "cmbLine"
|
||||
Me.cmbLine.Size = New System.Drawing.Size(116, 27)
|
||||
Me.cmbLine.TabIndex = 20
|
||||
'
|
||||
'Label7
|
||||
'
|
||||
Me.Label7.AutoSize = True
|
||||
Me.Label7.Location = New System.Drawing.Point(40, 61)
|
||||
Me.Label7.Name = "Label7"
|
||||
Me.Label7.Size = New System.Drawing.Size(40, 19)
|
||||
Me.Label7.TabIndex = 19
|
||||
Me.Label7.Text = "Line:"
|
||||
'
|
||||
'cmbRev
|
||||
'
|
||||
Me.cmbRev.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
|
||||
Me.cmbRev.FormattingEnabled = True
|
||||
Me.cmbRev.Location = New System.Drawing.Point(517, 90)
|
||||
Me.cmbRev.Name = "cmbRev"
|
||||
Me.cmbRev.Size = New System.Drawing.Size(145, 27)
|
||||
Me.cmbRev.TabIndex = 18
|
||||
'
|
||||
'Label2
|
||||
'
|
||||
Me.Label2.AutoSize = True
|
||||
Me.Label2.Location = New System.Drawing.Point(441, 93)
|
||||
Me.Label2.Name = "Label2"
|
||||
Me.Label2.Size = New System.Drawing.Size(68, 19)
|
||||
Me.Label2.TabIndex = 17
|
||||
Me.Label2.Text = "Revision:"
|
||||
'
|
||||
'cmbSeq
|
||||
'
|
||||
Me.cmbSeq.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
|
||||
Me.cmbSeq.FormattingEnabled = True
|
||||
Me.cmbSeq.Location = New System.Drawing.Point(81, 26)
|
||||
Me.cmbSeq.Name = "cmbSeq"
|
||||
Me.cmbSeq.Size = New System.Drawing.Size(300, 27)
|
||||
Me.cmbSeq.TabIndex = 15
|
||||
'
|
||||
'Label1
|
||||
'
|
||||
Me.Label1.AutoSize = True
|
||||
Me.Label1.Location = New System.Drawing.Point(17, 32)
|
||||
Me.Label1.Name = "Label1"
|
||||
Me.Label1.Size = New System.Drawing.Size(65, 19)
|
||||
Me.Label1.TabIndex = 16
|
||||
Me.Label1.Text = "Account:"
|
||||
'
|
||||
'dgKitting
|
||||
'
|
||||
Me.dgKitting.AllowUserToAddRows = False
|
||||
Me.dgKitting.AllowUserToDeleteRows = False
|
||||
Me.dgKitting.AllowUserToResizeColumns = False
|
||||
Me.dgKitting.AllowUserToResizeRows = False
|
||||
DataGridViewCellStyle4.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
|
||||
DataGridViewCellStyle4.BackColor = System.Drawing.SystemColors.Control
|
||||
DataGridViewCellStyle4.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
DataGridViewCellStyle4.ForeColor = System.Drawing.SystemColors.WindowText
|
||||
DataGridViewCellStyle4.SelectionBackColor = System.Drawing.SystemColors.Highlight
|
||||
DataGridViewCellStyle4.SelectionForeColor = System.Drawing.SystemColors.HighlightText
|
||||
DataGridViewCellStyle4.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
|
||||
Me.dgKitting.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle4
|
||||
Me.dgKitting.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
|
||||
DataGridViewCellStyle5.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
|
||||
DataGridViewCellStyle5.BackColor = System.Drawing.SystemColors.Window
|
||||
DataGridViewCellStyle5.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
DataGridViewCellStyle5.ForeColor = System.Drawing.SystemColors.ControlText
|
||||
DataGridViewCellStyle5.SelectionBackColor = System.Drawing.SystemColors.Highlight
|
||||
DataGridViewCellStyle5.SelectionForeColor = System.Drawing.SystemColors.HighlightText
|
||||
DataGridViewCellStyle5.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
|
||||
Me.dgKitting.DefaultCellStyle = DataGridViewCellStyle5
|
||||
Me.dgKitting.EditMode = System.Windows.Forms.DataGridViewEditMode.EditOnEnter
|
||||
Me.dgKitting.Location = New System.Drawing.Point(12, 143)
|
||||
Me.dgKitting.Name = "dgKitting"
|
||||
DataGridViewCellStyle6.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
|
||||
DataGridViewCellStyle6.BackColor = System.Drawing.SystemColors.Control
|
||||
DataGridViewCellStyle6.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
DataGridViewCellStyle6.ForeColor = System.Drawing.SystemColors.WindowText
|
||||
DataGridViewCellStyle6.SelectionBackColor = System.Drawing.SystemColors.Highlight
|
||||
DataGridViewCellStyle6.SelectionForeColor = System.Drawing.SystemColors.HighlightText
|
||||
DataGridViewCellStyle6.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
|
||||
Me.dgKitting.RowHeadersDefaultCellStyle = DataGridViewCellStyle6
|
||||
Me.dgKitting.RowHeadersWidth = 20
|
||||
Me.dgKitting.RowHeadersWidthSizeMode = System.Windows.Forms.DataGridViewRowHeadersWidthSizeMode.DisableResizing
|
||||
Me.dgKitting.RowTemplate.Height = 18
|
||||
Me.dgKitting.Size = New System.Drawing.Size(705, 232)
|
||||
Me.dgKitting.TabIndex = 1
|
||||
'
|
||||
'btnPrint
|
||||
'
|
||||
Me.btnPrint.BackColor = System.Drawing.Color.ForestGreen
|
||||
Me.btnPrint.Enabled = False
|
||||
Me.btnPrint.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btnPrint.Font = New System.Drawing.Font("Verdana", 11.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.btnPrint.ForeColor = System.Drawing.SystemColors.ControlLightLight
|
||||
Me.btnPrint.Location = New System.Drawing.Point(561, 381)
|
||||
Me.btnPrint.Name = "btnPrint"
|
||||
Me.btnPrint.Size = New System.Drawing.Size(156, 54)
|
||||
Me.btnPrint.TabIndex = 5
|
||||
Me.btnPrint.Text = "Print"
|
||||
Me.btnPrint.UseVisualStyleBackColor = False
|
||||
'
|
||||
'ToolStrip1
|
||||
'
|
||||
Me.ToolStrip1.Font = New System.Drawing.Font("Calibri", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.ToolStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ts_delete, Me.ToolStripSeparator3})
|
||||
Me.ToolStrip1.Location = New System.Drawing.Point(0, 0)
|
||||
Me.ToolStrip1.Name = "ToolStrip1"
|
||||
Me.ToolStrip1.Size = New System.Drawing.Size(729, 25)
|
||||
Me.ToolStrip1.TabIndex = 6
|
||||
Me.ToolStrip1.Visible = False
|
||||
'
|
||||
'ts_delete
|
||||
'
|
||||
Me.ts_delete.Enabled = False
|
||||
Me.ts_delete.Image = CType(resources.GetObject("ts_delete.Image"), System.Drawing.Image)
|
||||
Me.ts_delete.ImageTransparentColor = System.Drawing.Color.Magenta
|
||||
Me.ts_delete.Name = "ts_delete"
|
||||
Me.ts_delete.Size = New System.Drawing.Size(64, 22)
|
||||
Me.ts_delete.Text = "Delete"
|
||||
'
|
||||
'ToolStripSeparator3
|
||||
'
|
||||
Me.ToolStripSeparator3.Name = "ToolStripSeparator3"
|
||||
Me.ToolStripSeparator3.Size = New System.Drawing.Size(6, 25)
|
||||
'
|
||||
'SaveFileDialog
|
||||
'
|
||||
Me.SaveFileDialog.DefaultExt = "xlsx"
|
||||
'
|
||||
'btnClear
|
||||
'
|
||||
Me.btnClear.BackColor = System.Drawing.Color.Firebrick
|
||||
Me.btnClear.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btnClear.Font = New System.Drawing.Font("Verdana", 11.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.btnClear.ForeColor = System.Drawing.SystemColors.ControlLightLight
|
||||
Me.btnClear.Location = New System.Drawing.Point(12, 381)
|
||||
Me.btnClear.Name = "btnClear"
|
||||
Me.btnClear.Size = New System.Drawing.Size(156, 54)
|
||||
Me.btnClear.TabIndex = 7
|
||||
Me.btnClear.Text = "Reset"
|
||||
Me.btnClear.UseVisualStyleBackColor = False
|
||||
'
|
||||
'Label3
|
||||
'
|
||||
Me.Label3.AutoSize = True
|
||||
Me.Label3.Location = New System.Drawing.Point(387, 29)
|
||||
Me.Label3.Name = "Label3"
|
||||
Me.Label3.Size = New System.Drawing.Size(124, 19)
|
||||
Me.Label3.TabIndex = 25
|
||||
Me.Label3.Text = "Loading Quantity:"
|
||||
'
|
||||
'txtLoading
|
||||
'
|
||||
Me.txtLoading.Location = New System.Drawing.Point(517, 26)
|
||||
Me.txtLoading.Name = "txtLoading"
|
||||
Me.txtLoading.Size = New System.Drawing.Size(100, 27)
|
||||
Me.txtLoading.TabIndex = 26
|
||||
'
|
||||
'kittingForm
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.ClientSize = New System.Drawing.Size(729, 439)
|
||||
Me.ControlBox = False
|
||||
Me.Controls.Add(Me.btnClear)
|
||||
Me.Controls.Add(Me.ToolStrip1)
|
||||
Me.Controls.Add(Me.btnPrint)
|
||||
Me.Controls.Add(Me.dgKitting)
|
||||
Me.Controls.Add(Me.GroupBox1)
|
||||
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedSingle
|
||||
Me.Name = "kittingForm"
|
||||
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
|
||||
Me.Text = "Kitting"
|
||||
Me.GroupBox1.ResumeLayout(False)
|
||||
Me.GroupBox1.PerformLayout()
|
||||
CType(Me.dgKitting, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.ToolStrip1.ResumeLayout(False)
|
||||
Me.ToolStrip1.PerformLayout()
|
||||
Me.ResumeLayout(False)
|
||||
Me.PerformLayout()
|
||||
|
||||
End Sub
|
||||
Friend WithEvents GroupBox1 As System.Windows.Forms.GroupBox
|
||||
Friend WithEvents dgKitting As System.Windows.Forms.DataGridView
|
||||
Friend WithEvents btnPrint As System.Windows.Forms.Button
|
||||
Friend WithEvents ToolStrip1 As System.Windows.Forms.ToolStrip
|
||||
Friend WithEvents ts_delete As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents ToolStripSeparator3 As System.Windows.Forms.ToolStripSeparator
|
||||
Friend WithEvents SaveFileDialog As System.Windows.Forms.SaveFileDialog
|
||||
Friend WithEvents cmbType As System.Windows.Forms.ComboBox
|
||||
Friend WithEvents Label6 As System.Windows.Forms.Label
|
||||
Friend WithEvents cmbModel As System.Windows.Forms.ComboBox
|
||||
Friend WithEvents Label5 As System.Windows.Forms.Label
|
||||
Friend WithEvents cmbLine As System.Windows.Forms.ComboBox
|
||||
Friend WithEvents Label7 As System.Windows.Forms.Label
|
||||
Friend WithEvents cmbRev As System.Windows.Forms.ComboBox
|
||||
Friend WithEvents Label2 As System.Windows.Forms.Label
|
||||
Friend WithEvents cmbSeq As System.Windows.Forms.ComboBox
|
||||
Friend WithEvents Label1 As System.Windows.Forms.Label
|
||||
Friend WithEvents btnClear As System.Windows.Forms.Button
|
||||
Friend WithEvents txtLoading As System.Windows.Forms.TextBox
|
||||
Friend WithEvents Label3 As System.Windows.Forms.Label
|
||||
End Class
|
@ -0,0 +1,49 @@
|
||||
Imports System.Data
|
||||
Imports System.Data.SqlClient
|
||||
|
||||
Public Class loginForm
|
||||
|
||||
Public cnstr As String
|
||||
Public username As String
|
||||
Public userType As String
|
||||
Public userSRList As List(Of String)
|
||||
Dim connection As New Connection
|
||||
Dim conn As SqlConnection
|
||||
|
||||
Private Function validateUser() As Boolean
|
||||
Dim currentUser As New User(txtUsername.Text)
|
||||
|
||||
If StrComp(RTrim(currentUser.password), currentUser.EncryptString(txtPassword.Text), CompareMethod.Text) = 0 Then
|
||||
username = currentUser.username
|
||||
userType = currentUser.usertype
|
||||
Return True
|
||||
Else
|
||||
Return False
|
||||
End If
|
||||
End Function
|
||||
|
||||
Private Sub btn_ok_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn_ok.Click
|
||||
If validateUser() = True Then
|
||||
Me.Hide()
|
||||
mainForm.Show()
|
||||
Else
|
||||
MessageBox.Show("Either user does not exists or password is incorrect.", "Login Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub btn_cancel_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn_cancel.Click
|
||||
Me.Close()
|
||||
End Sub
|
||||
|
||||
Private Sub txtPassword_KeyUp(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles txtPassword.KeyUp
|
||||
If e.KeyCode = Keys.Enter Then
|
||||
If validateUser() = True Then
|
||||
Me.Hide()
|
||||
mainForm.Show()
|
||||
Else
|
||||
MessageBox.Show("Either user does not exists or password is incorrect.", "Login Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
|
||||
End If
|
||||
btn_ok.Focus()
|
||||
End If
|
||||
End Sub
|
||||
End Class
|
Binary file not shown.
@ -0,0 +1,18 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<asmv1:assembly xsi:schemaLocation="urn:schemas-microsoft-com:asm.v1 assembly.adaptive.xsd" manifestVersion="1.0" xmlns:asmv3="urn:schemas-microsoft-com:asm.v3" xmlns:dsig="http://www.w3.org/2000/09/xmldsig#" xmlns:co.v1="urn:schemas-microsoft-com:clickonce.v1" xmlns="urn:schemas-microsoft-com:asm.v2" xmlns:asmv1="urn:schemas-microsoft-com:asm.v1" xmlns:asmv2="urn:schemas-microsoft-com:asm.v2" xmlns:xrml="urn:mpeg:mpeg21:2003:01-REL-R-NS" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance">
|
||||
<assemblyIdentity name="Mounting Sequence.application" version="1.0.0.1" publicKeyToken="0cfad3879e7e4025" language="neutral" processorArchitecture="msil" xmlns="urn:schemas-microsoft-com:asm.v1" />
|
||||
<description asmv2:publisher="ionics" asmv2:product="Mounting Sequence" xmlns="urn:schemas-microsoft-com:asm.v1" />
|
||||
<deployment install="true" mapFileExtensions="true" />
|
||||
<dependency>
|
||||
<dependentAssembly dependencyType="install" codebase="Application Files\Mounting Sequence_1_0_0_1\Mounting Sequence.exe.manifest" size="7167">
|
||||
<assemblyIdentity name="Mounting Sequence.exe" version="1.0.0.1" publicKeyToken="0cfad3879e7e4025" language="neutral" processorArchitecture="msil" type="win32" />
|
||||
<hash>
|
||||
<dsig:Transforms>
|
||||
<dsig:Transform Algorithm="urn:schemas-microsoft-com:HashTransforms.Identity" />
|
||||
</dsig:Transforms>
|
||||
<dsig:DigestMethod Algorithm="http://www.w3.org/2000/09/xmldsig#sha1" />
|
||||
<dsig:DigestValue>/ifsTD+GNi+70YD9iQ3PQaVUEkk=</dsig:DigestValue>
|
||||
</hash>
|
||||
</dependentAssembly>
|
||||
</dependency>
|
||||
<publisherIdentity name="CN=IONICS\software.development" issuerKeyHash="bbfa7d0373f8144cec2bc8ccd7e97ee93773a14b" /><Signature Id="StrongNameSignature" xmlns="http://www.w3.org/2000/09/xmldsig#"><SignedInfo><CanonicalizationMethod Algorithm="http://www.w3.org/2001/10/xml-exc-c14n#" /><SignatureMethod Algorithm="http://www.w3.org/2000/09/xmldsig#rsa-sha1" /><Reference URI=""><Transforms><Transform Algorithm="http://www.w3.org/2000/09/xmldsig#enveloped-signature" /><Transform Algorithm="http://www.w3.org/2001/10/xml-exc-c14n#" /></Transforms><DigestMethod Algorithm="http://www.w3.org/2000/09/xmldsig#sha1" /><DigestValue>SakI/bFZMpzjtYagePP2dumJmRI=</DigestValue></Reference></SignedInfo><SignatureValue>TPDVJKmMxvk1pu9jWbWQRLdOzCuWjStoRYNTtU46ZoGeo00mhYRWWMlTQNRmKwYIO837UgNXawt6B+h+MoqBN8PZVUeJZYcdAQ9xpRJFYcGn6Gw/KDTBau6frwvSnZfe1BSkTiR4HXtAPR/Z/t/Jg4cLWDysRxBvXhuqzslwDe4=</SignatureValue><KeyInfo Id="StrongNameKeyInfo"><KeyValue><RSAKeyValue><Modulus>jpBxO04Zwm0+BvzN1BgAamcjOQeB4tl4Bl3HKIYpDiBsAhICv8yPfVX2b1jtcYTiqjYGEyiMXsGnUKhNIo483OPIpgl6vKqQHejFNGW7WsrX9X49JaLqrRc989QGP55LNC+0WKntvH225DnCSP8tuxpuMt1M66qwRIp6q98Je18=</Modulus><Exponent>AQAB</Exponent></RSAKeyValue></KeyValue><msrel:RelData xmlns:msrel="http://schemas.microsoft.com/windows/rel/2005/reldata"><r:license xmlns:r="urn:mpeg:mpeg21:2003:01-REL-R-NS" xmlns:as="http://schemas.microsoft.com/windows/pki/2005/Authenticode"><r:grant><as:ManifestInformation Hash="129989e976f6f378a086b5e39c3259b1fd08a949" Description="" Url=""><as:assemblyIdentity name="Mounting Sequence.application" version="1.0.0.1" publicKeyToken="0cfad3879e7e4025" language="neutral" processorArchitecture="msil" xmlns="urn:schemas-microsoft-com:asm.v1" /></as:ManifestInformation><as:SignedBy /><as:AuthenticodePublisher><as:X509SubjectName>CN=IONICS\software.development</as:X509SubjectName></as:AuthenticodePublisher></r:grant><r:issuer><Signature Id="AuthenticodeSignature" xmlns="http://www.w3.org/2000/09/xmldsig#"><SignedInfo><CanonicalizationMethod Algorithm="http://www.w3.org/2001/10/xml-exc-c14n#" /><SignatureMethod Algorithm="http://www.w3.org/2000/09/xmldsig#rsa-sha1" /><Reference URI=""><Transforms><Transform Algorithm="http://www.w3.org/2000/09/xmldsig#enveloped-signature" /><Transform Algorithm="http://www.w3.org/2001/10/xml-exc-c14n#" /></Transforms><DigestMethod Algorithm="http://www.w3.org/2000/09/xmldsig#sha1" /><DigestValue>0N5So/dA+myix3KwTpVdXRDTfLQ=</DigestValue></Reference></SignedInfo><SignatureValue>gMtGBQd7W8S/MCKM1JJS1LX9TN3/bOdQ1BUtG60NhMQgqnW7nNB7rftbxGtn57goX2tydIVrhxN+oCt0avNovwAl+UmXVzzHl7fUTN2p7hKGqXybVrDSWu7J8A0pTuf1aVYhnKdYV753XD3E6F0CCI2rcOio97HX4aTm4WTk1Po=</SignatureValue><KeyInfo><KeyValue><RSAKeyValue><Modulus>jpBxO04Zwm0+BvzN1BgAamcjOQeB4tl4Bl3HKIYpDiBsAhICv8yPfVX2b1jtcYTiqjYGEyiMXsGnUKhNIo483OPIpgl6vKqQHejFNGW7WsrX9X49JaLqrRc989QGP55LNC+0WKntvH225DnCSP8tuxpuMt1M66qwRIp6q98Je18=</Modulus><Exponent>AQAB</Exponent></RSAKeyValue></KeyValue><X509Data><X509Certificate>MIIB/TCCAWqgAwIBAgIQfn9ynDYeLYFFwiB+ZhnWeTAJBgUrDgMCHQUAMEExPzA9BgNVBAMeNgBJAE8ATgBJAEMAUwBcAHMAbwBmAHQAdwBhAHIAZQAuAGQAZQB2AGUAbABvAHAAbQBlAG4AdDAeFw0xMTAxMDYwNzE4MjlaFw0xMjAxMDYxMzE4MjlaMEExPzA9BgNVBAMeNgBJAE8ATgBJAEMAUwBcAHMAbwBmAHQAdwBhAHIAZQAuAGQAZQB2AGUAbABvAHAAbQBlAG4AdDCBnzANBgkqhkiG9w0BAQEFAAOBjQAwgYkCgYEAjpBxO04Zwm0+BvzN1BgAamcjOQeB4tl4Bl3HKIYpDiBsAhICv8yPfVX2b1jtcYTiqjYGEyiMXsGnUKhNIo483OPIpgl6vKqQHejFNGW7WsrX9X49JaLqrRc989QGP55LNC+0WKntvH225DnCSP8tuxpuMt1M66qwRIp6q98Je18CAwEAATAJBgUrDgMCHQUAA4GBAIhHnYLeqoGDumARAPfZPAfzUT+4sYbBqL+MEX3Kjxb3Yjs7I54X6cWQBxOQT/e6NPUQCPgkeME9XM+ta9xIuCmTn0uLdw+C526mLTPuELFR53hAWqJcxqC1clUub/y6/xJYdfX9QciaZ874XMHyvN3Vpagdtek5F7Cdy6ndj0dl</X509Certificate></X509Data></KeyInfo></Signature></r:issuer></r:license></msrel:RelData></KeyInfo></Signature></asmv1:assembly>
|
@ -0,0 +1,20 @@
|
||||
|
||||
Microsoft Visual Studio Solution File, Format Version 11.00
|
||||
# Visual Studio 2010
|
||||
Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "Kanban System", "Mounting Sequence\Kanban System.vbproj", "{8C79F105-3456-4E41-8510-5B53B1CBE2DA}"
|
||||
EndProject
|
||||
Global
|
||||
GlobalSection(SolutionConfigurationPlatforms) = preSolution
|
||||
Debug|Any CPU = Debug|Any CPU
|
||||
Release|Any CPU = Release|Any CPU
|
||||
EndGlobalSection
|
||||
GlobalSection(ProjectConfigurationPlatforms) = postSolution
|
||||
{8C79F105-3456-4E41-8510-5B53B1CBE2DA}.Debug|Any CPU.ActiveCfg = Debug|Any CPU
|
||||
{8C79F105-3456-4E41-8510-5B53B1CBE2DA}.Debug|Any CPU.Build.0 = Debug|Any CPU
|
||||
{8C79F105-3456-4E41-8510-5B53B1CBE2DA}.Release|Any CPU.ActiveCfg = Release|Any CPU
|
||||
{8C79F105-3456-4E41-8510-5B53B1CBE2DA}.Release|Any CPU.Build.0 = Release|Any CPU
|
||||
EndGlobalSection
|
||||
GlobalSection(SolutionProperties) = preSolution
|
||||
HideSolutionNode = FALSE
|
||||
EndGlobalSection
|
||||
EndGlobal
|
Binary file not shown.
Binary file not shown.
1137
.svn/pristine/52/5260efa5b19fde5b3959381f07d4d58bbf001a3e.svn-base
Normal file
1137
.svn/pristine/52/5260efa5b19fde5b3959381f07d4d58bbf001a3e.svn-base
Normal file
File diff suppressed because it is too large
Load Diff
@ -0,0 +1 @@
|
||||
|
@ -0,0 +1,142 @@
|
||||
<?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.Runtime.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:import namespace="http://www.w3.org/XML/1998/namespace" />
|
||||
<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" use="required" type="xsd:string" />
|
||||
<xsd:attribute name="type" type="xsd:string" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</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" use="required" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</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>
|
||||
<metadata name="ToolStrip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>17, 17</value>
|
||||
</metadata>
|
||||
<assembly alias="System.Drawing" name="System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
|
||||
<data name="ts_delete.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
|
||||
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAIHSURBVDhPjZNPSJNxGMe/77t38w/mwCG4SSCI5DAIjA7r
|
||||
Ejt0qEuX6uDF05AUL4kXPQhGFFOJDDrVNSToUrcOEVgUgZUpLOc0a71ZNqe4JNvUx+/z+jIUm/WFD7x7
|
||||
nu/zfd7fbxv+oRBpIH7n03/qxDHgbszE9IgPq8M+rPdZsM8ZeM7eFVLpuP4mC+hpt5CbqoTkKyCbZZAC
|
||||
+UMyrD0oh0RMjNPavDuxRz6gL05jnqYNE5IFZJlkyBL5Qda8kEkGRz1IckSPVlTkjA9bmzTk3EENUFZc
|
||||
9HmRZAzIOJc0GnjEOdOZbvLg4QyHf9Og20rxk3zVZ4b0erHN0VM6XxHz4EuBxe9s2q6pFPoWyhMPJGCi
|
||||
RwOO3jSQ22DxM1mKRmWlu1uynZ376eqSbEeH2IGApOl7yYUnDdzSgIZhYF3PniK/xsbkMNmtrfKJvtck
|
||||
AoxqQO0gsLzGwkeSjcelYNtSSKcPkE+lZCEcljn6npHjwHUNMC4CE3rTMxri90uyvl6SweB+QiFJ1tVJ
|
||||
wrKcN7hPvMBlDUAA6H3Kgt70O/KeTJZgisySSwCvArVOAFV9Fng7z4Ze5EQJNGCB3CDlQLs7W1T4ApB4
|
||||
w+Y3osf5QPZuTZBrpAYYcGcOKMg/0r2r/FYe0/iCvCJ6vDuEC6bpadu1Hq6WKiDGn9nQaeB2E9DP2nly
|
||||
xOkWBewAte1XydH447UAAAAASUVORK5CYII=
|
||||
</value>
|
||||
</data>
|
||||
<metadata name="SaveFileDialog.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>124, 17</value>
|
||||
</metadata>
|
||||
</root>
|
@ -0,0 +1,136 @@
|
||||
C:\Projects\Mounting Sequence\Mounting Sequence\bin\Debug\Mounting Sequence.exe
|
||||
C:\Projects\Mounting Sequence\Mounting Sequence\bin\Debug\Mounting Sequence.pdb
|
||||
C:\Projects\Mounting Sequence\Mounting Sequence\bin\Debug\Mounting Sequence.xml
|
||||
C:\Projects\Mounting Sequence\Mounting Sequence\obj\Debug\ResolveAssemblyReference.cache
|
||||
C:\Projects\Mounting Sequence\Mounting Sequence\obj\Debug\Mounting_Sequence.mainForm.resources
|
||||
C:\Projects\Mounting Sequence\Mounting Sequence\obj\Debug\Mounting_Sequence.mcSeqForm.resources
|
||||
C:\Projects\Mounting Sequence\Mounting Sequence\obj\Debug\Mounting_Sequence.Resources.resources
|
||||
C:\Projects\Mounting Sequence\Mounting Sequence\obj\Debug\Mounting Sequence.exe
|
||||
C:\Projects\Mounting Sequence\Mounting Sequence\obj\Debug\Mounting Sequence.xml
|
||||
C:\Projects\Mounting Sequence\Mounting Sequence\obj\Debug\Mounting Sequence.pdb
|
||||
C:\Projects\Mounting Sequence\Mounting Sequence\obj\Debug\Mounting_Sequence.uploadMcSeq.resources
|
||||
C:\Projects\Mounting Sequence\Mounting Sequence\obj\Debug\Mounting_Sequence.loginForm.resources
|
||||
C:\Projects\Mounting Sequence\Mounting Sequence\obj\Debug\Mounting_Sequence.mountingForm.resources
|
||||
C:\Projects\Mounting Sequence\Mounting Sequence\bin\Debug\Mounting Sequence.exe.config
|
||||
C:\Projects\Mounting Sequence\Mounting Sequence\obj\Debug\Mounting_Sequence.userForm.resources
|
||||
C:\Projects\Mounting Sequence\Mounting Sequence\obj\Debug\Mounting_Sequence.machineForm.resources
|
||||
C:\Projects\Mounting Sequence\Mounting Sequence\obj\Debug\Mounting_Sequence.requestForm.resources
|
||||
C:\Projects\Mounting Sequence\Mounting Sequence\bin\Debug\Mounting Sequence.exe.manifest
|
||||
C:\Projects\Mounting Sequence\Mounting Sequence\bin\Debug\Mounting Sequence.application
|
||||
C:\Projects\Mounting Sequence\Mounting Sequence\obj\Debug\Mounting Sequence.exe.manifest
|
||||
C:\Projects\Mounting Sequence\Mounting Sequence\obj\Debug\Mounting Sequence.application
|
||||
C:\Projects\Mounting Sequence\Mounting Sequence\obj\Debug\GenerateResource-ResGen.read.1.tlog
|
||||
C:\Projects\Mounting Sequence\Mounting Sequence\obj\Debug\GenerateResource-ResGen.read.4.tlog
|
||||
C:\Projects\Mounting Sequence\Mounting Sequence\obj\Debug\GenerateResource-ResGen.write.1.tlog
|
||||
C:\Projects\Mounting Sequence\Mounting Sequence\obj\Debug\Mounting_Sequence.PPReceiveForm.resources
|
||||
C:\Projects\Mounting Sequence\Mounting Sequence\obj\Debug\Mounting_Sequence.PPReturnForm.resources
|
||||
C:\Projects\Mounting Sequence\Mounting Sequence\obj\Debug\Mounting_Sequence.PPInventoryForm.resources
|
||||
E:\Projects\Mounting Sequence\Mounting Sequence\bin\Debug\Mounting Sequence.exe.config
|
||||
E:\Projects\Mounting Sequence\Mounting Sequence\obj\Debug\Mounting Sequence.exe
|
||||
E:\Projects\Mounting Sequence\Mounting Sequence\obj\Debug\Mounting Sequence.xml
|
||||
E:\Projects\Mounting Sequence\Mounting Sequence\obj\Debug\Mounting Sequence.pdb
|
||||
E:\Projects\Mounting Sequence\Mounting Sequence\bin\Debug\Mounting Sequence.exe.manifest
|
||||
E:\Projects\Mounting Sequence\Mounting Sequence\bin\Debug\Mounting Sequence.application
|
||||
E:\Projects\Mounting Sequence\Mounting Sequence\bin\Debug\Mounting Sequence.exe
|
||||
E:\Projects\Mounting Sequence\Mounting Sequence\bin\Debug\Mounting Sequence.pdb
|
||||
E:\Projects\Mounting Sequence\Mounting Sequence\bin\Debug\Mounting Sequence.xml
|
||||
E:\Projects\Mounting Sequence\Mounting Sequence\obj\Debug\ResolveAssemblyReference.cache
|
||||
E:\Projects\Mounting Sequence\Mounting Sequence\obj\Debug\Mounting_Sequence.PPReturnForm.resources
|
||||
E:\Projects\Mounting Sequence\Mounting Sequence\obj\Debug\Mounting_Sequence.PPInventoryForm.resources
|
||||
E:\Projects\Mounting Sequence\Mounting Sequence\obj\Debug\Mounting_Sequence.PPReceiveForm.resources
|
||||
E:\Projects\Mounting Sequence\Mounting Sequence\obj\Debug\Mounting_Sequence.machineForm.resources
|
||||
E:\Projects\Mounting Sequence\Mounting Sequence\obj\Debug\Mounting_Sequence.loginForm.resources
|
||||
E:\Projects\Mounting Sequence\Mounting Sequence\obj\Debug\Mounting_Sequence.mainForm.resources
|
||||
E:\Projects\Mounting Sequence\Mounting Sequence\obj\Debug\Mounting_Sequence.mcSeqForm.resources
|
||||
E:\Projects\Mounting Sequence\Mounting Sequence\obj\Debug\Mounting_Sequence.mountingForm.resources
|
||||
E:\Projects\Mounting Sequence\Mounting Sequence\obj\Debug\Mounting_Sequence.requestForm.resources
|
||||
E:\Projects\Mounting Sequence\Mounting Sequence\obj\Debug\Mounting_Sequence.uploadMcSeq.resources
|
||||
E:\Projects\Mounting Sequence\Mounting Sequence\obj\Debug\Mounting_Sequence.userForm.resources
|
||||
E:\Projects\Mounting Sequence\Mounting Sequence\obj\Debug\Mounting_Sequence.Resources.resources
|
||||
E:\Projects\Mounting Sequence\Mounting Sequence\obj\Debug\GenerateResource-ResGen.read.1.tlog
|
||||
E:\Projects\Mounting Sequence\Mounting Sequence\obj\Debug\GenerateResource-ResGen.read.4.tlog
|
||||
E:\Projects\Mounting Sequence\Mounting Sequence\obj\Debug\GenerateResource-ResGen.write.1.tlog
|
||||
E:\Projects\Mounting Sequence\Mounting Sequence\obj\Debug\Mounting Sequence.exe.manifest
|
||||
E:\Projects\Mounting Sequence\Mounting Sequence\obj\Debug\Mounting Sequence.application
|
||||
D:\Projects\Mounting Sequence\Mounting Sequence\bin\Debug\Mounting Sequence.exe.config
|
||||
D:\Projects\Mounting Sequence\Mounting Sequence\obj\Debug\Mounting Sequence.exe
|
||||
D:\Projects\Mounting Sequence\Mounting Sequence\obj\Debug\Mounting Sequence.xml
|
||||
D:\Projects\Mounting Sequence\Mounting Sequence\obj\Debug\Mounting Sequence.pdb
|
||||
D:\Projects\Mounting Sequence\Mounting Sequence\bin\Debug\Mounting Sequence.exe.manifest
|
||||
D:\Projects\Mounting Sequence\Mounting Sequence\bin\Debug\Mounting Sequence.application
|
||||
D:\Projects\Mounting Sequence\Mounting Sequence\bin\Debug\Mounting Sequence.exe
|
||||
D:\Projects\Mounting Sequence\Mounting Sequence\bin\Debug\Mounting Sequence.pdb
|
||||
D:\Projects\Mounting Sequence\Mounting Sequence\bin\Debug\Mounting Sequence.xml
|
||||
D:\Projects\Mounting Sequence\Mounting Sequence\obj\Debug\ResolveAssemblyReference.cache
|
||||
D:\Projects\Mounting Sequence\Mounting Sequence\obj\Debug\Mounting_Sequence.PPReturnForm.resources
|
||||
D:\Projects\Mounting Sequence\Mounting Sequence\obj\Debug\Mounting_Sequence.PPInventoryForm.resources
|
||||
D:\Projects\Mounting Sequence\Mounting Sequence\obj\Debug\Mounting_Sequence.PPReceiveForm.resources
|
||||
D:\Projects\Mounting Sequence\Mounting Sequence\obj\Debug\Mounting_Sequence.machineForm.resources
|
||||
D:\Projects\Mounting Sequence\Mounting Sequence\obj\Debug\Mounting_Sequence.loginForm.resources
|
||||
D:\Projects\Mounting Sequence\Mounting Sequence\obj\Debug\Mounting_Sequence.mainForm.resources
|
||||
D:\Projects\Mounting Sequence\Mounting Sequence\obj\Debug\Mounting_Sequence.mcSeqForm.resources
|
||||
D:\Projects\Mounting Sequence\Mounting Sequence\obj\Debug\Mounting_Sequence.mountingForm.resources
|
||||
D:\Projects\Mounting Sequence\Mounting Sequence\obj\Debug\Mounting_Sequence.requestForm.resources
|
||||
D:\Projects\Mounting Sequence\Mounting Sequence\obj\Debug\Mounting_Sequence.uploadMcSeq.resources
|
||||
D:\Projects\Mounting Sequence\Mounting Sequence\obj\Debug\Mounting_Sequence.userForm.resources
|
||||
D:\Projects\Mounting Sequence\Mounting Sequence\obj\Debug\Mounting_Sequence.Resources.resources
|
||||
D:\Projects\Mounting Sequence\Mounting Sequence\obj\Debug\GenerateResource-ResGen.read.1.tlog
|
||||
D:\Projects\Mounting Sequence\Mounting Sequence\obj\Debug\GenerateResource-ResGen.read.4.tlog
|
||||
D:\Projects\Mounting Sequence\Mounting Sequence\obj\Debug\GenerateResource-ResGen.write.1.tlog
|
||||
D:\Projects\Mounting Sequence\Mounting Sequence\obj\Debug\Mounting Sequence.exe.manifest
|
||||
D:\Projects\Mounting Sequence\Mounting Sequence\obj\Debug\Mounting Sequence.application
|
||||
D:\Projects\Mounting Sequence\Mounting Sequence\obj\Debug\Mounting_Sequence.PCBScanForm.resources
|
||||
Z:\Source\Dorina\Mounting Sequence\Mounting Sequence\bin\Debug\Mounting Sequence.exe.config
|
||||
Z:\Source\Dorina\Mounting Sequence\Mounting Sequence\obj\Debug\Mounting Sequence.exe
|
||||
Z:\Source\Dorina\Mounting Sequence\Mounting Sequence\obj\Debug\Mounting Sequence.xml
|
||||
Z:\Source\Dorina\Mounting Sequence\Mounting Sequence\obj\Debug\Mounting Sequence.pdb
|
||||
C:\Gen\07. References\Mounting Sequence\Mounting Sequence\bin\Debug\Mounting Sequence.exe.config
|
||||
C:\Gen\07. References\Mounting Sequence\Mounting Sequence\obj\Debug\Mounting Sequence.exe
|
||||
C:\Gen\07. References\Mounting Sequence\Mounting Sequence\obj\Debug\Mounting Sequence.xml
|
||||
C:\Gen\07. References\Mounting Sequence\Mounting Sequence\obj\Debug\Mounting Sequence.pdb
|
||||
C:\Gen\07. References\Mounting Sequence\Mounting Sequence\bin\Debug\Mounting Sequence.exe.manifest
|
||||
C:\Gen\07. References\Mounting Sequence\Mounting Sequence\bin\Debug\Mounting Sequence.application
|
||||
C:\Gen\07. References\Mounting Sequence\Mounting Sequence\bin\Debug\Mounting Sequence.exe
|
||||
C:\Gen\07. References\Mounting Sequence\Mounting Sequence\bin\Debug\Mounting Sequence.pdb
|
||||
C:\Gen\07. References\Mounting Sequence\Mounting Sequence\bin\Debug\Mounting Sequence.xml
|
||||
C:\Gen\07. References\Mounting Sequence\Mounting Sequence\obj\Debug\Mounting_Sequence.PCBScanForm.resources
|
||||
C:\Gen\07. References\Mounting Sequence\Mounting Sequence\obj\Debug\Mounting_Sequence.PPReturnForm.resources
|
||||
C:\Gen\07. References\Mounting Sequence\Mounting Sequence\obj\Debug\Mounting_Sequence.PPInventoryForm.resources
|
||||
C:\Gen\07. References\Mounting Sequence\Mounting Sequence\obj\Debug\Mounting_Sequence.PPReceiveForm.resources
|
||||
C:\Gen\07. References\Mounting Sequence\Mounting Sequence\obj\Debug\Mounting_Sequence.machineForm.resources
|
||||
C:\Gen\07. References\Mounting Sequence\Mounting Sequence\obj\Debug\Mounting_Sequence.loginForm.resources
|
||||
C:\Gen\07. References\Mounting Sequence\Mounting Sequence\obj\Debug\Mounting_Sequence.mainForm.resources
|
||||
C:\Gen\07. References\Mounting Sequence\Mounting Sequence\obj\Debug\Mounting_Sequence.mcSeqForm.resources
|
||||
C:\Gen\07. References\Mounting Sequence\Mounting Sequence\obj\Debug\Mounting_Sequence.mountingForm.resources
|
||||
C:\Gen\07. References\Mounting Sequence\Mounting Sequence\obj\Debug\Mounting_Sequence.requestForm.resources
|
||||
C:\Gen\07. References\Mounting Sequence\Mounting Sequence\obj\Debug\Mounting_Sequence.uploadMcSeq.resources
|
||||
C:\Gen\07. References\Mounting Sequence\Mounting Sequence\obj\Debug\Mounting_Sequence.userForm.resources
|
||||
C:\Gen\07. References\Mounting Sequence\Mounting Sequence\obj\Debug\Mounting_Sequence.Resources.resources
|
||||
C:\Gen\07. References\Mounting Sequence\Mounting Sequence\obj\Debug\Mounting Sequence.vbproj.GenerateResource.Cache
|
||||
C:\Gen\07. References\Mounting Sequence\Mounting Sequence\obj\Debug\Mounting Sequence.exe.manifest
|
||||
C:\Gen\07. References\Mounting Sequence\Mounting Sequence\obj\Debug\Mounting Sequence.application
|
||||
C:\Gen\Gen's Workspace\KanbanSystem\Mounting Sequence\bin\Debug\Kanban System.exe.config
|
||||
C:\Gen\Gen's Workspace\KanbanSystem\Mounting Sequence\bin\Debug\Kanban System.exe.manifest
|
||||
C:\Gen\Gen's Workspace\KanbanSystem\Mounting Sequence\bin\Debug\Kanban System.application
|
||||
C:\Gen\Gen's Workspace\KanbanSystem\Mounting Sequence\bin\Debug\Kanban System.exe
|
||||
C:\Gen\Gen's Workspace\KanbanSystem\Mounting Sequence\bin\Debug\Kanban System.pdb
|
||||
C:\Gen\Gen's Workspace\KanbanSystem\Mounting Sequence\bin\Debug\Kanban System.xml
|
||||
C:\Gen\Gen's Workspace\KanbanSystem\Mounting Sequence\obj\Debug\Mounting_Sequence.PCBScanForm.resources
|
||||
C:\Gen\Gen's Workspace\KanbanSystem\Mounting Sequence\obj\Debug\Mounting_Sequence.PPReturnForm.resources
|
||||
C:\Gen\Gen's Workspace\KanbanSystem\Mounting Sequence\obj\Debug\Mounting_Sequence.PPInventoryForm.resources
|
||||
C:\Gen\Gen's Workspace\KanbanSystem\Mounting Sequence\obj\Debug\Mounting_Sequence.PPReceiveForm.resources
|
||||
C:\Gen\Gen's Workspace\KanbanSystem\Mounting Sequence\obj\Debug\Mounting_Sequence.machineForm.resources
|
||||
C:\Gen\Gen's Workspace\KanbanSystem\Mounting Sequence\obj\Debug\Mounting_Sequence.loginForm.resources
|
||||
C:\Gen\Gen's Workspace\KanbanSystem\Mounting Sequence\obj\Debug\Mounting_Sequence.mainForm.resources
|
||||
C:\Gen\Gen's Workspace\KanbanSystem\Mounting Sequence\obj\Debug\Mounting_Sequence.mcSeqForm.resources
|
||||
C:\Gen\Gen's Workspace\KanbanSystem\Mounting Sequence\obj\Debug\Mounting_Sequence.mountingForm.resources
|
||||
C:\Gen\Gen's Workspace\KanbanSystem\Mounting Sequence\obj\Debug\Mounting_Sequence.requestForm.resources
|
||||
C:\Gen\Gen's Workspace\KanbanSystem\Mounting Sequence\obj\Debug\Mounting_Sequence.uploadMcSeq.resources
|
||||
C:\Gen\Gen's Workspace\KanbanSystem\Mounting Sequence\obj\Debug\Mounting_Sequence.userForm.resources
|
||||
C:\Gen\Gen's Workspace\KanbanSystem\Mounting Sequence\obj\Debug\Mounting_Sequence.Resources.resources
|
||||
C:\Gen\Gen's Workspace\KanbanSystem\Mounting Sequence\obj\Debug\Mounting Sequence.vbproj.GenerateResource.Cache
|
||||
C:\Gen\Gen's Workspace\KanbanSystem\Mounting Sequence\obj\Debug\Kanban System.exe.manifest
|
||||
C:\Gen\Gen's Workspace\KanbanSystem\Mounting Sequence\obj\Debug\Kanban System.application
|
||||
C:\Gen\Gen's Workspace\KanbanSystem\Mounting Sequence\obj\Debug\Kanban System.exe
|
||||
C:\Gen\Gen's Workspace\KanbanSystem\Mounting Sequence\obj\Debug\Kanban System.xml
|
||||
C:\Gen\Gen's Workspace\KanbanSystem\Mounting Sequence\obj\Debug\Kanban System.pdb
|
Binary file not shown.
@ -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>loginForm</MainForm>
|
||||
<SingleInstance>false</SingleInstance>
|
||||
<ShutdownMode>0</ShutdownMode>
|
||||
<EnableVisualStyles>true</EnableVisualStyles>
|
||||
<AuthenticationMode>0</AuthenticationMode>
|
||||
<SaveMySettingsOnExit>true</SaveMySettingsOnExit>
|
||||
</MyApplicationData>
|
@ -0,0 +1,196 @@
|
||||
Imports System
|
||||
Imports System.Data
|
||||
Imports System.Data.SqlClient
|
||||
Imports System.IO
|
||||
Imports System.Security
|
||||
Imports System.Security.Cryptography
|
||||
Imports System.Text
|
||||
|
||||
Public Class Machine
|
||||
Private _mCode As String
|
||||
Private _mName As String
|
||||
Private _mModel As String
|
||||
Private _plant As String
|
||||
Private _line As String
|
||||
Private _isActive As Boolean
|
||||
Private cnstr As String
|
||||
|
||||
#Region "Properties"
|
||||
Public Property code() As String
|
||||
Get
|
||||
Return _mCode
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_mCode = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property name() As String
|
||||
Get
|
||||
Return _mName
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_mName = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property model() As String
|
||||
Get
|
||||
Return _mModel
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_mModel = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property plant() As String
|
||||
Get
|
||||
Return _plant
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_plant = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property line() As String
|
||||
Get
|
||||
Return _line
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_line = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property active() As Boolean
|
||||
Get
|
||||
Return _isActive
|
||||
End Get
|
||||
Set(ByVal value As Boolean)
|
||||
_isActive = value
|
||||
End Set
|
||||
End Property
|
||||
#End Region
|
||||
|
||||
#Region "Methods"
|
||||
Public Sub New()
|
||||
cnstr = mainForm.cnstr
|
||||
End Sub
|
||||
|
||||
Public Sub add()
|
||||
Dim conn As New SqlConnection(cnstr)
|
||||
Dim active As Integer = 0
|
||||
|
||||
If _isActive = True Then
|
||||
active = 1
|
||||
Else
|
||||
active = 0
|
||||
End If
|
||||
|
||||
Dim myQuery As String
|
||||
myQuery = "INSERT INTO KMACHINE VALUES(" & _
|
||||
"'" & _mCode & "'," & _
|
||||
"'" & _mName & "'," & _
|
||||
"'" & _mModel & "'," & _
|
||||
"'" & _plant & "'," & _
|
||||
"'" & _line & "'," & _
|
||||
"'" & DateTime.Now & "'," & _
|
||||
active & ")"
|
||||
|
||||
Dim mycommand As SqlCommand
|
||||
mycommand = New SqlCommand(myQuery, conn)
|
||||
|
||||
Try
|
||||
conn.Open()
|
||||
mycommand.ExecuteNonQuery()
|
||||
MessageBox.Show("Successfully Saved.", "Add Machine", MessageBoxButtons.OK, MessageBoxIcon.Information)
|
||||
Catch ex As Exception
|
||||
MessageBox.Show(ex.Message, "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
|
||||
Finally
|
||||
conn.Close()
|
||||
conn.Dispose()
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
Public Sub update()
|
||||
Dim conn As New SqlConnection(cnstr)
|
||||
Dim active As Integer = 0
|
||||
|
||||
If _isActive = True Then
|
||||
active = 1
|
||||
Else
|
||||
active = 0
|
||||
End If
|
||||
|
||||
Dim myQuery As String
|
||||
myQuery = "UPDATE KMACHINE SET" & _
|
||||
" KMCHNAME = " & "'" & _mName & "'," & _
|
||||
"KMCHMODEL = " & "'" & _mModel & "'," & _
|
||||
"KMCHPLANT = " & "'" & _plant & "'," & _
|
||||
"KMCHLINE = " & "'" & _line & "'," & _
|
||||
"KUPDTTIME = " & "'" & DateTime.Now & "'," & _
|
||||
"KACTIVE = " & active & _
|
||||
" WHERE KMCHCODE = '" & _mCode & "'"
|
||||
|
||||
Dim mycommand As SqlCommand
|
||||
mycommand = New SqlCommand(myQuery, conn)
|
||||
|
||||
Try
|
||||
conn.Open()
|
||||
mycommand.ExecuteNonQuery()
|
||||
MessageBox.Show("Successfully Saved.", "Update Machine", MessageBoxButtons.OK, MessageBoxIcon.Information)
|
||||
Catch ex As Exception
|
||||
MessageBox.Show(ex.Message, "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
|
||||
Finally
|
||||
conn.Close()
|
||||
conn.Dispose()
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
Public Sub delete()
|
||||
Dim conn As New SqlConnection(cnstr)
|
||||
|
||||
Dim myQuery As String
|
||||
myQuery = "DELETE FROM KMACHINE WHERE KMCHCODE = '" & _mCode & "'"
|
||||
|
||||
Dim mycommand As SqlCommand
|
||||
mycommand = New SqlCommand(myQuery, conn)
|
||||
|
||||
Try
|
||||
conn.Open()
|
||||
mycommand.ExecuteNonQuery()
|
||||
MessageBox.Show("Successfully Deleted.", "Delete Machine", MessageBoxButtons.OK, MessageBoxIcon.Information)
|
||||
Catch ex As Exception
|
||||
MessageBox.Show(ex.Message, "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
|
||||
Finally
|
||||
conn.Close()
|
||||
conn.Dispose()
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
Public Function getMachines(ByVal plant As String) As List(Of String)
|
||||
Dim machineList As New List(Of String)
|
||||
Dim conn As New SqlConnection(cnstr)
|
||||
|
||||
Dim myQuery As String
|
||||
myQuery = "SELECT * FROM KMACHINE" & _
|
||||
" WHERE KMCHPLANT = '" & plant & "'" & _
|
||||
" ORDER BY KMCHCODE"
|
||||
|
||||
Dim mycommand As SqlCommand
|
||||
mycommand = New SqlCommand(myQuery, conn)
|
||||
|
||||
Try
|
||||
conn.Open()
|
||||
Dim reader As SqlDataReader = mycommand.ExecuteReader()
|
||||
While reader.Read
|
||||
machineList.Add(reader("KMCHNAME"))
|
||||
End While
|
||||
conn.Close()
|
||||
Catch ex As Exception
|
||||
MessageBox.Show(ex.Message, "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
|
||||
conn.Close()
|
||||
End Try
|
||||
Return machineList
|
||||
End Function
|
||||
#End Region
|
||||
End Class
|
@ -0,0 +1,217 @@
|
||||
Imports System
|
||||
Imports System.Data
|
||||
Imports System.Data.SqlClient
|
||||
Imports System.IO
|
||||
Imports System.Security
|
||||
Imports System.Security.Cryptography
|
||||
Imports System.Text
|
||||
|
||||
|
||||
Public Class Plant
|
||||
Private cnstr As String
|
||||
Private _plantCode As String
|
||||
Private _plantName As String
|
||||
Private _createdby As String
|
||||
Private _createddate As DateTime
|
||||
Dim myquery As String
|
||||
|
||||
|
||||
#Region "Property"
|
||||
Public Property plantCode() As String
|
||||
Get
|
||||
Return _plantCode
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_plantCode = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property plantName() As String
|
||||
Get
|
||||
Return _plantName
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_plantName = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property createdby() As String
|
||||
Get
|
||||
Return _createdby
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_createdby = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property createddate() As DateTime
|
||||
Get
|
||||
Return (_createddate)
|
||||
End Get
|
||||
Set(ByVal value As DateTime)
|
||||
_createddate = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
#End Region
|
||||
|
||||
|
||||
|
||||
Public Sub getplant()
|
||||
Dim conn As New SqlConnection(cnstr)
|
||||
Dim myquery As String
|
||||
|
||||
myquery = "SELECT * FROM KANBAN.DBO.PLANTS"
|
||||
|
||||
Dim mycommand As SqlCommand
|
||||
mycommand = New SqlCommand(myquery, conn)
|
||||
|
||||
Try
|
||||
conn.Open()
|
||||
Dim reader As SqlDataReader = mycommand.ExecuteReader()
|
||||
If (reader.HasRows) Then
|
||||
reader.Read()
|
||||
plantCode = reader("plantCode")
|
||||
plantName = reader("plantName")
|
||||
createdby = reader("createdby")
|
||||
createddate = reader("createddate")
|
||||
End If
|
||||
Catch ex As Exception
|
||||
MessageBox.Show(ex.Message, "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
|
||||
End Try
|
||||
conn.Close()
|
||||
conn.Dispose()
|
||||
End Sub
|
||||
|
||||
Public Function retrievePlant() As List(Of String)
|
||||
Dim plantlist As New List(Of String)
|
||||
Dim conn As New SqlConnection(cnstr)
|
||||
Dim myquery As String
|
||||
|
||||
myquery = "SELECT * FROM KANBAN.DBO.PLANTS"
|
||||
|
||||
Dim mycommand As SqlCommand
|
||||
mycommand = New SqlCommand(myquery, conn)
|
||||
|
||||
Try
|
||||
conn.Open()
|
||||
Dim reader As SqlDataReader = mycommand.ExecuteReader()
|
||||
While reader.Read
|
||||
plantlist.Add(reader("plantCode"))
|
||||
End While
|
||||
Catch ex As Exception
|
||||
MessageBox.Show(ex.Message, "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
|
||||
Finally
|
||||
conn.Close()
|
||||
conn.Dispose()
|
||||
End Try
|
||||
|
||||
Return plantlist
|
||||
End Function
|
||||
|
||||
Public Sub AddRecordPlant()
|
||||
Dim conn As New SqlConnection(cnstr)
|
||||
|
||||
myquery = "INSERT INTO PLANTS (plantCode, " & _
|
||||
"plantName, createdby, createddate) " & _
|
||||
"VALUES ('" & plantCode & "', " & _
|
||||
"'" & createdby & "', " & _
|
||||
"'" & createddate & "')"
|
||||
|
||||
Dim mycommand As SqlCommand
|
||||
mycommand = New SqlCommand(myquery, conn)
|
||||
|
||||
Try
|
||||
conn.Open()
|
||||
If (checkExistplant(plantCode) = False) Then
|
||||
mycommand.ExecuteNonQuery()
|
||||
Else
|
||||
MessageBox.Show("Plant already exists in the database.", "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
|
||||
End If
|
||||
Catch ex As Exception
|
||||
MessageBox.Show(ex.Message, "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
|
||||
Finally
|
||||
conn.Close()
|
||||
conn.Dispose()
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
Public Sub UpdateRecordPlant(ByVal oldPlant As String)
|
||||
Dim conn As New SqlConnection(cnstr)
|
||||
|
||||
myquery = "Update PLANTS " & _
|
||||
"SET plantCode = " & "'" & plantCode & "'" & "," & _
|
||||
"plantName = '" & plantName & "'" & "," & _
|
||||
"createdby = '" & createdby & "'" & "" & _
|
||||
"createddate = '" & createddate & "'" & "" & _
|
||||
"WHERE plantCode = '" & oldPlant & "'"
|
||||
|
||||
Dim mycommand As SqlCommand
|
||||
mycommand = New SqlCommand(myquery, conn)
|
||||
|
||||
Try
|
||||
conn.Open()
|
||||
If (checkExistplant(plantCode) = False) Then
|
||||
mycommand.ExecuteNonQuery()
|
||||
Else
|
||||
MessageBox.Show("Plant already exists in the database.", "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
|
||||
End If
|
||||
Catch ex As Exception
|
||||
MessageBox.Show(ex.Message, "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
|
||||
Finally
|
||||
conn.Close()
|
||||
conn.Dispose()
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
Public Sub deleteRecordPlant(ByVal plantCode As String)
|
||||
Dim conn As New SqlConnection(cnstr)
|
||||
|
||||
myquery = "DELETE FROM PLANTS" & _
|
||||
"where plantCode = '" & plantCode & "'"
|
||||
|
||||
Dim mycommand As SqlCommand
|
||||
mycommand = New SqlCommand(myquery, Conn)
|
||||
|
||||
Try
|
||||
conn.Open()
|
||||
If (checkExistplant(plantCode) = True) Then
|
||||
mycommand.ExecuteNonQuery()
|
||||
Else
|
||||
MessageBox.Show("Plant does not exists in the database.", "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
|
||||
End If
|
||||
Catch ex As Exception
|
||||
MessageBox.Show(ex.Message, "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
|
||||
Finally
|
||||
conn.Close()
|
||||
conn.Dispose()
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
Public Function checkExistplant(ByVal plantCode As String) As Boolean
|
||||
Dim conn As New SqlConnection(cnstr)
|
||||
Dim result As Boolean = False
|
||||
|
||||
myquery = "SELECT * FROM PLANTS " & _
|
||||
"WHERE plantCode = " & "'" & plantCode & "'"
|
||||
|
||||
Dim mycommand As SqlCommand
|
||||
mycommand = New SqlCommand(myquery, conn)
|
||||
|
||||
Try
|
||||
conn.Open()
|
||||
Dim reader As SqlDataReader = mycommand.ExecuteReader()
|
||||
If (reader.HasRows) Then
|
||||
result = True
|
||||
Else
|
||||
result = False
|
||||
End If
|
||||
Catch ex As Exception
|
||||
MessageBox.Show(ex.Message, "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
|
||||
Finally
|
||||
conn.Close()
|
||||
conn.Dispose()
|
||||
End Try
|
||||
Return result
|
||||
End Function
|
||||
End Class
|
@ -0,0 +1,150 @@
|
||||
Imports System
|
||||
Imports System.Data
|
||||
Imports System.Data.SqlClient
|
||||
Imports System.IO
|
||||
Imports System.Security
|
||||
Imports System.Security.Cryptography
|
||||
Imports System.Text
|
||||
Public Class Mounting
|
||||
Private _date As DateTime
|
||||
Private _sequence As String
|
||||
Private _revision As String
|
||||
Private _feeder As String
|
||||
Private _partNo As String
|
||||
Private _quantity As Double
|
||||
Private _operator As String
|
||||
Private _verify As Integer
|
||||
Private _3pL As String
|
||||
Private cnstr As String
|
||||
|
||||
Public Property mDate() As DateTime
|
||||
Get
|
||||
Return _date
|
||||
End Get
|
||||
Set(ByVal value As DateTime)
|
||||
_date = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property sequence() As String
|
||||
Get
|
||||
Return _sequence
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_sequence = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property revision() As String
|
||||
Get
|
||||
Return _revision
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_revision = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property feeder() As String
|
||||
Get
|
||||
Return _feeder
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_feeder = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property partno() As String
|
||||
Get
|
||||
Return _partNo
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_partNo = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property quantity() As Double
|
||||
Get
|
||||
Return _quantity
|
||||
End Get
|
||||
Set(ByVal value As Double)
|
||||
_quantity = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property mOperator() As String
|
||||
Get
|
||||
Return _operator
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_operator = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property verify() As Integer
|
||||
Get
|
||||
Return _verify
|
||||
End Get
|
||||
Set(ByVal value As Integer)
|
||||
_verify = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property threePL() As String
|
||||
Get
|
||||
Return _3pL
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_3pL = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Sub New()
|
||||
cnstr = mainForm.cnstr
|
||||
End Sub
|
||||
|
||||
Public Sub add(ByVal reload As Boolean)
|
||||
Dim conn As New SqlConnection(cnstr)
|
||||
Dim active As Integer = 0
|
||||
|
||||
Dim myQuery As String
|
||||
|
||||
If reload = True Then
|
||||
myQuery = "INSERT INTO kmounting VALUES (" & _
|
||||
"'" & Me.mDate & "'," & _
|
||||
"'" & Me.sequence & "'," & _
|
||||
"'" & Me.revision & "'," & _
|
||||
"'" & Me.feeder & "'," & _
|
||||
"'" & Me.partno & "'," & _
|
||||
Me.quantity & "," & _
|
||||
"'" & Me.mOperator & "'," & _
|
||||
Me.verify & "," & _
|
||||
"'reload')"
|
||||
Else
|
||||
myQuery = "INSERT INTO kmounting VALUES (" & _
|
||||
"'" & Me.mDate & "'," & _
|
||||
"'" & Me.sequence & "'," & _
|
||||
"'" & Me.revision & "'," & _
|
||||
"'" & Me.feeder & "'," & _
|
||||
"'" & Me.partno & "'," & _
|
||||
Me.quantity & "," & _
|
||||
"'" & Me.mOperator & "'," & _
|
||||
Me.verify & "," & _
|
||||
"'" & Me.threePL & "')"
|
||||
End If
|
||||
|
||||
|
||||
Dim mycommand As SqlCommand
|
||||
mycommand = New SqlCommand(myQuery, conn)
|
||||
|
||||
Try
|
||||
conn.Open()
|
||||
mycommand.ExecuteNonQuery()
|
||||
Catch ex As Exception
|
||||
MessageBox.Show(ex.Message, "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
|
||||
Finally
|
||||
conn.Close()
|
||||
conn.Dispose()
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
End Class
|
@ -0,0 +1,71 @@
|
||||
Imports System
|
||||
Imports System.Data
|
||||
Imports System.Data.SqlClient
|
||||
Imports System.IO
|
||||
Imports System.Security
|
||||
Imports System.Security.Cryptography
|
||||
Imports System.Text
|
||||
Public Class PCB
|
||||
Private _serialno As String
|
||||
Private _lastupdate As DateTime
|
||||
Private _lastupdatedby As String
|
||||
Private cnstr As String
|
||||
|
||||
|
||||
Public Property serialno() As String
|
||||
Get
|
||||
Return _serialno
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_serialno = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property lastupdate() As DateTime
|
||||
Get
|
||||
Return _lastupdate
|
||||
End Get
|
||||
Set(ByVal value As DateTime)
|
||||
_lastupdatedby = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property lastupdatedby() As String
|
||||
Get
|
||||
Return _lastupdatedby
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_lastupdatedby = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Sub New()
|
||||
cnstr = mainForm.cnstr
|
||||
End Sub
|
||||
|
||||
Public Sub add()
|
||||
Dim conn As New SqlConnection(cnstr)
|
||||
Dim active As Integer = 0
|
||||
|
||||
Dim myQuery As String
|
||||
|
||||
myQuery = "INSERT INTO KPCB VALUES (" & _
|
||||
"'" & serialno & "'," & _
|
||||
"'" & lastupdate & "'," & _
|
||||
"'" & lastupdatedby & "')"
|
||||
|
||||
Dim mycommand As SqlCommand
|
||||
mycommand = New SqlCommand(myQuery, conn)
|
||||
|
||||
Try
|
||||
conn.Open()
|
||||
mycommand.ExecuteNonQuery()
|
||||
Catch ex As Exception
|
||||
MessageBox.Show(ex.Message, "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
|
||||
Finally
|
||||
conn.Close()
|
||||
conn.Dispose()
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
End Class
|
2174
.svn/pristine/60/60915299ee7c7be3ddf8a55ca3a6c431d9355649.svn-base
Normal file
2174
.svn/pristine/60/60915299ee7c7be3ddf8a55ca3a6c431d9355649.svn-base
Normal file
File diff suppressed because it is too large
Load Diff
@ -0,0 +1,129 @@
|
||||
<?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.Runtime.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:import namespace="http://www.w3.org/XML/1998/namespace" />
|
||||
<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" use="required" type="xsd:string" />
|
||||
<xsd:attribute name="type" type="xsd:string" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</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" use="required" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</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>
|
||||
<metadata name="KITTINGBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>622, 17</value>
|
||||
</metadata>
|
||||
<metadata name="EpsonDataSet1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>488, 17</value>
|
||||
</metadata>
|
||||
<metadata name="KITTINGTableAdapter.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>797, 17</value>
|
||||
</metadata>
|
||||
</root>
|
Binary file not shown.
After Width: | Height: | Size: 71 B |
@ -0,0 +1,152 @@
|
||||
<?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.Runtime.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:import namespace="http://www.w3.org/XML/1998/namespace" />
|
||||
<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" use="required" type="xsd:string" />
|
||||
<xsd:attribute name="type" type="xsd:string" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</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" use="required" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</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>
|
||||
<assembly alias="System.Drawing" name="System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
|
||||
<data name="btn_browse.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
iVBORw0KGgoAAAANSUhEUgAAABgAAAAYCAYAAADgdz34AAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
|
||||
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAAAlwSFlzAAALDQAA
|
||||
Cw0B7QfALAAABC9JREFUSEvFlG9MW2UUxg+DkAWdZtOIJGSbmhhNZqIyHXMY43QfZmKMiSZLzCbJ2BBY
|
||||
TIbBj2A22KJ+0bjEuIypm4wtDiGBDYflf/9RWmhLW6AD2vKnpaVAC4XiYHl87i0xfDAZBown+eW9933v
|
||||
fZ57znveK/9XbCP7SA458A8o89kkifzreDkzM9OSm5uLoqIiFBYWorCgAPn5n+D48Twc+egoDr3zHvZm
|
||||
54DP/kCS1bfWG+np6W2dWi2W7wOx+J9YIMoYjcURmp3DXV8AjR0WtBhsKD97VjGpJOs2eSFr7xtBRdQz
|
||||
5sdYIIRRf5DXAYyMTmDIMwaX2wO9xYEu2wAWl+6htLR0XSbp6Tuk7q0c8RacPLASicbgoaDRZEGPzUHh
|
||||
UfhoMkYz33gA7hEfHDRS7sPMquyLsgea5F84L0BcsDL7GiJzixhwD+Obb7/DmfIKFZOlF9MUC07NYJyZ
|
||||
9Q/54A9OMTM/y7eIcxUVSE5OvUStXeQRVXVNlNRfoUFEsDi+H5HoAgKhMOwOF3R6Izq0epjMzMZqh9Xu
|
||||
gH+SpZsI4q5nHD6OI8xueDSIEyeP4dArMvnqc9JPzfyEdCKKay7QwCOIOGnADELTsyxRNzTNLWht70BL
|
||||
azvuNGnQ3qmFuccKm70P5l4b2rRGtOrNqNNYUFtbDgwIliyCl54VD3WVdlejuOYrGlgFYUM2DeKYiUTR
|
||||
yy/u6NRRtBM6nUHNRmcw0qwNxq5u6A1dnDNwf/xwe0Mw6y/inoE6TsHb2arB4wl5xaCMC62CYFM2ovNx
|
||||
lmkOTlc/LD29q1hh6bWybE7Y+xwwdZtZNrO65hsdQziyhCHrdcQbqNMiOPiiDFF3e0JeMfiMCzWCyd/2
|
||||
qT0/F1uAw+WCiWWy2fpUwS5e64w2aPVOaA39LI8DOpMbg94onN44upuvIf4jdW4IsnaKl7qPJuRFin4t
|
||||
5AI3erJqP6KL4AEDui0ubrAFBpMDmrYu1P+uQ0vj99DeKoau8XM03TwFTe1pGDRn8EdDKZqvfoDYZcHy
|
||||
NcGp92U54zGpVsSzUreItv40W5Tuoz/vgXdYT3Roa61GfX0l6mov4fqNi6i6Uo7QwA612zC9SngNyv0M
|
||||
mSX3BZ+eEEhqisRu/yKIDdFgkG3q3oJ5T5pKlESG0zDj3opw/1bMDScnXn4QygfQIO+oTElKisxMsHuU
|
||||
Q/b3l4TWMLWKMq+MgXXA91Y4HsyRbqVEl+9c5aSSmm+TmBSMGQVP75KbisG7X5Zw0k/cmwS19OykpCQ5
|
||||
rxhkHDks8xjhgmOT8Ap+quAGi+QqBpL1vNgWlBOo7EXPJsAsSj5WDV5XDbalSfUgU4Kd8D+yYfg/+vBN
|
||||
iVD6GdWAUXQuT+ChiadKMLIBvDxk9krBnt3ipu7DCfnEX+/rnU/I7d1PSsNGeCpDbm1/SGqod1hV/m9D
|
||||
5C/6tptrgv5hTgAAAABJRU5ErkJggg==
|
||||
</value>
|
||||
</data>
|
||||
<metadata name="OpenFileDialog1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>17, 17</value>
|
||||
</metadata>
|
||||
<metadata name="$this.TrayHeight" type="System.Int32, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>97</value>
|
||||
</metadata>
|
||||
</root>
|
Binary file not shown.
@ -0,0 +1,63 @@
|
||||
Imports System
|
||||
Imports System.Data
|
||||
Imports System.Data.SqlClient
|
||||
Imports System.IO
|
||||
Imports System.Text
|
||||
Public Class PCBScanForm
|
||||
|
||||
Private cnstr = mainForm.cnstr
|
||||
Private conn As New SqlConnection(cnstr)
|
||||
Private myQuery As String = String.Empty
|
||||
Private myCommand As SqlCommand
|
||||
Private adapter As SqlDataAdapter = New SqlDataAdapter()
|
||||
Private ds As New DataSet("Machines")
|
||||
Private i, limit As Integer
|
||||
Private oldMchCode As String = String.Empty
|
||||
Private addMode, editMode As Integer
|
||||
Private row As Integer
|
||||
|
||||
Private Sub PPReceiveForm_Activated(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Activated
|
||||
txtStart.Focus()
|
||||
End Sub
|
||||
|
||||
Private Sub machineForm_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
|
||||
Me.MdiParent = mainForm
|
||||
Control.CheckForIllegalCrossThreadCalls = False
|
||||
Me.Top = 0
|
||||
Me.Left = 0
|
||||
|
||||
dtNow.Value = DateTime.Now
|
||||
txtOperator.Text = loginForm.username
|
||||
Timer1.Enabled = True
|
||||
txtStart.Focus()
|
||||
End Sub
|
||||
|
||||
Private Sub ts_close_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
|
||||
Me.Close()
|
||||
End Sub
|
||||
|
||||
Private Sub clear()
|
||||
txtSerialno.Text = String.Empty
|
||||
txtStart.Text = String.Empty
|
||||
End Sub
|
||||
|
||||
Private Sub txtStart_KeyUp(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles txtStart.KeyUp
|
||||
If e.KeyCode = Keys.Enter Then
|
||||
Dim fChar As String = String.Empty
|
||||
Dim entry As String = txtStart.Text
|
||||
|
||||
If txtStart.Text <> String.Empty Then
|
||||
Dim pcb As New PCB
|
||||
|
||||
txtSerialno.Text = txtStart.Text
|
||||
pcb.serialno = txtSerialno.Text
|
||||
pcb.lastupdate = dtNow.Value
|
||||
pcb.lastupdatedby = txtOperator.Text
|
||||
|
||||
pcb.add()
|
||||
clear()
|
||||
txtStart.Focus()
|
||||
End If
|
||||
End If
|
||||
End Sub
|
||||
End Class
|
@ -0,0 +1,24 @@
|
||||
<?xml version="1.0"?>
|
||||
<doc>
|
||||
<assembly>
|
||||
<name>
|
||||
KanbanSystem
|
||||
</name>
|
||||
</assembly>
|
||||
<members>
|
||||
<member name="P:Mounting_Sequence.My.Resources.Resources.ResourceManager">
|
||||
<summary>
|
||||
Returns the cached ResourceManager instance used by this class.
|
||||
</summary>
|
||||
</member><member name="P:Mounting_Sequence.My.Resources.Resources.Culture">
|
||||
<summary>
|
||||
Overrides the current thread's CurrentUICulture property for all
|
||||
resource lookups using this strongly typed resource class.
|
||||
</summary>
|
||||
</member><member name="T:Mounting_Sequence.My.Resources.Resources">
|
||||
<summary>
|
||||
A strongly-typed resource class, for looking up localized strings, etc.
|
||||
</summary>
|
||||
</member>
|
||||
</members>
|
||||
</doc>
|
@ -0,0 +1,52 @@
|
||||
<?xml version="1.0" encoding="utf-8" ?>
|
||||
<configuration>
|
||||
<configSections>
|
||||
<sectionGroup name="userSettings" type="System.Configuration.UserSettingsGroup, System, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" >
|
||||
<section name="Mounting_Sequence.My.MySettings" type="System.Configuration.ClientSettingsSection, System, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" allowExeDefinition="MachineToLocalUser" requirePermission="false" />
|
||||
</sectionGroup>
|
||||
</configSections>
|
||||
<system.diagnostics>
|
||||
<sources>
|
||||
<!-- This section defines the logging configuration for My.Application.Log -->
|
||||
<source name="DefaultSource" switchName="DefaultSwitch">
|
||||
<listeners>
|
||||
<add name="FileLog"/>
|
||||
<!-- Uncomment the below section to write to the Application Event Log -->
|
||||
<!--<add name="EventLog"/>-->
|
||||
</listeners>
|
||||
</source>
|
||||
</sources>
|
||||
<switches>
|
||||
<add name="DefaultSwitch" value="Information" />
|
||||
</switches>
|
||||
<sharedListeners>
|
||||
<add name="FileLog"
|
||||
type="Microsoft.VisualBasic.Logging.FileLogTraceListener, Microsoft.VisualBasic, Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a, processorArchitecture=MSIL"
|
||||
initializeData="FileLogWriter"/>
|
||||
<!-- Uncomment the below section and replace APPLICATION_NAME with the name of your application to write to the Application Event Log -->
|
||||
<!--<add name="EventLog" type="System.Diagnostics.EventLogTraceListener" initializeData="APPLICATION_NAME"/> -->
|
||||
</sharedListeners>
|
||||
</system.diagnostics>
|
||||
<userSettings>
|
||||
<Mounting_Sequence.My.MySettings>
|
||||
<setting name="server" serializeAs="String">
|
||||
<value>192.168.1.35</value>
|
||||
</setting>
|
||||
<setting name="database" serializeAs="String">
|
||||
<value>Kanban</value>
|
||||
</setting>
|
||||
<setting name="username" serializeAs="String">
|
||||
<value />
|
||||
</setting>
|
||||
<setting name="password" serializeAs="String">
|
||||
<value />
|
||||
</setting>
|
||||
<setting name="dbserver" serializeAs="String">
|
||||
<value>SQL Server</value>
|
||||
</setting>
|
||||
<setting name="isTrusted" serializeAs="String">
|
||||
<value>True</value>
|
||||
</setting>
|
||||
</Mounting_Sequence.My.MySettings>
|
||||
</userSettings>
|
||||
</configuration>
|
@ -0,0 +1,787 @@
|
||||
Imports System
|
||||
Imports System.Data
|
||||
Imports System.Data.SqlClient
|
||||
Imports System.IO
|
||||
Imports System.Security
|
||||
Imports System.Security.Cryptography
|
||||
Imports System.Text
|
||||
Public Class Sequence
|
||||
Private _ksqaccount As String
|
||||
Private _ksqmodel As String
|
||||
Private _ksqline As String
|
||||
Private _ksqpcbside As String
|
||||
Private _ksqpartno As String
|
||||
Private _ksqmachine As String
|
||||
Private _ksqrevision As String
|
||||
Private _ksqtopsdloc As String
|
||||
Private _ksqfsbsqty As String
|
||||
Private _ksqdesc1 As String
|
||||
Private _ksqdesc2 As String
|
||||
Private _ksqtopmark As String
|
||||
Private _ksqmodule As String
|
||||
Private _ksqfeeder As String
|
||||
Private _ksqfeederType As String
|
||||
Private _ksqprepby As String
|
||||
Private _ksqupdtime As String
|
||||
Private _ksqcheckby As String
|
||||
Private _ksqchkdate As String
|
||||
Private _ksqremarks As String
|
||||
Private _ksqStatus As Integer
|
||||
Private _kseqno As String
|
||||
Private cnstr As String
|
||||
|
||||
#Region "Properties"
|
||||
|
||||
Public Property sequenceno() As String
|
||||
Get
|
||||
Return _kseqno
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_kseqno = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property account() As String
|
||||
Get
|
||||
Return _ksqaccount
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_ksqaccount = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property line() As String
|
||||
Get
|
||||
Return _ksqline
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_ksqline = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property model() As String
|
||||
Get
|
||||
Return _ksqmodel
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_ksqmodel = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property pcbside() As String
|
||||
Get
|
||||
Return _ksqpcbside
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_ksqpcbside = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property partno() As String
|
||||
Get
|
||||
Return _ksqpartno
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_ksqpartno = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property machine() As String
|
||||
Get
|
||||
Return _ksqmachine
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_ksqmachine = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property revision() As String
|
||||
Get
|
||||
Return _ksqrevision
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_ksqrevision = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property topsdloc() As String
|
||||
Get
|
||||
Return _ksqtopsdloc
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_ksqtopsdloc = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property fsbsqty() As String
|
||||
Get
|
||||
Return _ksqfsbsqty
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_ksqfsbsqty = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property desc1() As String
|
||||
Get
|
||||
Return _ksqdesc1
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_ksqdesc1 = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property desc2() As String
|
||||
Get
|
||||
Return _ksqdesc2
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_ksqdesc2 = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property topmark() As String
|
||||
Get
|
||||
Return _ksqtopmark
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_ksqtopmark = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property modules() As String
|
||||
Get
|
||||
Return _ksqmodule
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_ksqmodule = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property feeder() As String
|
||||
Get
|
||||
Return _ksqfeeder
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_ksqfeeder = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property feederType() As String
|
||||
Get
|
||||
Return _ksqfeederType
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_ksqfeederType = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property prepby() As String
|
||||
Get
|
||||
Return _ksqprepby
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_ksqprepby = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property updtime() As String
|
||||
Get
|
||||
Return _ksqupdtime
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_ksqupdtime = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property checkby() As String
|
||||
Get
|
||||
Return _ksqcheckby
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_ksqcheckby = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property chkdate() As String
|
||||
Get
|
||||
Return _ksqchkdate
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_ksqchkdate = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property remarks() As String
|
||||
Get
|
||||
Return _ksqremarks
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_ksqremarks = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property status() As Integer
|
||||
Get
|
||||
Return _ksqStatus
|
||||
End Get
|
||||
Set(ByVal value As Integer)
|
||||
_ksqStatus = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
#End Region
|
||||
|
||||
#Region "Methods"
|
||||
Public Sub New()
|
||||
cnstr = mainForm.cnstr
|
||||
End Sub
|
||||
|
||||
Public Function addHeader() As Boolean
|
||||
Dim conn As New SqlConnection(cnstr)
|
||||
|
||||
Dim myQuery As String
|
||||
myQuery = "INSERT INTO KSEQUENCE_HEADER " & _
|
||||
"VALUES(" & "'" & _ksqaccount & "'," & _
|
||||
"'" & _ksqrevision & "'," & _
|
||||
"'" & _ksqmachine & "'," & _
|
||||
"'" & _ksqpcbside & "'," & _
|
||||
"'" & _ksqprepby & "'," & _
|
||||
"'" & _ksqcheckby & "'," & _
|
||||
"'" & _ksqchkdate & "'," & _
|
||||
"'" & _ksqmodel & "'," & _
|
||||
"'" & DateTime.Now & "'," & _
|
||||
"0," & _
|
||||
"'" & _ksqline & "'," & _
|
||||
"'" & _kseqno & "')"
|
||||
|
||||
Dim mycommand As SqlCommand
|
||||
mycommand = New SqlCommand(myQuery, conn)
|
||||
|
||||
Try
|
||||
conn.Open()
|
||||
mycommand.ExecuteNonQuery()
|
||||
addHeader = True
|
||||
Catch ex As Exception
|
||||
MessageBox.Show(ex.Message, "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
|
||||
addHeader = False
|
||||
Exit Function
|
||||
Finally
|
||||
conn.Close()
|
||||
conn.Dispose()
|
||||
End Try
|
||||
End Function
|
||||
|
||||
Public Function addDetail() As Boolean
|
||||
Dim conn As New SqlConnection(cnstr)
|
||||
|
||||
Dim myQuery As String
|
||||
myQuery = "INSERT INTO KSEQUENCE_DETAIL " & _
|
||||
"VALUES('" & _ksqmodule & "'," & _
|
||||
"'" & _ksqfeeder & "'," & _
|
||||
"'" & _ksqfeederType & "'," & _
|
||||
"'" & _ksqpartno & "'," & _
|
||||
"'" & _ksqtopsdloc & "'," & _
|
||||
"'" & _ksqfsbsqty & "'," & _
|
||||
"'" & _ksqdesc1 & "'," & _
|
||||
"'" & _ksqdesc2 & "'," & _
|
||||
"'" & _ksqtopmark & "'," & _
|
||||
"'" & _ksqremarks & "'," & _
|
||||
"'" & _kseqno & "')"
|
||||
|
||||
Dim mycommand As SqlCommand
|
||||
mycommand = New SqlCommand(myQuery, conn)
|
||||
|
||||
Try
|
||||
conn.Open()
|
||||
mycommand.ExecuteNonQuery()
|
||||
addDetail = True
|
||||
Catch ex As Exception
|
||||
MessageBox.Show(ex.Message, "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
|
||||
addDetail = False
|
||||
Exit Function
|
||||
Finally
|
||||
conn.Close()
|
||||
conn.Dispose()
|
||||
End Try
|
||||
End Function
|
||||
|
||||
Public Function generateNo(ByVal code As String) As String
|
||||
Dim conn As New SqlConnection(cnstr)
|
||||
Dim last As String = String.Empty
|
||||
Dim myQuery As String
|
||||
myQuery = "SELECT TOP 1 KSEQUENCENO FROM KSEQUENCE_HEADER WHERE KSEQUENCENO LIKE '" & code & "%' ORDER BY KSEQUENCENO DESC"
|
||||
|
||||
Dim mycommand As SqlCommand
|
||||
mycommand = New SqlCommand(myQuery, conn)
|
||||
|
||||
Try
|
||||
conn.Open()
|
||||
Dim reader = mycommand.ExecuteReader()
|
||||
If reader.HasRows Then
|
||||
|
||||
reader.Read()
|
||||
|
||||
last = reader("KSEQUENCENO").ToString.Split("-")(1)
|
||||
Dim seq As Integer = Integer.Parse(last) + 1
|
||||
If seq.ToString.Length = 1 Then
|
||||
last = code & "-0000" & seq
|
||||
ElseIf seq.ToString.Length = 2 Then
|
||||
last = code & "-000" & seq
|
||||
ElseIf seq.ToString.Length = 3 Then
|
||||
last = code & "-00" & seq
|
||||
ElseIf seq.ToString.Length = 4 Then
|
||||
last = code & "-0" & seq
|
||||
Else
|
||||
last = code & "-" & seq
|
||||
End If
|
||||
|
||||
Else
|
||||
last = code & "-00001"
|
||||
End If
|
||||
|
||||
reader.Close()
|
||||
|
||||
Catch ex As Exception
|
||||
MessageBox.Show(ex.Message, "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
|
||||
Finally
|
||||
conn.Close()
|
||||
conn.Dispose()
|
||||
End Try
|
||||
|
||||
Return last
|
||||
End Function
|
||||
|
||||
Public Sub deleteHeader()
|
||||
Dim conn As New SqlConnection(cnstr)
|
||||
|
||||
Dim myQuery As String
|
||||
myQuery = "DELETE FROM KSEQUENCE_HEADER" & _
|
||||
" WHERE KSEQUENCENO = '" & Me.sequenceno & "'"
|
||||
|
||||
Dim mycommand As SqlCommand
|
||||
mycommand = New SqlCommand(myQuery, conn)
|
||||
|
||||
Try
|
||||
conn.Open()
|
||||
mycommand.ExecuteNonQuery()
|
||||
Catch ex As Exception
|
||||
MessageBox.Show(ex.Message, "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
|
||||
Exit Sub
|
||||
Finally
|
||||
conn.Close()
|
||||
conn.Dispose()
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
Public Sub deleteDetail()
|
||||
Dim conn As New SqlConnection(cnstr)
|
||||
|
||||
Dim myQuery As String
|
||||
myQuery = "DELETE FROM KSEQUENCE_DETAIL" & _
|
||||
" WHERE KSEQUENCENO = '" & Me.sequenceno & "'"
|
||||
|
||||
Dim mycommand As SqlCommand
|
||||
mycommand = New SqlCommand(myQuery, conn)
|
||||
|
||||
Try
|
||||
conn.Open()
|
||||
mycommand.ExecuteNonQuery()
|
||||
Catch ex As Exception
|
||||
MessageBox.Show(ex.Message, "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
|
||||
Exit Sub
|
||||
Finally
|
||||
conn.Close()
|
||||
conn.Dispose()
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
Public Function verify(ByVal partNo As String, ByVal sqModule As String, ByVal feeder As String) As Boolean
|
||||
Dim conn As New SqlConnection(cnstr)
|
||||
Dim status As Boolean = False
|
||||
|
||||
Dim myQuery As String
|
||||
myQuery = "SELECT * FROM KSEQUENCE_DETAIL" & _
|
||||
" WHERE KSEQUENCENO = '" & Me.sequenceno & "'" & _
|
||||
" AND KSQPARTNO = '" & partNo & "'" & _
|
||||
" AND KSQMODULE = '" & sqModule & "'" & _
|
||||
" AND KSQFEEDERNO = '" & feeder & "'"
|
||||
|
||||
|
||||
Dim mycommand As SqlCommand
|
||||
mycommand = New SqlCommand(myQuery, conn)
|
||||
|
||||
Try
|
||||
conn.Open()
|
||||
Dim reader As SqlDataReader = mycommand.ExecuteReader
|
||||
If reader.HasRows Then
|
||||
status = True
|
||||
End If
|
||||
Catch ex As Exception
|
||||
MessageBox.Show(ex.Message, "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
|
||||
Finally
|
||||
conn.Close()
|
||||
conn.Dispose()
|
||||
End Try
|
||||
Return status
|
||||
End Function
|
||||
|
||||
Public Function approve() As Boolean
|
||||
Dim conn As New SqlConnection(cnstr)
|
||||
Dim approved As Boolean = False
|
||||
|
||||
Dim myQuery As String
|
||||
myQuery = "UPDATE KSEQUENCE_HEADER SET KSQSTATUS = 1," & _
|
||||
"KSQCHECKBY = '" & Me.checkby & "'," & _
|
||||
"KSQCHKDATE = '" & Me.chkdate & "'" & _
|
||||
"WHERE KSEQUENCENO = '" & Me.sequenceno & "' "
|
||||
|
||||
Dim mycommand As SqlCommand
|
||||
mycommand = New SqlCommand(myQuery, conn)
|
||||
|
||||
Try
|
||||
conn.Open()
|
||||
mycommand.ExecuteNonQuery()
|
||||
approved = 1
|
||||
Catch ex As Exception
|
||||
MessageBox.Show(ex.Message, "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
|
||||
Finally
|
||||
conn.Close()
|
||||
conn.Dispose()
|
||||
End Try
|
||||
Return approved
|
||||
End Function
|
||||
|
||||
Public Function disApprove() As Boolean
|
||||
Dim conn As New SqlConnection(cnstr)
|
||||
Dim myQuery As String
|
||||
|
||||
myQuery = "UPDATE KSEQUENCE_HEADER SET KSQSTATUS = 0," & _
|
||||
"KSQCHECKBY = '" & Me.checkby & "'," & _
|
||||
"KSQCHKDATE = '" & Me.chkdate & "'" & _
|
||||
" WHERE KSACCOUNT = '" & Me.account & "'" & _
|
||||
" AND KSQREVISION = '" & Me.revision & "'"
|
||||
|
||||
Dim mycommand As SqlCommand
|
||||
mycommand = New SqlCommand(myQuery, conn)
|
||||
|
||||
Try
|
||||
conn.Open()
|
||||
mycommand.ExecuteNonQuery()
|
||||
disApprove = 1
|
||||
Catch ex As Exception
|
||||
MessageBox.Show(ex.Message, "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
|
||||
Finally
|
||||
conn.Close()
|
||||
conn.Dispose()
|
||||
End Try
|
||||
End Function
|
||||
|
||||
Public Function getValidSequence() As List(Of String)
|
||||
Dim sequenceList As New List(Of String)
|
||||
Dim conn As New SqlConnection(cnstr)
|
||||
|
||||
Dim myQuery As String
|
||||
myQuery = "SELECT DISTINCT KSACCOUNT FROM KSEQUENCE_HEADER" & _
|
||||
" WHERE KSQSTATUS = 1 " & _
|
||||
" ORDER BY KSACCOUNT"
|
||||
|
||||
Dim mycommand As SqlCommand
|
||||
mycommand = New SqlCommand(myQuery, conn)
|
||||
|
||||
Try
|
||||
conn.Open()
|
||||
Dim reader As SqlDataReader = mycommand.ExecuteReader()
|
||||
While reader.Read
|
||||
sequenceList.Add(reader("KSACCOUNT"))
|
||||
End While
|
||||
conn.Close()
|
||||
Catch ex As Exception
|
||||
MessageBox.Show(ex.Message, "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
|
||||
conn.Close()
|
||||
End Try
|
||||
Return sequenceList
|
||||
End Function
|
||||
|
||||
Public Function getAllSequence() As List(Of String)
|
||||
Dim sequenceList As New List(Of String)
|
||||
Dim conn As New SqlConnection(cnstr)
|
||||
|
||||
Dim myQuery As String
|
||||
myQuery = "SELECT DISTINCT KSACCOUNT FROM KSEQUENCE_HEADER"
|
||||
|
||||
Dim mycommand As SqlCommand
|
||||
mycommand = New SqlCommand(myQuery, conn)
|
||||
|
||||
Try
|
||||
conn.Open()
|
||||
Dim reader As SqlDataReader = mycommand.ExecuteReader()
|
||||
While reader.Read
|
||||
sequenceList.Add(reader("KSACCOUNT"))
|
||||
End While
|
||||
conn.Close()
|
||||
Catch ex As Exception
|
||||
MessageBox.Show(ex.Message, "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
|
||||
conn.Close()
|
||||
End Try
|
||||
Return sequenceList
|
||||
End Function
|
||||
|
||||
Public Function getRevisions() As List(Of String)
|
||||
Dim revList As New List(Of String)
|
||||
Dim conn As New SqlConnection(cnstr)
|
||||
|
||||
Dim myQuery As String
|
||||
myQuery = "SELECT DISTINCT KSQREVISION FROM KSEQUENCE_HEADER " & _
|
||||
"ORDER BY KSQREVISION"
|
||||
|
||||
Dim mycommand As SqlCommand
|
||||
mycommand = New SqlCommand(myQuery, conn)
|
||||
|
||||
Try
|
||||
conn.Open()
|
||||
Dim reader As SqlDataReader = mycommand.ExecuteReader()
|
||||
While reader.Read
|
||||
revList.Add(reader("KSQREVISION"))
|
||||
End While
|
||||
conn.Close()
|
||||
Catch ex As Exception
|
||||
MessageBox.Show(ex.Message, "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
|
||||
conn.Close()
|
||||
End Try
|
||||
Return revList
|
||||
End Function
|
||||
|
||||
Public Function getLines(ByVal sequence As String) As List(Of String)
|
||||
Dim revList As New List(Of String)
|
||||
Dim conn As New SqlConnection(cnstr)
|
||||
|
||||
Dim myQuery As String
|
||||
myQuery = "SELECT DISTINCT KSQLINE FROM KSEQUENCE_HEADER " & _
|
||||
"WHERE KSACCOUNT = '" & sequence & "' " & _
|
||||
"ORDER BY KSQLINE"
|
||||
|
||||
Dim mycommand As SqlCommand
|
||||
mycommand = New SqlCommand(myQuery, conn)
|
||||
|
||||
Try
|
||||
conn.Open()
|
||||
Dim reader As SqlDataReader = mycommand.ExecuteReader()
|
||||
While reader.Read
|
||||
revList.Add(reader("KSQLINE"))
|
||||
End While
|
||||
conn.Close()
|
||||
Catch ex As Exception
|
||||
MessageBox.Show(ex.Message, "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
|
||||
conn.Close()
|
||||
End Try
|
||||
Return revList
|
||||
End Function
|
||||
|
||||
Public Function getRevisions(ByVal sequence As String, ByVal line As String, ByVal model As String, ByVal type As String) As List(Of String)
|
||||
Dim revList As New List(Of String)
|
||||
Dim conn As New SqlConnection(cnstr)
|
||||
|
||||
Dim myQuery As String
|
||||
myQuery = "SELECT DISTINCT KSQREVISION FROM KSEQUENCE_HEADER " & _
|
||||
"WHERE KSACCOUNT = '" & sequence & "' " & _
|
||||
"AND KSQLINE = '" & line & "' " & _
|
||||
"AND KSQMODEL = '" & model & "' " & _
|
||||
"AND KSQPCBSIDE = '" & type & "' " & _
|
||||
"ORDER BY KSQREVISION"
|
||||
|
||||
Dim mycommand As SqlCommand
|
||||
mycommand = New SqlCommand(myQuery, conn)
|
||||
|
||||
Try
|
||||
conn.Open()
|
||||
Dim reader As SqlDataReader = mycommand.ExecuteReader()
|
||||
While reader.Read
|
||||
revList.Add(reader("KSQREVISION"))
|
||||
End While
|
||||
conn.Close()
|
||||
Catch ex As Exception
|
||||
MessageBox.Show(ex.Message, "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
|
||||
conn.Close()
|
||||
End Try
|
||||
Return revList
|
||||
End Function
|
||||
|
||||
|
||||
|
||||
Public Function getModel(ByVal sequence As String, ByVal line As String) As List(Of String)
|
||||
Dim revList As New List(Of String)
|
||||
Dim conn As New SqlConnection(cnstr)
|
||||
|
||||
Dim myQuery As String
|
||||
myQuery = "SELECT DISTINCT KSQMODEL FROM KSEQUENCE_HEADER " & _
|
||||
"WHERE KSACCOUNT = '" & sequence & "' " & _
|
||||
"AND KSQLINE = '" & line & "' " & _
|
||||
"ORDER BY KSQMODEL"
|
||||
|
||||
Dim mycommand As SqlCommand
|
||||
mycommand = New SqlCommand(myQuery, conn)
|
||||
|
||||
Try
|
||||
conn.Open()
|
||||
Dim reader As SqlDataReader = mycommand.ExecuteReader()
|
||||
While reader.Read
|
||||
revList.Add(reader("KSQMODEL"))
|
||||
End While
|
||||
conn.Close()
|
||||
Catch ex As Exception
|
||||
MessageBox.Show(ex.Message, "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
|
||||
conn.Close()
|
||||
End Try
|
||||
Return revList
|
||||
End Function
|
||||
|
||||
Public Function getTypes(ByVal sequence As String, ByVal line As String, ByVal model As String) As List(Of String)
|
||||
Dim revList As New List(Of String)
|
||||
Dim conn As New SqlConnection(cnstr)
|
||||
|
||||
Dim myQuery As String
|
||||
myQuery = "SELECT DISTINCT KSQPCBSIDE FROM KSEQUENCE_HEADER " & _
|
||||
"WHERE KSACCOUNT = '" & sequence & "' " & _
|
||||
"AND KSQLINE = '" & line & "' " & _
|
||||
"AND KSQMODEL = '" & model & "' " & _
|
||||
"ORDER BY KSQPCBSIDE"
|
||||
|
||||
Dim mycommand As SqlCommand
|
||||
mycommand = New SqlCommand(myQuery, conn)
|
||||
|
||||
Try
|
||||
conn.Open()
|
||||
Dim reader As SqlDataReader = mycommand.ExecuteReader()
|
||||
While reader.Read
|
||||
revList.Add(reader("KSQPCBSIDE"))
|
||||
End While
|
||||
conn.Close()
|
||||
Catch ex As Exception
|
||||
MessageBox.Show(ex.Message, "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
|
||||
conn.Close()
|
||||
End Try
|
||||
Return revList
|
||||
End Function
|
||||
|
||||
Public Function getMachine(ByVal sequence As String, ByVal line As String, ByVal rev As String, ByVal model As String) As List(Of String)
|
||||
Dim revList As New List(Of String)
|
||||
Dim conn As New SqlConnection(cnstr)
|
||||
|
||||
Dim myQuery As String
|
||||
myQuery = "SELECT DISTINCT KSQMACHINE FROM KSEQUENCE_HEADER " & _
|
||||
"WHERE KSACCOUNT = '" & sequence & "' AND KSQREVISION = '" & rev & "' AND KSQMODEL = '" & model & "' " & _
|
||||
"AND KSQLINE = '" & line & "' " & _
|
||||
"ORDER BY KSQMACHINE"
|
||||
|
||||
Dim mycommand As SqlCommand
|
||||
mycommand = New SqlCommand(myQuery, conn)
|
||||
|
||||
Try
|
||||
conn.Open()
|
||||
Dim reader As SqlDataReader = mycommand.ExecuteReader()
|
||||
While reader.Read
|
||||
revList.Add(reader("KSQMACHINE"))
|
||||
End While
|
||||
conn.Close()
|
||||
Catch ex As Exception
|
||||
MessageBox.Show(ex.Message, "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
|
||||
conn.Close()
|
||||
End Try
|
||||
Return revList
|
||||
End Function
|
||||
|
||||
Public Function isVerified(ByVal account As String, ByVal line As String, ByVal model As String, ByVal type As String, ByVal revision As String) As Boolean
|
||||
Dim conn As New SqlConnection(cnstr)
|
||||
|
||||
Dim myQuery As String
|
||||
myQuery = "SELECT KSQSTATUS FROM KSEQUENCE_HEADER " & _
|
||||
"WHERE KSACCOUNT = '" & account & "' " & _
|
||||
"AND KSQLINE = " & line & " " & _
|
||||
"AND KSQMODEL = '" & model & "' " & _
|
||||
"AND KSQPCBSIDE = '" & type & "' " & _
|
||||
"AND KSQREVISION = '" & revision & "' "
|
||||
|
||||
Dim mycommand As SqlCommand
|
||||
mycommand = New SqlCommand(myQuery, conn)
|
||||
|
||||
Try
|
||||
conn.Open()
|
||||
Dim reader As SqlDataReader = mycommand.ExecuteReader()
|
||||
reader.Read()
|
||||
If reader("KSQSTATUS") = 1 Then
|
||||
isVerified = True
|
||||
Else
|
||||
isVerified = False
|
||||
End If
|
||||
conn.Close()
|
||||
Catch ex As Exception
|
||||
MessageBox.Show(ex.Message, "Verification Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
|
||||
conn.Close()
|
||||
End Try
|
||||
End Function
|
||||
|
||||
Public Function getSequenceNo(ByVal account As String, ByVal line As String, ByVal model As String, ByVal type As String, ByVal revision As String) As String
|
||||
Dim conn As New SqlConnection(cnstr)
|
||||
Dim kseq As String
|
||||
Dim myQuery As String
|
||||
myQuery = "SELECT KSEQUENCENO FROM KSEQUENCE_HEADER " & _
|
||||
"WHERE KSACCOUNT = '" & account & "' " & _
|
||||
"AND KSQLINE = " & line & " " & _
|
||||
"AND KSQMODEL = '" & model & "' " & _
|
||||
"AND KSQPCBSIDE = '" & type & "' " & _
|
||||
"AND KSQREVISION = '" & revision & "' "
|
||||
|
||||
Dim mycommand As SqlCommand
|
||||
mycommand = New SqlCommand(myQuery, conn)
|
||||
|
||||
Try
|
||||
conn.Open()
|
||||
Dim reader As SqlDataReader = mycommand.ExecuteReader()
|
||||
If reader.HasRows Then
|
||||
reader.Read()
|
||||
kseq = reader("KSEQUENCENO")
|
||||
End If
|
||||
reader.Close()
|
||||
conn.Close()
|
||||
Catch ex As Exception
|
||||
MessageBox.Show(ex.Message, "Sequence No Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
|
||||
conn.Close()
|
||||
End Try
|
||||
|
||||
Return kseq
|
||||
End Function
|
||||
|
||||
|
||||
|
||||
Public Function verificationDetails(ByVal sequence As String, ByVal line As String, ByVal model As String, ByVal type As String, ByVal rev As String) As List(Of String)
|
||||
Dim verDetails As New List(Of String)
|
||||
Dim conn As New SqlConnection(cnstr)
|
||||
|
||||
Dim myQuery As String
|
||||
myQuery = "SELECT * FROM KSEQUENCE_HEADER " & _
|
||||
"WHERE KSACCOUNT = '" & sequence & "' " & _
|
||||
"AND KSQLINE = " & line & " " & _
|
||||
"AND KSQMODEL = '" & model & "' " & _
|
||||
"AND KSQPCBSIDE = '" & type & "' " & _
|
||||
"AND KSQREVISION = '" & rev & "' "
|
||||
|
||||
Dim mycommand As SqlCommand
|
||||
mycommand = New SqlCommand(myQuery, conn)
|
||||
|
||||
Try
|
||||
conn.Open()
|
||||
Dim reader As SqlDataReader = mycommand.ExecuteReader()
|
||||
While reader.Read
|
||||
verDetails.Add(reader("KSQCHECKBY"))
|
||||
verDetails.Add(reader("KSQCHKDATE"))
|
||||
End While
|
||||
conn.Close()
|
||||
Catch ex As Exception
|
||||
MessageBox.Show(ex.Message, "Verification Detail Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
|
||||
conn.Close()
|
||||
End Try
|
||||
Return verDetails
|
||||
End Function
|
||||
#End Region
|
||||
End Class
|
Binary file not shown.
@ -0,0 +1,18 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<asmv1:assembly xsi:schemaLocation="urn:schemas-microsoft-com:asm.v1 assembly.adaptive.xsd" manifestVersion="1.0" xmlns:asmv1="urn:schemas-microsoft-com:asm.v1" xmlns="urn:schemas-microsoft-com:asm.v2" xmlns:asmv2="urn:schemas-microsoft-com:asm.v2" xmlns:xrml="urn:mpeg:mpeg21:2003:01-REL-R-NS" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:asmv3="urn:schemas-microsoft-com:asm.v3" xmlns:dsig="http://www.w3.org/2000/09/xmldsig#" xmlns:co.v1="urn:schemas-microsoft-com:clickonce.v1" xmlns:co.v2="urn:schemas-microsoft-com:clickonce.v2">
|
||||
<assemblyIdentity name="Kanban System.application" version="1.0.0.23" publicKeyToken="5d07c66b26499fa2" language="neutral" processorArchitecture="msil" xmlns="urn:schemas-microsoft-com:asm.v1" />
|
||||
<description asmv2:publisher="Ionics EMS, Inc." asmv2:product="Kanban" xmlns="urn:schemas-microsoft-com:asm.v1" />
|
||||
<deployment install="true" mapFileExtensions="true" />
|
||||
<dependency>
|
||||
<dependentAssembly dependencyType="install" codebase="Application Files\Kanban System_1_0_0_23\Kanban System.exe.manifest" size="9657">
|
||||
<assemblyIdentity name="Kanban System.exe" version="1.0.0.23" publicKeyToken="5d07c66b26499fa2" language="neutral" processorArchitecture="msil" type="win32" />
|
||||
<hash>
|
||||
<dsig:Transforms>
|
||||
<dsig:Transform Algorithm="urn:schemas-microsoft-com:HashTransforms.Identity" />
|
||||
</dsig:Transforms>
|
||||
<dsig:DigestMethod Algorithm="http://www.w3.org/2000/09/xmldsig#sha1" />
|
||||
<dsig:DigestValue>loYK8JiDZTKvWqwQHxIp3n+zSfI=</dsig:DigestValue>
|
||||
</hash>
|
||||
</dependentAssembly>
|
||||
</dependency>
|
||||
<publisherIdentity name="CN=IONICS\franz.delomen" issuerKeyHash="bbd06e099f0d6067eaa95fc0a29d173cdf7ef6c7" /><Signature Id="StrongNameSignature" xmlns="http://www.w3.org/2000/09/xmldsig#"><SignedInfo><CanonicalizationMethod Algorithm="http://www.w3.org/2001/10/xml-exc-c14n#" /><SignatureMethod Algorithm="http://www.w3.org/2000/09/xmldsig#rsa-sha1" /><Reference URI=""><Transforms><Transform Algorithm="http://www.w3.org/2000/09/xmldsig#enveloped-signature" /><Transform Algorithm="http://www.w3.org/2001/10/xml-exc-c14n#" /></Transforms><DigestMethod Algorithm="http://www.w3.org/2000/09/xmldsig#sha1" /><DigestValue>YHyM5wAZ3UTZq+XRcGvvXizqCWs=</DigestValue></Reference></SignedInfo><SignatureValue>fVahEQTaGjwsVNFlj39uEUvc2TwF7QAmMRxgPH+zXqkzME5Lt/2E5ObqMdv1+/y9EtYB6jHvQKwidtU4dp6DKhF1e/EObGK89Cw5spgIXvkCVY4SmwCVuk8E797otRD7QrQIbwg7IgoJG8vs9B29FFDNIWTtNRoIcsWSwy0+wrI=</SignatureValue><KeyInfo Id="StrongNameKeyInfo"><KeyValue><RSAKeyValue><Modulus>zzlNnkONlM4M+vRtennY42p0oPQdXOQ8T6g9AITLp3Xk/SVC5a/dxEkh2L6MFGbQGsl8qBMl+5MV2v9Pn4zHo+mnBe0KeuaiBZKrhgf+/YfLQidAuq7MIwzMnLqlb0pvqUKq1dtpDGjpjM9PsLyo5t3gvLl0pI8EFU4u0eMLGYs=</Modulus><Exponent>AQAB</Exponent></RSAKeyValue></KeyValue><msrel:RelData xmlns:msrel="http://schemas.microsoft.com/windows/rel/2005/reldata"><r:license xmlns:r="urn:mpeg:mpeg21:2003:01-REL-R-NS" xmlns:as="http://schemas.microsoft.com/windows/pki/2005/Authenticode"><r:grant><as:ManifestInformation Hash="6b09ea2c5eef6b70d1e5abd944dd1900e78c7c60" Description="" Url=""><as:assemblyIdentity name="Kanban System.application" version="1.0.0.23" publicKeyToken="5d07c66b26499fa2" language="neutral" processorArchitecture="msil" xmlns="urn:schemas-microsoft-com:asm.v1" /></as:ManifestInformation><as:SignedBy /><as:AuthenticodePublisher><as:X509SubjectName>CN=IONICS\franz.delomen</as:X509SubjectName></as:AuthenticodePublisher></r:grant><r:issuer><Signature Id="AuthenticodeSignature" xmlns="http://www.w3.org/2000/09/xmldsig#"><SignedInfo><CanonicalizationMethod Algorithm="http://www.w3.org/2001/10/xml-exc-c14n#" /><SignatureMethod Algorithm="http://www.w3.org/2000/09/xmldsig#rsa-sha1" /><Reference URI=""><Transforms><Transform Algorithm="http://www.w3.org/2000/09/xmldsig#enveloped-signature" /><Transform Algorithm="http://www.w3.org/2001/10/xml-exc-c14n#" /></Transforms><DigestMethod Algorithm="http://www.w3.org/2000/09/xmldsig#sha1" /><DigestValue>JzNXpk3wM6AhJELyaMfExN1j3ko=</DigestValue></Reference></SignedInfo><SignatureValue>bdLQ/avnfLgyFTel2msD87qPBvaV5VVl/zqoMZmHKyUruu+UJA4R7liX5ErMAeX5ScQNsrdzHBw2UxAl2bm/pNhMEPaYtLxQvAQnacy6JUlBCo0E7ZkvqFGOyutHu/iQiSffa6cOo8fMsR0w/T6TPNut0YJVp3/5RiM4luOlKJ0=</SignatureValue><KeyInfo><KeyValue><RSAKeyValue><Modulus>zzlNnkONlM4M+vRtennY42p0oPQdXOQ8T6g9AITLp3Xk/SVC5a/dxEkh2L6MFGbQGsl8qBMl+5MV2v9Pn4zHo+mnBe0KeuaiBZKrhgf+/YfLQidAuq7MIwzMnLqlb0pvqUKq1dtpDGjpjM9PsLyo5t3gvLl0pI8EFU4u0eMLGYs=</Modulus><Exponent>AQAB</Exponent></RSAKeyValue></KeyValue><X509Data><X509Certificate>MIIB6TCCAVKgAwIBAgIQGB+RTAzS47VNDBz+bQd1AjANBgkqhkiG9w0BAQUFADAzMTEwLwYDVQQDHigASQBPAE4ASQBDAFMAXABmAHIAYQBuAHoALgBkAGUAbABvAG0AZQBuMB4XDTE1MDQyMzAzMTMwNloXDTE2MDQyMjA5MTMwNlowMzExMC8GA1UEAx4oAEkATwBOAEkAQwBTAFwAZgByAGEAbgB6AC4AZABlAGwAbwBtAGUAbjCBnzANBgkqhkiG9w0BAQEFAAOBjQAwgYkCgYEAzzlNnkONlM4M+vRtennY42p0oPQdXOQ8T6g9AITLp3Xk/SVC5a/dxEkh2L6MFGbQGsl8qBMl+5MV2v9Pn4zHo+mnBe0KeuaiBZKrhgf+/YfLQidAuq7MIwzMnLqlb0pvqUKq1dtpDGjpjM9PsLyo5t3gvLl0pI8EFU4u0eMLGYsCAwEAATANBgkqhkiG9w0BAQUFAAOBgQAPhufllRWQgSEM7L7BgV66S9sXXLE1AbOEk3J9uz5/vLAjAxD81JKy+2XJjAWlW6VmEQGI5nNxiMV+hEdZnzdboG9MZdhP5OrdOiPFhS8zsnccKagMcZHarAEAC7vDaD4H79+gfU4saX6q3CozhSho3zOLXCxFnR8SKcbBtO06pQ==</X509Certificate></X509Data></KeyInfo></Signature></r:issuer></r:license></msrel:RelData></KeyInfo></Signature></asmv1:assembly>
|
@ -0,0 +1,63 @@
|
||||
'------------------------------------------------------------------------------
|
||||
' <auto-generated>
|
||||
' This code was generated by a tool.
|
||||
' Runtime Version:4.0.30319.1
|
||||
'
|
||||
' Changes to this file may cause incorrect behavior and will be lost if
|
||||
' the code is regenerated.
|
||||
' </auto-generated>
|
||||
'------------------------------------------------------------------------------
|
||||
|
||||
Option Strict On
|
||||
Option Explicit On
|
||||
|
||||
Imports System
|
||||
|
||||
Namespace My.Resources
|
||||
|
||||
'This class was auto-generated by the StronglyTypedResourceBuilder
|
||||
'class via a tool like ResGen or Visual Studio.
|
||||
'To add or remove a member, edit your .ResX file then rerun ResGen
|
||||
'with the /str option, or rebuild your VS project.
|
||||
'''<summary>
|
||||
''' A strongly-typed resource class, for looking up localized strings, etc.
|
||||
'''</summary>
|
||||
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Resources.Tools.StronglyTypedResourceBuilder", "4.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>
|
||||
''' Returns the cached ResourceManager instance used by this class.
|
||||
'''</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("Mounting_Sequence.Resources", GetType(Resources).Assembly)
|
||||
resourceMan = temp
|
||||
End If
|
||||
Return resourceMan
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Overrides the current thread's CurrentUICulture property for all
|
||||
''' resource lookups using this strongly typed resource class.
|
||||
'''</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
|
@ -0,0 +1,84 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<asmv1:assembly xsi:schemaLocation="urn:schemas-microsoft-com:asm.v1 assembly.adaptive.xsd" manifestVersion="1.0" xmlns:asmv1="urn:schemas-microsoft-com:asm.v1" xmlns="urn:schemas-microsoft-com:asm.v2" xmlns:asmv2="urn:schemas-microsoft-com:asm.v2" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:co.v1="urn:schemas-microsoft-com:clickonce.v1" xmlns:asmv3="urn:schemas-microsoft-com:asm.v3" xmlns:dsig="http://www.w3.org/2000/09/xmldsig#" xmlns:co.v2="urn:schemas-microsoft-com:clickonce.v2">
|
||||
<asmv1:assemblyIdentity name="Kanban System.exe" version="1.0.0.17" publicKeyToken="0000000000000000" language="neutral" processorArchitecture="msil" type="win32" />
|
||||
<application />
|
||||
<entryPoint>
|
||||
<assemblyIdentity name="Kanban System" version="1.0.0.0" language="neutral" processorArchitecture="msil" />
|
||||
<commandLine file="Kanban System.exe" parameters="" />
|
||||
</entryPoint>
|
||||
<trustInfo>
|
||||
<security>
|
||||
<applicationRequestMinimum>
|
||||
<PermissionSet Unrestricted="true" ID="Custom" SameSite="site" />
|
||||
<defaultAssemblyRequest permissionSetReference="Custom" />
|
||||
</applicationRequestMinimum>
|
||||
<requestedPrivileges xmlns="urn:schemas-microsoft-com:asm.v3">
|
||||
<!-- UAC Manifest Options
|
||||
If you want to change the Windows User Account Control level replace the
|
||||
requestedExecutionLevel node with one of the following.
|
||||
|
||||
<requestedExecutionLevel level="asInvoker" uiAccess="false" />
|
||||
<requestedExecutionLevel level="requireAdministrator" uiAccess="false" />
|
||||
<requestedExecutionLevel level="highestAvailable" uiAccess="false" />
|
||||
|
||||
Specifying requestedExecutionLevel node will disable file and registry virtualization.
|
||||
If you want to utilize File and Registry Virtualization for backward
|
||||
compatibility then delete the requestedExecutionLevel node.
|
||||
-->
|
||||
<requestedExecutionLevel level="asInvoker" uiAccess="false" />
|
||||
</requestedPrivileges>
|
||||
</security>
|
||||
</trustInfo>
|
||||
<dependency>
|
||||
<dependentOS>
|
||||
<osVersionInfo>
|
||||
<os majorVersion="4" minorVersion="10" buildNumber="0" servicePackMajor="0" />
|
||||
</osVersionInfo>
|
||||
</dependentOS>
|
||||
</dependency>
|
||||
<dependency>
|
||||
<dependentAssembly dependencyType="preRequisite" allowDelayedBinding="true">
|
||||
<assemblyIdentity name="Microsoft.Windows.CommonLanguageRuntime" version="2.0.50727.0" />
|
||||
</dependentAssembly>
|
||||
</dependency>
|
||||
<dependency>
|
||||
<dependentAssembly dependencyType="install" allowDelayedBinding="true" codebase="Interop.Microsoft.Office.Interop.Excel.dll" size="1544192">
|
||||
<assemblyIdentity name="Interop.Microsoft.Office.Interop.Excel" version="1.7.0.0" language="neutral" processorArchitecture="msil" />
|
||||
<hash>
|
||||
<dsig:Transforms>
|
||||
<dsig:Transform Algorithm="urn:schemas-microsoft-com:HashTransforms.Identity" />
|
||||
</dsig:Transforms>
|
||||
<dsig:DigestMethod Algorithm="http://www.w3.org/2000/09/xmldsig#sha1" />
|
||||
<dsig:DigestValue>7YA85eufIXItcsMaDGw0Skomhfw=</dsig:DigestValue>
|
||||
</hash>
|
||||
</dependentAssembly>
|
||||
</dependency>
|
||||
<dependency>
|
||||
<dependentAssembly dependencyType="install" allowDelayedBinding="true" codebase="Kanban System.exe" size="684544">
|
||||
<assemblyIdentity name="Kanban System" version="1.0.0.0" language="neutral" processorArchitecture="msil" />
|
||||
<hash>
|
||||
<dsig:Transforms>
|
||||
<dsig:Transform Algorithm="urn:schemas-microsoft-com:HashTransforms.Identity" />
|
||||
</dsig:Transforms>
|
||||
<dsig:DigestMethod Algorithm="http://www.w3.org/2000/09/xmldsig#sha1" />
|
||||
<dsig:DigestValue>jxzqSBsbF9ccaTGd3z5zmmFgKpw=</dsig:DigestValue>
|
||||
</hash>
|
||||
</dependentAssembly>
|
||||
</dependency>
|
||||
<file name="Kanban System.exe.config" size="2658">
|
||||
<hash>
|
||||
<dsig:Transforms>
|
||||
<dsig:Transform Algorithm="urn:schemas-microsoft-com:HashTransforms.Identity" />
|
||||
</dsig:Transforms>
|
||||
<dsig:DigestMethod Algorithm="http://www.w3.org/2000/09/xmldsig#sha1" />
|
||||
<dsig:DigestValue>37bBcQj6rBG7Vse3ksdaTU0o0RQ=</dsig:DigestValue>
|
||||
</hash>
|
||||
</file>
|
||||
<compatibility xmlns="urn:schemas-microsoft-com:compatibility.v1">
|
||||
<application>
|
||||
<!-- A list of all Windows versions that this application is designed to work with. Windows will automatically select the most compatible environment.-->
|
||||
<!-- If your application is designed to work with Windows 7, uncomment the following supportedOS node-->
|
||||
<!--<supportedOS Id="{35138b9a-5d96-4fbd-8e2d-a2440225f93a}"/>-->
|
||||
</application>
|
||||
</compatibility>
|
||||
</asmv1:assembly>
|
@ -0,0 +1,62 @@
|
||||
'------------------------------------------------------------------------------
|
||||
' <auto-generated>
|
||||
' This code was generated by a tool.
|
||||
' Runtime Version:2.0.50727.1433
|
||||
'
|
||||
' Changes to this file may cause incorrect behavior and will be lost if
|
||||
' the code is regenerated.
|
||||
' </auto-generated>
|
||||
'------------------------------------------------------------------------------
|
||||
|
||||
Option Strict On
|
||||
Option Explicit On
|
||||
|
||||
|
||||
Namespace My.Resources
|
||||
|
||||
'This class was auto-generated by the StronglyTypedResourceBuilder
|
||||
'class via a tool like ResGen or Visual Studio.
|
||||
'To add or remove a member, edit your .ResX file then rerun ResGen
|
||||
'with the /str option, or rebuild your VS project.
|
||||
'<summary>
|
||||
' A strongly-typed resource class, for looking up localized strings, etc.
|
||||
'</summary>
|
||||
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Resources.Tools.StronglyTypedResourceBuilder", "2.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>
|
||||
' Returns the cached ResourceManager instance used by this class.
|
||||
'</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("Mounting_Sequence.Resources", GetType(Resources).Assembly)
|
||||
resourceMan = temp
|
||||
End If
|
||||
Return resourceMan
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'<summary>
|
||||
' Overrides the current thread's CurrentUICulture property for all
|
||||
' resource lookups using this strongly typed resource class.
|
||||
'</summary>
|
||||
<Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
|
||||
Friend Property Culture() As Global.System.Globalization.CultureInfo
|
||||
Get
|
||||
Return resourceCulture
|
||||
End Get
|
||||
Set(ByVal value As Global.System.Globalization.CultureInfo)
|
||||
resourceCulture = value
|
||||
End Set
|
||||
End Property
|
||||
End Module
|
||||
End Namespace
|
Binary file not shown.
Binary file not shown.
1832
.svn/pristine/76/761a4e7738e1bcf7152e035233c95e4c8c26cd1f.svn-base
Normal file
1832
.svn/pristine/76/761a4e7738e1bcf7152e035233c95e4c8c26cd1f.svn-base
Normal file
File diff suppressed because it is too large
Load Diff
Binary file not shown.
Binary file not shown.
@ -0,0 +1,225 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<Project ToolsVersion="3.5" DefaultTargets="Build" xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
|
||||
<PropertyGroup>
|
||||
<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
|
||||
<Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
|
||||
<ProductVersion>9.0.21022</ProductVersion>
|
||||
<SchemaVersion>2.0</SchemaVersion>
|
||||
<ProjectGuid>{8C79F105-3456-4E41-8510-5B53B1CBE2DA}</ProjectGuid>
|
||||
<OutputType>WinExe</OutputType>
|
||||
<StartupObject>Mounting_Sequence.My.MyApplication</StartupObject>
|
||||
<RootNamespace>Mounting_Sequence</RootNamespace>
|
||||
<AssemblyName>Mounting Sequence</AssemblyName>
|
||||
<FileAlignment>512</FileAlignment>
|
||||
<MyType>WindowsForms</MyType>
|
||||
<TargetFrameworkVersion>v2.0</TargetFrameworkVersion>
|
||||
<OptionExplicit>On</OptionExplicit>
|
||||
<OptionCompare>Binary</OptionCompare>
|
||||
<OptionStrict>Off</OptionStrict>
|
||||
<OptionInfer>On</OptionInfer>
|
||||
<IsWebBootstrapper>false</IsWebBootstrapper>
|
||||
<ManifestCertificateThumbprint>82BD341806AC4498AAC406AC5C1B71E1C5845339</ManifestCertificateThumbprint>
|
||||
<ManifestKeyFile>Mounting Sequence_TemporaryKey.pfx</ManifestKeyFile>
|
||||
<GenerateManifests>true</GenerateManifests>
|
||||
<SignManifests>true</SignManifests>
|
||||
<PublishUrl>C:\Projects\Mounting Sequence\Mounting Sequence\Installer\</PublishUrl>
|
||||
<Install>true</Install>
|
||||
<InstallFrom>Disk</InstallFrom>
|
||||
<UpdateEnabled>false</UpdateEnabled>
|
||||
<UpdateMode>Foreground</UpdateMode>
|
||||
<UpdateInterval>7</UpdateInterval>
|
||||
<UpdateIntervalUnits>Days</UpdateIntervalUnits>
|
||||
<UpdatePeriodically>false</UpdatePeriodically>
|
||||
<UpdateRequired>false</UpdateRequired>
|
||||
<MapFileExtensions>true</MapFileExtensions>
|
||||
<ApplicationRevision>2</ApplicationRevision>
|
||||
<ApplicationVersion>1.0.0.%2a</ApplicationVersion>
|
||||
<UseApplicationTrust>false</UseApplicationTrust>
|
||||
<BootstrapperEnabled>true</BootstrapperEnabled>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
|
||||
<DebugSymbols>true</DebugSymbols>
|
||||
<DebugType>full</DebugType>
|
||||
<DefineDebug>true</DefineDebug>
|
||||
<DefineTrace>true</DefineTrace>
|
||||
<OutputPath>bin\Debug\</OutputPath>
|
||||
<DocumentationFile>Mounting Sequence.xml</DocumentationFile>
|
||||
<NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022</NoWarn>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
|
||||
<DebugType>pdbonly</DebugType>
|
||||
<DefineDebug>false</DefineDebug>
|
||||
<DefineTrace>true</DefineTrace>
|
||||
<Optimize>true</Optimize>
|
||||
<OutputPath>bin\Release\</OutputPath>
|
||||
<DocumentationFile>Mounting Sequence.xml</DocumentationFile>
|
||||
<NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022</NoWarn>
|
||||
</PropertyGroup>
|
||||
<ItemGroup>
|
||||
<Reference Include="System" />
|
||||
<Reference Include="System.Data" />
|
||||
<Reference Include="System.Deployment" />
|
||||
<Reference Include="System.Drawing" />
|
||||
<Reference Include="System.Windows.Forms" />
|
||||
<Reference Include="System.Xml" />
|
||||
</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" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<Compile Include="Classes\Connection.vb" />
|
||||
<Compile Include="Classes\Machine.vb" />
|
||||
<Compile Include="Classes\Mounting.vb" />
|
||||
<Compile Include="Classes\Sequence.vb" />
|
||||
<Compile Include="Classes\User.vb" />
|
||||
<Compile Include="Forms\machineForm.designer.vb">
|
||||
<DependentUpon>machineForm.vb</DependentUpon>
|
||||
</Compile>
|
||||
<Compile Include="Forms\machineForm.vb">
|
||||
<SubType>Form</SubType>
|
||||
</Compile>
|
||||
<Compile Include="Forms\loginForm.designer.vb">
|
||||
<DependentUpon>loginForm.vb</DependentUpon>
|
||||
</Compile>
|
||||
<Compile Include="Forms\loginForm.vb">
|
||||
<SubType>Form</SubType>
|
||||
</Compile>
|
||||
<Compile Include="Forms\mainForm.vb">
|
||||
<SubType>Form</SubType>
|
||||
</Compile>
|
||||
<Compile Include="Forms\mainForm.Designer.vb">
|
||||
<DependentUpon>mainForm.vb</DependentUpon>
|
||||
<SubType>Form</SubType>
|
||||
</Compile>
|
||||
<Compile Include="Forms\mcSeqForm.Designer.vb">
|
||||
<DependentUpon>mcSeqForm.vb</DependentUpon>
|
||||
</Compile>
|
||||
<Compile Include="Forms\mcSeqForm.vb">
|
||||
<SubType>Form</SubType>
|
||||
</Compile>
|
||||
<Compile Include="Forms\mountingForm.Designer.vb">
|
||||
<DependentUpon>mountingForm.vb</DependentUpon>
|
||||
</Compile>
|
||||
<Compile Include="Forms\mountingForm.vb">
|
||||
<SubType>Form</SubType>
|
||||
</Compile>
|
||||
<Compile Include="Forms\requestForm.Designer.vb">
|
||||
<DependentUpon>requestForm.vb</DependentUpon>
|
||||
</Compile>
|
||||
<Compile Include="Forms\requestForm.vb">
|
||||
<SubType>Form</SubType>
|
||||
</Compile>
|
||||
<Compile Include="Forms\uploadMcSeq.designer.vb">
|
||||
<DependentUpon>uploadMcSeq.vb</DependentUpon>
|
||||
</Compile>
|
||||
<Compile Include="Forms\uploadMcSeq.vb">
|
||||
<SubType>Form</SubType>
|
||||
</Compile>
|
||||
<Compile Include="Forms\userForm.designer.vb">
|
||||
<DependentUpon>userForm.vb</DependentUpon>
|
||||
</Compile>
|
||||
<Compile Include="Forms\userForm.vb">
|
||||
<SubType>Form</SubType>
|
||||
</Compile>
|
||||
<Compile Include="My Project\AssemblyInfo.vb" />
|
||||
<Compile Include="My Project\Application.Designer.vb">
|
||||
<AutoGen>True</AutoGen>
|
||||
<DependentUpon>Application.myapp</DependentUpon>
|
||||
</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="Forms\machineForm.resx">
|
||||
<DependentUpon>machineForm.vb</DependentUpon>
|
||||
<SubType>Designer</SubType>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="Forms\loginForm.resx">
|
||||
<DependentUpon>loginForm.vb</DependentUpon>
|
||||
<SubType>Designer</SubType>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="Forms\mainForm.resx">
|
||||
<DependentUpon>mainForm.vb</DependentUpon>
|
||||
<SubType>Designer</SubType>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="Forms\mcSeqForm.resx">
|
||||
<DependentUpon>mcSeqForm.vb</DependentUpon>
|
||||
<SubType>Designer</SubType>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="Forms\mountingForm.resx">
|
||||
<DependentUpon>mountingForm.vb</DependentUpon>
|
||||
<SubType>Designer</SubType>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="Forms\requestForm.resx">
|
||||
<DependentUpon>requestForm.vb</DependentUpon>
|
||||
<SubType>Designer</SubType>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="Forms\uploadMcSeq.resx">
|
||||
<DependentUpon>uploadMcSeq.vb</DependentUpon>
|
||||
<SubType>Designer</SubType>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="Forms\userForm.resx">
|
||||
<DependentUpon>userForm.vb</DependentUpon>
|
||||
<SubType>Designer</SubType>
|
||||
</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="app.config" />
|
||||
<None Include="Mounting Sequence_TemporaryKey.pfx" />
|
||||
<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>
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<BootstrapperPackage Include="Microsoft.Net.Framework.2.0">
|
||||
<Visible>False</Visible>
|
||||
<ProductName>.NET Framework 2.0 %28x86%29</ProductName>
|
||||
<Install>true</Install>
|
||||
</BootstrapperPackage>
|
||||
<BootstrapperPackage Include="Microsoft.Net.Framework.3.0">
|
||||
<Visible>False</Visible>
|
||||
<ProductName>.NET Framework 3.0 %28x86%29</ProductName>
|
||||
<Install>false</Install>
|
||||
</BootstrapperPackage>
|
||||
<BootstrapperPackage Include="Microsoft.Net.Framework.3.5">
|
||||
<Visible>False</Visible>
|
||||
<ProductName>.NET Framework 3.5</ProductName>
|
||||
<Install>false</Install>
|
||||
</BootstrapperPackage>
|
||||
</ItemGroup>
|
||||
<Import Project="$(MSBuildToolsPath)\Microsoft.VisualBasic.targets" />
|
||||
<!-- To modify your build process, add your task inside one of the targets below and uncomment it.
|
||||
Other similar extension points exist, see Microsoft.Common.targets.
|
||||
<Target Name="BeforeBuild">
|
||||
</Target>
|
||||
<Target Name="AfterBuild">
|
||||
</Target>
|
||||
-->
|
||||
</Project>
|
Binary file not shown.
Binary file not shown.
@ -0,0 +1,359 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
||||
Partial Class mountingForm
|
||||
Inherits System.Windows.Forms.Form
|
||||
|
||||
'Form overrides dispose to clean up the component list.
|
||||
<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
|
||||
|
||||
'Required by the Windows Form Designer
|
||||
Private components As System.ComponentModel.IContainer
|
||||
|
||||
'NOTE: The following procedure is required by the Windows Form Designer
|
||||
'It can be modified using the Windows Form Designer.
|
||||
'Do not modify it using the code editor.
|
||||
<System.Diagnostics.DebuggerStepThrough()> _
|
||||
Private Sub InitializeComponent()
|
||||
Me.components = New System.ComponentModel.Container
|
||||
Me.GroupBox1 = New System.Windows.Forms.GroupBox
|
||||
Me.btn_reload = New System.Windows.Forms.Button
|
||||
Me.cmbRev = New System.Windows.Forms.ComboBox
|
||||
Me.Label2 = New System.Windows.Forms.Label
|
||||
Me.btn_setSequence = New System.Windows.Forms.Button
|
||||
Me.Label1 = New System.Windows.Forms.Label
|
||||
Me.cmbSeq = New System.Windows.Forms.ComboBox
|
||||
Me.txtStart = New System.Windows.Forms.TextBox
|
||||
Me.GroupBox2 = New System.Windows.Forms.GroupBox
|
||||
Me.GroupBox3 = New System.Windows.Forms.GroupBox
|
||||
Me.lbl_fail = New System.Windows.Forms.Label
|
||||
Me.lbl_Pass = New System.Windows.Forms.Label
|
||||
Me.txtLotNum = New System.Windows.Forms.TextBox
|
||||
Me.Label8 = New System.Windows.Forms.Label
|
||||
Me.txtQuantity = New System.Windows.Forms.TextBox
|
||||
Me.Label7 = New System.Windows.Forms.Label
|
||||
Me.txtPartDesc = New System.Windows.Forms.TextBox
|
||||
Me.Label6 = New System.Windows.Forms.Label
|
||||
Me.txtOperator = New System.Windows.Forms.TextBox
|
||||
Me.Label5 = New System.Windows.Forms.Label
|
||||
Me.txtFeeder = New System.Windows.Forms.TextBox
|
||||
Me.txtPartNo = New System.Windows.Forms.TextBox
|
||||
Me.Label4 = New System.Windows.Forms.Label
|
||||
Me.Label3 = New System.Windows.Forms.Label
|
||||
Me.Timer1 = New System.Windows.Forms.Timer(Me.components)
|
||||
Me.GroupBox1.SuspendLayout()
|
||||
Me.GroupBox2.SuspendLayout()
|
||||
Me.GroupBox3.SuspendLayout()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'GroupBox1
|
||||
'
|
||||
Me.GroupBox1.Controls.Add(Me.btn_reload)
|
||||
Me.GroupBox1.Controls.Add(Me.cmbRev)
|
||||
Me.GroupBox1.Controls.Add(Me.Label2)
|
||||
Me.GroupBox1.Controls.Add(Me.btn_setSequence)
|
||||
Me.GroupBox1.Controls.Add(Me.Label1)
|
||||
Me.GroupBox1.Controls.Add(Me.cmbSeq)
|
||||
Me.GroupBox1.Controls.Add(Me.txtStart)
|
||||
Me.GroupBox1.Font = New System.Drawing.Font("Microsoft Sans Serif", 15.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.GroupBox1.Location = New System.Drawing.Point(6, 3)
|
||||
Me.GroupBox1.Name = "GroupBox1"
|
||||
Me.GroupBox1.Size = New System.Drawing.Size(957, 129)
|
||||
Me.GroupBox1.TabIndex = 0
|
||||
Me.GroupBox1.TabStop = False
|
||||
Me.GroupBox1.Text = "Mounting Sequence"
|
||||
'
|
||||
'btn_reload
|
||||
'
|
||||
Me.btn_reload.Location = New System.Drawing.Point(602, 68)
|
||||
Me.btn_reload.Name = "btn_reload"
|
||||
Me.btn_reload.Size = New System.Drawing.Size(228, 55)
|
||||
Me.btn_reload.TabIndex = 18
|
||||
Me.btn_reload.Text = "Set Reload Mode"
|
||||
Me.btn_reload.UseVisualStyleBackColor = True
|
||||
'
|
||||
'cmbRev
|
||||
'
|
||||
Me.cmbRev.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
|
||||
Me.cmbRev.Font = New System.Drawing.Font("Microsoft Sans Serif", 15.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.cmbRev.FormattingEnabled = True
|
||||
Me.cmbRev.Location = New System.Drawing.Point(212, 72)
|
||||
Me.cmbRev.Name = "cmbRev"
|
||||
Me.cmbRev.Size = New System.Drawing.Size(260, 33)
|
||||
Me.cmbRev.TabIndex = 17
|
||||
'
|
||||
'Label2
|
||||
'
|
||||
Me.Label2.AutoSize = True
|
||||
Me.Label2.Font = New System.Drawing.Font("Microsoft Sans Serif", 15.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label2.Location = New System.Drawing.Point(105, 76)
|
||||
Me.Label2.Name = "Label2"
|
||||
Me.Label2.Size = New System.Drawing.Size(101, 25)
|
||||
Me.Label2.TabIndex = 16
|
||||
Me.Label2.Text = "Revision:"
|
||||
'
|
||||
'btn_setSequence
|
||||
'
|
||||
Me.btn_setSequence.Location = New System.Drawing.Point(602, 33)
|
||||
Me.btn_setSequence.Name = "btn_setSequence"
|
||||
Me.btn_setSequence.Size = New System.Drawing.Size(228, 33)
|
||||
Me.btn_setSequence.TabIndex = 4
|
||||
Me.btn_setSequence.Text = "Set Sequence"
|
||||
Me.btn_setSequence.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Label1
|
||||
'
|
||||
Me.Label1.AutoSize = True
|
||||
Me.Label1.Font = New System.Drawing.Font("Microsoft Sans Serif", 15.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label1.Location = New System.Drawing.Point(10, 38)
|
||||
Me.Label1.Name = "Label1"
|
||||
Me.Label1.Size = New System.Drawing.Size(196, 25)
|
||||
Me.Label1.TabIndex = 0
|
||||
Me.Label1.Text = "Sequence Number:"
|
||||
'
|
||||
'cmbSeq
|
||||
'
|
||||
Me.cmbSeq.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
|
||||
Me.cmbSeq.Font = New System.Drawing.Font("Microsoft Sans Serif", 15.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.cmbSeq.FormattingEnabled = True
|
||||
Me.cmbSeq.Location = New System.Drawing.Point(212, 33)
|
||||
Me.cmbSeq.Name = "cmbSeq"
|
||||
Me.cmbSeq.Size = New System.Drawing.Size(384, 33)
|
||||
Me.cmbSeq.TabIndex = 2
|
||||
'
|
||||
'txtStart
|
||||
'
|
||||
Me.txtStart.Location = New System.Drawing.Point(213, 34)
|
||||
Me.txtStart.Name = "txtStart"
|
||||
Me.txtStart.Size = New System.Drawing.Size(201, 31)
|
||||
Me.txtStart.TabIndex = 15
|
||||
'
|
||||
'GroupBox2
|
||||
'
|
||||
Me.GroupBox2.Controls.Add(Me.GroupBox3)
|
||||
Me.GroupBox2.Controls.Add(Me.txtLotNum)
|
||||
Me.GroupBox2.Controls.Add(Me.Label8)
|
||||
Me.GroupBox2.Controls.Add(Me.txtQuantity)
|
||||
Me.GroupBox2.Controls.Add(Me.Label7)
|
||||
Me.GroupBox2.Controls.Add(Me.txtPartDesc)
|
||||
Me.GroupBox2.Controls.Add(Me.Label6)
|
||||
Me.GroupBox2.Controls.Add(Me.txtOperator)
|
||||
Me.GroupBox2.Controls.Add(Me.Label5)
|
||||
Me.GroupBox2.Controls.Add(Me.txtFeeder)
|
||||
Me.GroupBox2.Controls.Add(Me.txtPartNo)
|
||||
Me.GroupBox2.Controls.Add(Me.Label4)
|
||||
Me.GroupBox2.Controls.Add(Me.Label3)
|
||||
Me.GroupBox2.Font = New System.Drawing.Font("Microsoft Sans Serif", 15.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.GroupBox2.Location = New System.Drawing.Point(6, 138)
|
||||
Me.GroupBox2.Name = "GroupBox2"
|
||||
Me.GroupBox2.Size = New System.Drawing.Size(957, 446)
|
||||
Me.GroupBox2.TabIndex = 1
|
||||
Me.GroupBox2.TabStop = False
|
||||
Me.GroupBox2.Text = "Mounting Validation"
|
||||
'
|
||||
'GroupBox3
|
||||
'
|
||||
Me.GroupBox3.Controls.Add(Me.lbl_fail)
|
||||
Me.GroupBox3.Controls.Add(Me.lbl_Pass)
|
||||
Me.GroupBox3.Location = New System.Drawing.Point(481, 15)
|
||||
Me.GroupBox3.Name = "GroupBox3"
|
||||
Me.GroupBox3.Size = New System.Drawing.Size(464, 424)
|
||||
Me.GroupBox3.TabIndex = 21
|
||||
Me.GroupBox3.TabStop = False
|
||||
'
|
||||
'lbl_fail
|
||||
'
|
||||
Me.lbl_fail.AutoSize = True
|
||||
Me.lbl_fail.Font = New System.Drawing.Font("Microsoft Sans Serif", 72.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lbl_fail.ForeColor = System.Drawing.Color.Tomato
|
||||
Me.lbl_fail.Location = New System.Drawing.Point(45, 133)
|
||||
Me.lbl_fail.Name = "lbl_fail"
|
||||
Me.lbl_fail.Size = New System.Drawing.Size(387, 108)
|
||||
Me.lbl_fail.TabIndex = 22
|
||||
Me.lbl_fail.Text = "FAILED"
|
||||
Me.lbl_fail.Visible = False
|
||||
'
|
||||
'lbl_Pass
|
||||
'
|
||||
Me.lbl_Pass.AutoSize = True
|
||||
Me.lbl_Pass.Font = New System.Drawing.Font("Microsoft Sans Serif", 72.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lbl_Pass.ForeColor = System.Drawing.Color.ForestGreen
|
||||
Me.lbl_Pass.Location = New System.Drawing.Point(20, 133)
|
||||
Me.lbl_Pass.Name = "lbl_Pass"
|
||||
Me.lbl_Pass.Size = New System.Drawing.Size(440, 108)
|
||||
Me.lbl_Pass.TabIndex = 21
|
||||
Me.lbl_Pass.Text = "PASSED"
|
||||
Me.lbl_Pass.Visible = False
|
||||
'
|
||||
'txtLotNum
|
||||
'
|
||||
Me.txtLotNum.Enabled = False
|
||||
Me.txtLotNum.Font = New System.Drawing.Font("Microsoft Sans Serif", 15.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.txtLotNum.Location = New System.Drawing.Point(145, 260)
|
||||
Me.txtLotNum.Name = "txtLotNum"
|
||||
Me.txtLotNum.Size = New System.Drawing.Size(327, 31)
|
||||
Me.txtLotNum.TabIndex = 19
|
||||
'
|
||||
'Label8
|
||||
'
|
||||
Me.Label8.AutoSize = True
|
||||
Me.Label8.Font = New System.Drawing.Font("Microsoft Sans Serif", 15.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label8.Location = New System.Drawing.Point(13, 263)
|
||||
Me.Label8.Name = "Label8"
|
||||
Me.Label8.Size = New System.Drawing.Size(129, 25)
|
||||
Me.Label8.TabIndex = 18
|
||||
Me.Label8.Text = "Lot Number:"
|
||||
'
|
||||
'txtQuantity
|
||||
'
|
||||
Me.txtQuantity.Enabled = False
|
||||
Me.txtQuantity.Font = New System.Drawing.Font("Microsoft Sans Serif", 15.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.txtQuantity.Location = New System.Drawing.Point(144, 200)
|
||||
Me.txtQuantity.Name = "txtQuantity"
|
||||
Me.txtQuantity.Size = New System.Drawing.Size(328, 31)
|
||||
Me.txtQuantity.TabIndex = 17
|
||||
'
|
||||
'Label7
|
||||
'
|
||||
Me.Label7.AutoSize = True
|
||||
Me.Label7.Font = New System.Drawing.Font("Microsoft Sans Serif", 15.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label7.Location = New System.Drawing.Point(38, 203)
|
||||
Me.Label7.Name = "Label7"
|
||||
Me.Label7.Size = New System.Drawing.Size(98, 25)
|
||||
Me.Label7.TabIndex = 16
|
||||
Me.Label7.Text = "Quantity:"
|
||||
'
|
||||
'txtPartDesc
|
||||
'
|
||||
Me.txtPartDesc.Enabled = False
|
||||
Me.txtPartDesc.Font = New System.Drawing.Font("Microsoft Sans Serif", 15.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.txtPartDesc.Location = New System.Drawing.Point(144, 91)
|
||||
Me.txtPartDesc.Multiline = True
|
||||
Me.txtPartDesc.Name = "txtPartDesc"
|
||||
Me.txtPartDesc.Size = New System.Drawing.Size(328, 81)
|
||||
Me.txtPartDesc.TabIndex = 14
|
||||
'
|
||||
'Label6
|
||||
'
|
||||
Me.Label6.AutoSize = True
|
||||
Me.Label6.Font = New System.Drawing.Font("Microsoft Sans Serif", 15.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label6.Location = New System.Drawing.Point(13, 113)
|
||||
Me.Label6.Name = "Label6"
|
||||
Me.Label6.Size = New System.Drawing.Size(126, 25)
|
||||
Me.Label6.TabIndex = 13
|
||||
Me.Label6.Text = "Description:"
|
||||
'
|
||||
'txtOperator
|
||||
'
|
||||
Me.txtOperator.Enabled = False
|
||||
Me.txtOperator.Font = New System.Drawing.Font("Microsoft Sans Serif", 15.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.txtOperator.Location = New System.Drawing.Point(145, 384)
|
||||
Me.txtOperator.Name = "txtOperator"
|
||||
Me.txtOperator.Size = New System.Drawing.Size(327, 31)
|
||||
Me.txtOperator.TabIndex = 11
|
||||
'
|
||||
'Label5
|
||||
'
|
||||
Me.Label5.AutoSize = True
|
||||
Me.Label5.Font = New System.Drawing.Font("Microsoft Sans Serif", 15.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label5.Location = New System.Drawing.Point(34, 387)
|
||||
Me.Label5.Name = "Label5"
|
||||
Me.Label5.Size = New System.Drawing.Size(102, 25)
|
||||
Me.Label5.TabIndex = 10
|
||||
Me.Label5.Text = "Operator:"
|
||||
'
|
||||
'txtFeeder
|
||||
'
|
||||
Me.txtFeeder.Enabled = False
|
||||
Me.txtFeeder.Font = New System.Drawing.Font("Microsoft Sans Serif", 15.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.txtFeeder.Location = New System.Drawing.Point(145, 327)
|
||||
Me.txtFeeder.Name = "txtFeeder"
|
||||
Me.txtFeeder.Size = New System.Drawing.Size(327, 31)
|
||||
Me.txtFeeder.TabIndex = 9
|
||||
'
|
||||
'txtPartNo
|
||||
'
|
||||
Me.txtPartNo.Enabled = False
|
||||
Me.txtPartNo.Font = New System.Drawing.Font("Microsoft Sans Serif", 15.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.txtPartNo.Location = New System.Drawing.Point(144, 41)
|
||||
Me.txtPartNo.Name = "txtPartNo"
|
||||
Me.txtPartNo.Size = New System.Drawing.Size(328, 31)
|
||||
Me.txtPartNo.TabIndex = 8
|
||||
'
|
||||
'Label4
|
||||
'
|
||||
Me.Label4.AutoSize = True
|
||||
Me.Label4.Font = New System.Drawing.Font("Microsoft Sans Serif", 15.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label4.Location = New System.Drawing.Point(17, 330)
|
||||
Me.Label4.Name = "Label4"
|
||||
Me.Label4.Size = New System.Drawing.Size(119, 25)
|
||||
Me.Label4.TabIndex = 7
|
||||
Me.Label4.Text = "Feeder No:"
|
||||
'
|
||||
'Label3
|
||||
'
|
||||
Me.Label3.AutoSize = True
|
||||
Me.Label3.Font = New System.Drawing.Font("Microsoft Sans Serif", 15.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label3.Location = New System.Drawing.Point(10, 44)
|
||||
Me.Label3.Name = "Label3"
|
||||
Me.Label3.Size = New System.Drawing.Size(138, 25)
|
||||
Me.Label3.TabIndex = 6
|
||||
Me.Label3.Text = "Part Number:"
|
||||
'
|
||||
'Timer1
|
||||
'
|
||||
'
|
||||
'mountingForm
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.ClientSize = New System.Drawing.Size(968, 589)
|
||||
Me.ControlBox = False
|
||||
Me.Controls.Add(Me.GroupBox2)
|
||||
Me.Controls.Add(Me.GroupBox1)
|
||||
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedSingle
|
||||
Me.Name = "mountingForm"
|
||||
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
|
||||
Me.Text = "Mounting"
|
||||
Me.GroupBox1.ResumeLayout(False)
|
||||
Me.GroupBox1.PerformLayout()
|
||||
Me.GroupBox2.ResumeLayout(False)
|
||||
Me.GroupBox2.PerformLayout()
|
||||
Me.GroupBox3.ResumeLayout(False)
|
||||
Me.GroupBox3.PerformLayout()
|
||||
Me.ResumeLayout(False)
|
||||
|
||||
End Sub
|
||||
Friend WithEvents GroupBox1 As System.Windows.Forms.GroupBox
|
||||
Friend WithEvents Label1 As System.Windows.Forms.Label
|
||||
Friend WithEvents cmbSeq As System.Windows.Forms.ComboBox
|
||||
Friend WithEvents GroupBox2 As System.Windows.Forms.GroupBox
|
||||
Friend WithEvents btn_setSequence As System.Windows.Forms.Button
|
||||
Friend WithEvents txtOperator As System.Windows.Forms.TextBox
|
||||
Friend WithEvents Label5 As System.Windows.Forms.Label
|
||||
Friend WithEvents txtFeeder As System.Windows.Forms.TextBox
|
||||
Friend WithEvents txtPartNo As System.Windows.Forms.TextBox
|
||||
Friend WithEvents Label4 As System.Windows.Forms.Label
|
||||
Friend WithEvents Label3 As System.Windows.Forms.Label
|
||||
Friend WithEvents txtPartDesc As System.Windows.Forms.TextBox
|
||||
Friend WithEvents Label6 As System.Windows.Forms.Label
|
||||
Friend WithEvents txtStart As System.Windows.Forms.TextBox
|
||||
Friend WithEvents txtLotNum As System.Windows.Forms.TextBox
|
||||
Friend WithEvents Label8 As System.Windows.Forms.Label
|
||||
Friend WithEvents txtQuantity As System.Windows.Forms.TextBox
|
||||
Friend WithEvents Label7 As System.Windows.Forms.Label
|
||||
Friend WithEvents GroupBox3 As System.Windows.Forms.GroupBox
|
||||
Friend WithEvents lbl_Pass As System.Windows.Forms.Label
|
||||
Friend WithEvents lbl_fail As System.Windows.Forms.Label
|
||||
Friend WithEvents Timer1 As System.Windows.Forms.Timer
|
||||
Friend WithEvents cmbRev As System.Windows.Forms.ComboBox
|
||||
Friend WithEvents Label2 As System.Windows.Forms.Label
|
||||
Friend WithEvents btn_reload As System.Windows.Forms.Button
|
||||
End Class
|
@ -0,0 +1,157 @@
|
||||
Imports System
|
||||
Imports System.Data
|
||||
Imports System.Data.SqlClient
|
||||
Imports System.IO
|
||||
Imports System.Security
|
||||
Imports System.Security.Cryptography
|
||||
Imports System.Text
|
||||
|
||||
Public Class Parts
|
||||
Private _partNo As String
|
||||
Private _partDesc As String
|
||||
Private cnstr As String
|
||||
Private connection As Connection
|
||||
|
||||
#Region "Properties"
|
||||
|
||||
Public Property partNo As String
|
||||
Get
|
||||
Return _partNo
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_partNo = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property partDesc As String
|
||||
Get
|
||||
Return _partDesc
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_partDesc = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
#End Region
|
||||
|
||||
#Region "Methods"
|
||||
|
||||
Public Sub New()
|
||||
cnstr = mainForm.cnstr
|
||||
End Sub
|
||||
|
||||
Public Sub New(ByVal partno As String)
|
||||
connection = New Connection
|
||||
connection.server = My.Settings.server
|
||||
connection.database = My.Settings.database
|
||||
connection.username = My.Settings.username
|
||||
connection.password = My.Settings.password
|
||||
connection.dbserver = My.Settings.dbserver
|
||||
connection.isTrusted = My.Settings.isTrusted
|
||||
cnstr = connection.cnStr
|
||||
mainForm.cnstr = cnstr
|
||||
_partNo = partNo
|
||||
End Sub
|
||||
|
||||
Public Sub add(ByVal kptpartno As String, ByVal kptdesc As String)
|
||||
Dim conn As New SqlConnection(cnstr)
|
||||
Dim myQuery As String
|
||||
|
||||
myQuery = "INSERT INTO kparts([KPTPARTNUM],[KPTDESCRIPTION]) VALUES (" & _
|
||||
"'" & kptpartno & "','" & kptdesc & "')"
|
||||
|
||||
Dim mycommand As SqlCommand
|
||||
mycommand = New SqlCommand(myQuery, conn)
|
||||
|
||||
Try
|
||||
conn.Open()
|
||||
mycommand.ExecuteNonQuery()
|
||||
Catch ex As Exception
|
||||
MessageBox.Show(ex.Message, "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
|
||||
Finally
|
||||
conn.Close()
|
||||
conn.Dispose()
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
Public Sub edit(ByVal kptpartno As String, ByVal kptdesc As String)
|
||||
|
||||
Dim conn As New SqlConnection(cnstr)
|
||||
Dim myQuery As String
|
||||
|
||||
|
||||
myQuery = "UPDATE kparts " & _
|
||||
"SET kptpartnum = " & "'" & kptpartno & "'," & _
|
||||
" kptdescription = " & " '" & kptdesc & "'" & _
|
||||
" WHERE kptpartnum = " & "'" & _partNo & "'"
|
||||
|
||||
Dim mycommand As SqlCommand
|
||||
mycommand = New SqlCommand(myQuery, conn)
|
||||
|
||||
Try
|
||||
conn.Open()
|
||||
mycommand.ExecuteNonQuery()
|
||||
MessageBox.Show("Successfully Saved.", "System User", MessageBoxButtons.OK, MessageBoxIcon.Information)
|
||||
Catch ex As Exception
|
||||
MessageBox.Show(ex.Message, "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
|
||||
Finally
|
||||
conn.Close()
|
||||
conn.Dispose()
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
Public Sub delete(ByVal kptpartno As String)
|
||||
Dim conn As New SqlConnection(cnstr)
|
||||
|
||||
Dim myQuery As String
|
||||
myQuery = "DELETE FROM kparts " & _
|
||||
"WHERE kptpartnum = '" & kptpartno & "'"
|
||||
|
||||
Dim mycommand As SqlCommand
|
||||
mycommand = New SqlCommand(myQuery, conn)
|
||||
|
||||
Try
|
||||
conn.Open()
|
||||
If (check_part() = True) Then
|
||||
mycommand.ExecuteNonQuery()
|
||||
MessageBox.Show("Successfully Deleted.", "System User", MessageBoxButtons.OK, MessageBoxIcon.Information)
|
||||
Else
|
||||
MessageBox.Show("User does not exists in the database.", "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
|
||||
End If
|
||||
Catch ex As Exception
|
||||
MessageBox.Show(ex.Message, "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
|
||||
Finally
|
||||
conn.Close()
|
||||
conn.Dispose()
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
Public Function check_part() As Boolean
|
||||
Dim conn As New SqlConnection(cnstr)
|
||||
|
||||
Dim myQuery As String
|
||||
myQuery = "SELECT * FROM kparts " & _
|
||||
"WHERE kptpartnum = " & "'" & _partNo & "'"
|
||||
|
||||
Dim mycommand As SqlCommand
|
||||
mycommand = New SqlCommand(myQuery, conn)
|
||||
|
||||
Try
|
||||
conn.Open()
|
||||
Dim reader As SqlDataReader = mycommand.ExecuteReader()
|
||||
If (reader.HasRows) Then
|
||||
Return True
|
||||
Else
|
||||
Return False
|
||||
End If
|
||||
Catch ex As Exception
|
||||
MessageBox.Show(ex.Message, "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
|
||||
Finally
|
||||
conn.Close()
|
||||
conn.Dispose()
|
||||
End Try
|
||||
End Function
|
||||
|
||||
#End Region
|
||||
|
||||
End Class
|
@ -0,0 +1,183 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
||||
<Global.System.Diagnostics.CodeAnalysis.SuppressMessage("Microsoft.Naming", "CA1726")> _
|
||||
Partial Class loginForm
|
||||
Inherits System.Windows.Forms.Form
|
||||
|
||||
'Form overrides dispose to clean up the component list.
|
||||
<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
|
||||
|
||||
'Required by the Windows Form Designer
|
||||
Private components As System.ComponentModel.IContainer
|
||||
|
||||
'NOTE: The following procedure is required by the Windows Form Designer
|
||||
'It can be modified using the Windows Form Designer.
|
||||
'Do not modify it using the code editor.
|
||||
<System.Diagnostics.DebuggerStepThrough()> _
|
||||
Private Sub InitializeComponent()
|
||||
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(loginForm))
|
||||
Me.LogoPictureBox = New System.Windows.Forms.PictureBox
|
||||
Me.UsernameLabel = New System.Windows.Forms.Label
|
||||
Me.PasswordLabel = New System.Windows.Forms.Label
|
||||
Me.txtUsername = New System.Windows.Forms.TextBox
|
||||
Me.txtPassword = New System.Windows.Forms.TextBox
|
||||
Me.btn_ok = New System.Windows.Forms.Button
|
||||
Me.btn_cancel = New System.Windows.Forms.Button
|
||||
Me.GroupBox1 = New System.Windows.Forms.GroupBox
|
||||
Me.Label1 = New System.Windows.Forms.Label
|
||||
CType(Me.LogoPictureBox, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.GroupBox1.SuspendLayout()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'LogoPictureBox
|
||||
'
|
||||
Me.LogoPictureBox.Image = CType(resources.GetObject("LogoPictureBox.Image"), System.Drawing.Image)
|
||||
Me.LogoPictureBox.Location = New System.Drawing.Point(6, 9)
|
||||
Me.LogoPictureBox.Name = "LogoPictureBox"
|
||||
Me.LogoPictureBox.Size = New System.Drawing.Size(166, 144)
|
||||
Me.LogoPictureBox.TabIndex = 10
|
||||
Me.LogoPictureBox.TabStop = False
|
||||
'
|
||||
'UsernameLabel
|
||||
'
|
||||
Me.UsernameLabel.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.UsernameLabel.Location = New System.Drawing.Point(176, 31)
|
||||
Me.UsernameLabel.Name = "UsernameLabel"
|
||||
Me.UsernameLabel.Size = New System.Drawing.Size(177, 23)
|
||||
Me.UsernameLabel.TabIndex = 9
|
||||
Me.UsernameLabel.Text = "&User name"
|
||||
Me.UsernameLabel.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
|
||||
'
|
||||
'PasswordLabel
|
||||
'
|
||||
Me.PasswordLabel.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.PasswordLabel.Location = New System.Drawing.Point(176, 88)
|
||||
Me.PasswordLabel.Name = "PasswordLabel"
|
||||
Me.PasswordLabel.Size = New System.Drawing.Size(177, 23)
|
||||
Me.PasswordLabel.TabIndex = 12
|
||||
Me.PasswordLabel.Text = "&Password"
|
||||
Me.PasswordLabel.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
|
||||
'
|
||||
'txtUsername
|
||||
'
|
||||
Me.txtUsername.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.txtUsername.ForeColor = System.Drawing.Color.Red
|
||||
Me.txtUsername.Location = New System.Drawing.Point(178, 51)
|
||||
Me.txtUsername.Name = "txtUsername"
|
||||
Me.txtUsername.Size = New System.Drawing.Size(175, 24)
|
||||
Me.txtUsername.TabIndex = 11
|
||||
'
|
||||
'txtPassword
|
||||
'
|
||||
Me.txtPassword.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.txtPassword.ForeColor = System.Drawing.Color.Red
|
||||
Me.txtPassword.Location = New System.Drawing.Point(178, 108)
|
||||
Me.txtPassword.Name = "txtPassword"
|
||||
Me.txtPassword.PasswordChar = Global.Microsoft.VisualBasic.ChrW(42)
|
||||
Me.txtPassword.Size = New System.Drawing.Size(175, 24)
|
||||
Me.txtPassword.TabIndex = 13
|
||||
'
|
||||
'btn_ok
|
||||
'
|
||||
Me.btn_ok.BackColor = System.Drawing.Color.Transparent
|
||||
Me.btn_ok.BackgroundImage = CType(resources.GetObject("btn_ok.BackgroundImage"), System.Drawing.Image)
|
||||
Me.btn_ok.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch
|
||||
Me.btn_ok.FlatAppearance.BorderSize = 0
|
||||
Me.btn_ok.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_ok.Font = New System.Drawing.Font("Verdana", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.btn_ok.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_ok.Image = CType(resources.GetObject("btn_ok.Image"), System.Drawing.Image)
|
||||
Me.btn_ok.Location = New System.Drawing.Point(69, 165)
|
||||
Me.btn_ok.Margin = New System.Windows.Forms.Padding(0)
|
||||
Me.btn_ok.Name = "btn_ok"
|
||||
Me.btn_ok.Size = New System.Drawing.Size(115, 36)
|
||||
Me.btn_ok.TabIndex = 14
|
||||
Me.btn_ok.Text = " &Ok"
|
||||
Me.btn_ok.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
Me.btn_ok.TextImageRelation = System.Windows.Forms.TextImageRelation.ImageBeforeText
|
||||
Me.btn_ok.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_cancel
|
||||
'
|
||||
Me.btn_cancel.BackColor = System.Drawing.Color.Transparent
|
||||
Me.btn_cancel.BackgroundImage = CType(resources.GetObject("btn_cancel.BackgroundImage"), System.Drawing.Image)
|
||||
Me.btn_cancel.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch
|
||||
Me.btn_cancel.FlatAppearance.BorderSize = 0
|
||||
Me.btn_cancel.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_cancel.Font = New System.Drawing.Font("Verdana", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.btn_cancel.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_cancel.Image = CType(resources.GetObject("btn_cancel.Image"), System.Drawing.Image)
|
||||
Me.btn_cancel.Location = New System.Drawing.Point(193, 164)
|
||||
Me.btn_cancel.Margin = New System.Windows.Forms.Padding(0)
|
||||
Me.btn_cancel.Name = "btn_cancel"
|
||||
Me.btn_cancel.Size = New System.Drawing.Size(115, 36)
|
||||
Me.btn_cancel.TabIndex = 15
|
||||
Me.btn_cancel.Text = " &Cancel"
|
||||
Me.btn_cancel.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
Me.btn_cancel.TextImageRelation = System.Windows.Forms.TextImageRelation.ImageBeforeText
|
||||
Me.btn_cancel.UseVisualStyleBackColor = True
|
||||
'
|
||||
'GroupBox1
|
||||
'
|
||||
Me.GroupBox1.Controls.Add(Me.Label1)
|
||||
Me.GroupBox1.Controls.Add(Me.btn_cancel)
|
||||
Me.GroupBox1.Controls.Add(Me.btn_ok)
|
||||
Me.GroupBox1.Controls.Add(Me.txtPassword)
|
||||
Me.GroupBox1.Controls.Add(Me.txtUsername)
|
||||
Me.GroupBox1.Controls.Add(Me.PasswordLabel)
|
||||
Me.GroupBox1.Controls.Add(Me.UsernameLabel)
|
||||
Me.GroupBox1.Controls.Add(Me.LogoPictureBox)
|
||||
Me.GroupBox1.Location = New System.Drawing.Point(0, -4)
|
||||
Me.GroupBox1.Name = "GroupBox1"
|
||||
Me.GroupBox1.Size = New System.Drawing.Size(360, 215)
|
||||
Me.GroupBox1.TabIndex = 9
|
||||
Me.GroupBox1.TabStop = False
|
||||
'
|
||||
'Label1
|
||||
'
|
||||
Me.Label1.AutoSize = True
|
||||
Me.Label1.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label1.Location = New System.Drawing.Point(176, 13)
|
||||
Me.Label1.Name = "Label1"
|
||||
Me.Label1.Size = New System.Drawing.Size(0, 18)
|
||||
Me.Label1.TabIndex = 16
|
||||
'
|
||||
'loginForm
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.ClientSize = New System.Drawing.Size(363, 214)
|
||||
Me.ControlBox = False
|
||||
Me.Controls.Add(Me.GroupBox1)
|
||||
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedSingle
|
||||
Me.MaximizeBox = False
|
||||
Me.MinimizeBox = False
|
||||
Me.Name = "loginForm"
|
||||
Me.SizeGripStyle = System.Windows.Forms.SizeGripStyle.Hide
|
||||
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
|
||||
Me.Text = "System Login"
|
||||
CType(Me.LogoPictureBox, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.GroupBox1.ResumeLayout(False)
|
||||
Me.GroupBox1.PerformLayout()
|
||||
Me.ResumeLayout(False)
|
||||
|
||||
End Sub
|
||||
Friend WithEvents LogoPictureBox As System.Windows.Forms.PictureBox
|
||||
Friend WithEvents UsernameLabel As System.Windows.Forms.Label
|
||||
Friend WithEvents PasswordLabel As System.Windows.Forms.Label
|
||||
Friend WithEvents txtUsername As System.Windows.Forms.TextBox
|
||||
Friend WithEvents txtPassword As System.Windows.Forms.TextBox
|
||||
Friend WithEvents btn_ok As System.Windows.Forms.Button
|
||||
Friend WithEvents btn_cancel As System.Windows.Forms.Button
|
||||
Friend WithEvents GroupBox1 As System.Windows.Forms.GroupBox
|
||||
Friend WithEvents Label1 As System.Windows.Forms.Label
|
||||
|
||||
End Class
|
@ -0,0 +1,18 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<asmv1:assembly xsi:schemaLocation="urn:schemas-microsoft-com:asm.v1 assembly.adaptive.xsd" manifestVersion="1.0" xmlns:asmv1="urn:schemas-microsoft-com:asm.v1" xmlns="urn:schemas-microsoft-com:asm.v2" xmlns:asmv2="urn:schemas-microsoft-com:asm.v2" xmlns:xrml="urn:mpeg:mpeg21:2003:01-REL-R-NS" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:asmv3="urn:schemas-microsoft-com:asm.v3" xmlns:dsig="http://www.w3.org/2000/09/xmldsig#" xmlns:co.v1="urn:schemas-microsoft-com:clickonce.v1" xmlns:co.v2="urn:schemas-microsoft-com:clickonce.v2">
|
||||
<assemblyIdentity name="Kanban System.application" version="1.0.0.17" publicKeyToken="0000000000000000" language="neutral" processorArchitecture="msil" xmlns="urn:schemas-microsoft-com:asm.v1" />
|
||||
<description asmv2:publisher="Ionics EMS, Inc." asmv2:product="Kanban" xmlns="urn:schemas-microsoft-com:asm.v1" />
|
||||
<deployment install="true" mapFileExtensions="true" />
|
||||
<dependency>
|
||||
<dependentAssembly dependencyType="install" codebase="Kanban System.exe.manifest" size="4709">
|
||||
<assemblyIdentity name="Kanban System.exe" version="1.0.0.17" publicKeyToken="0000000000000000" language="neutral" processorArchitecture="msil" type="win32" />
|
||||
<hash>
|
||||
<dsig:Transforms>
|
||||
<dsig:Transform Algorithm="urn:schemas-microsoft-com:HashTransforms.Identity" />
|
||||
</dsig:Transforms>
|
||||
<dsig:DigestMethod Algorithm="http://www.w3.org/2000/09/xmldsig#sha1" />
|
||||
<dsig:DigestValue>bFuc0MC689ws/VWd43oQG1I/asA=</dsig:DigestValue>
|
||||
</hash>
|
||||
</dependentAssembly>
|
||||
</dependency>
|
||||
</asmv1:assembly>
|
@ -0,0 +1,57 @@
|
||||
<?xml version="1.0" encoding="utf-8" ?>
|
||||
<configuration>
|
||||
<configSections>
|
||||
<sectionGroup name="userSettings" type="System.Configuration.UserSettingsGroup, System, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" >
|
||||
<section name="Mounting_Sequence.My.MySettings" type="System.Configuration.ClientSettingsSection, System, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" allowExeDefinition="MachineToLocalUser" requirePermission="false" />
|
||||
</sectionGroup>
|
||||
</configSections>
|
||||
<connectionStrings>
|
||||
<add name="Mounting_Sequence.My.MySettings.EpsonConnectionString"
|
||||
connectionString="Data Source=192.168.1.50;Initial Catalog=Toshiba;Persist Security Info=True;User ID=cats;Password=dogs"
|
||||
providerName="System.Data.SqlClient" />
|
||||
</connectionStrings>
|
||||
<system.diagnostics>
|
||||
<sources>
|
||||
<!-- This section defines the logging configuration for My.Application.Log -->
|
||||
<source name="DefaultSource" switchName="DefaultSwitch">
|
||||
<listeners>
|
||||
<add name="FileLog"/>
|
||||
<!-- Uncomment the below section to write to the Application Event Log -->
|
||||
<!--<add name="EventLog"/>-->
|
||||
</listeners>
|
||||
</source>
|
||||
</sources>
|
||||
<switches>
|
||||
<add name="DefaultSwitch" value="Information" />
|
||||
</switches>
|
||||
<sharedListeners>
|
||||
<add name="FileLog"
|
||||
type="Microsoft.VisualBasic.Logging.FileLogTraceListener, Microsoft.VisualBasic, Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a, processorArchitecture=MSIL"
|
||||
initializeData="FileLogWriter"/>
|
||||
<!-- Uncomment the below section and replace APPLICATION_NAME with the name of your application to write to the Application Event Log -->
|
||||
<!--<add name="EventLog" type="System.Diagnostics.EventLogTraceListener" initializeData="APPLICATION_NAME"/> -->
|
||||
</sharedListeners>
|
||||
</system.diagnostics>
|
||||
<userSettings>
|
||||
<Mounting_Sequence.My.MySettings>
|
||||
<setting name="server" serializeAs="String">
|
||||
<value>192.168.1.50</value>
|
||||
</setting>
|
||||
<setting name="database" serializeAs="String">
|
||||
<value>Toshiba</value>
|
||||
</setting>
|
||||
<setting name="username" serializeAs="String">
|
||||
<value />
|
||||
</setting>
|
||||
<setting name="password" serializeAs="String">
|
||||
<value />
|
||||
</setting>
|
||||
<setting name="dbserver" serializeAs="String">
|
||||
<value>SQL Server</value>
|
||||
</setting>
|
||||
<setting name="isTrusted" serializeAs="String">
|
||||
<value>True</value>
|
||||
</setting>
|
||||
</Mounting_Sequence.My.MySettings>
|
||||
</userSettings>
|
||||
</configuration>
|
@ -0,0 +1,343 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
||||
Partial Class userForm
|
||||
Inherits System.Windows.Forms.Form
|
||||
|
||||
'Form overrides dispose to clean up the component list.
|
||||
<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
|
||||
|
||||
'Required by the Windows Form Designer
|
||||
Private components As System.ComponentModel.IContainer
|
||||
|
||||
'NOTE: The following procedure is required by the Windows Form Designer
|
||||
'It can be modified using the Windows Form Designer.
|
||||
'Do not modify it using the code editor.
|
||||
<System.Diagnostics.DebuggerStepThrough()> _
|
||||
Private Sub InitializeComponent()
|
||||
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(userForm))
|
||||
Me.GroupBox1 = New System.Windows.Forms.GroupBox
|
||||
Me.cmbAccount = New System.Windows.Forms.ComboBox
|
||||
Me.Label6 = New System.Windows.Forms.Label
|
||||
Me.cmbPlant = New System.Windows.Forms.ComboBox
|
||||
Me.Label4 = New System.Windows.Forms.Label
|
||||
Me.txtPassword2 = New System.Windows.Forms.TextBox
|
||||
Me.Label3 = New System.Windows.Forms.Label
|
||||
Me.cmb_userType = New System.Windows.Forms.ComboBox
|
||||
Me.cbActive = New System.Windows.Forms.CheckBox
|
||||
Me.Label5 = New System.Windows.Forms.Label
|
||||
Me.txtPassword = New System.Windows.Forms.TextBox
|
||||
Me.txtUsername = New System.Windows.Forms.TextBox
|
||||
Me.Label2 = New System.Windows.Forms.Label
|
||||
Me.Label1 = New System.Windows.Forms.Label
|
||||
Me.btn_find = New System.Windows.Forms.Button
|
||||
Me.ts_new = New System.Windows.Forms.ToolStripButton
|
||||
Me.ToolStripSeparator1 = New System.Windows.Forms.ToolStripSeparator
|
||||
Me.ts_edit = New System.Windows.Forms.ToolStripButton
|
||||
Me.ToolStripSeparator2 = New System.Windows.Forms.ToolStripSeparator
|
||||
Me.ts_delete = New System.Windows.Forms.ToolStripButton
|
||||
Me.ToolStripSeparator3 = New System.Windows.Forms.ToolStripSeparator
|
||||
Me.ts_find = New System.Windows.Forms.ToolStripButton
|
||||
Me.ToolStripSeparator4 = New System.Windows.Forms.ToolStripSeparator
|
||||
Me.ts_save = New System.Windows.Forms.ToolStripButton
|
||||
Me.ToolStrip1 = New System.Windows.Forms.ToolStrip
|
||||
Me.ts_revert = New System.Windows.Forms.ToolStripButton
|
||||
Me.ToolStripSeparator5 = New System.Windows.Forms.ToolStripSeparator
|
||||
Me.GroupBox1.SuspendLayout()
|
||||
Me.ToolStrip1.SuspendLayout()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'GroupBox1
|
||||
'
|
||||
Me.GroupBox1.Controls.Add(Me.cmbAccount)
|
||||
Me.GroupBox1.Controls.Add(Me.Label6)
|
||||
Me.GroupBox1.Controls.Add(Me.cmbPlant)
|
||||
Me.GroupBox1.Controls.Add(Me.Label4)
|
||||
Me.GroupBox1.Controls.Add(Me.txtPassword2)
|
||||
Me.GroupBox1.Controls.Add(Me.Label3)
|
||||
Me.GroupBox1.Controls.Add(Me.cmb_userType)
|
||||
Me.GroupBox1.Controls.Add(Me.cbActive)
|
||||
Me.GroupBox1.Controls.Add(Me.Label5)
|
||||
Me.GroupBox1.Controls.Add(Me.txtPassword)
|
||||
Me.GroupBox1.Controls.Add(Me.txtUsername)
|
||||
Me.GroupBox1.Controls.Add(Me.Label2)
|
||||
Me.GroupBox1.Controls.Add(Me.Label1)
|
||||
Me.GroupBox1.Controls.Add(Me.btn_find)
|
||||
Me.GroupBox1.Location = New System.Drawing.Point(6, 27)
|
||||
Me.GroupBox1.Name = "GroupBox1"
|
||||
Me.GroupBox1.Size = New System.Drawing.Size(499, 186)
|
||||
Me.GroupBox1.TabIndex = 0
|
||||
Me.GroupBox1.TabStop = False
|
||||
Me.GroupBox1.Text = "Information"
|
||||
'
|
||||
'cmbAccount
|
||||
'
|
||||
Me.cmbAccount.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
|
||||
Me.cmbAccount.Enabled = False
|
||||
Me.cmbAccount.FormattingEnabled = True
|
||||
Me.cmbAccount.Items.AddRange(New Object() {"", "Administrator", "Encoder", "Generator", "Guest"})
|
||||
Me.cmbAccount.Location = New System.Drawing.Point(124, 127)
|
||||
Me.cmbAccount.Name = "cmbAccount"
|
||||
Me.cmbAccount.Size = New System.Drawing.Size(159, 21)
|
||||
Me.cmbAccount.TabIndex = 4
|
||||
'
|
||||
'Label6
|
||||
'
|
||||
Me.Label6.AutoSize = True
|
||||
Me.Label6.Location = New System.Drawing.Point(70, 132)
|
||||
Me.Label6.Name = "Label6"
|
||||
Me.Label6.Size = New System.Drawing.Size(50, 13)
|
||||
Me.Label6.TabIndex = 27
|
||||
Me.Label6.Text = "Account:"
|
||||
'
|
||||
'cmbPlant
|
||||
'
|
||||
Me.cmbPlant.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
|
||||
Me.cmbPlant.Enabled = False
|
||||
Me.cmbPlant.FormattingEnabled = True
|
||||
Me.cmbPlant.Items.AddRange(New Object() {"", "Administrator", "Encoder", "Generator", "Guest"})
|
||||
Me.cmbPlant.Location = New System.Drawing.Point(124, 100)
|
||||
Me.cmbPlant.Name = "cmbPlant"
|
||||
Me.cmbPlant.Size = New System.Drawing.Size(159, 21)
|
||||
Me.cmbPlant.TabIndex = 3
|
||||
'
|
||||
'Label4
|
||||
'
|
||||
Me.Label4.AutoSize = True
|
||||
Me.Label4.Location = New System.Drawing.Point(84, 105)
|
||||
Me.Label4.Name = "Label4"
|
||||
Me.Label4.Size = New System.Drawing.Size(34, 13)
|
||||
Me.Label4.TabIndex = 25
|
||||
Me.Label4.Text = "Plant:"
|
||||
'
|
||||
'txtPassword2
|
||||
'
|
||||
Me.txtPassword2.Enabled = False
|
||||
Me.txtPassword2.Location = New System.Drawing.Point(124, 74)
|
||||
Me.txtPassword2.Name = "txtPassword2"
|
||||
Me.txtPassword2.PasswordChar = Global.Microsoft.VisualBasic.ChrW(42)
|
||||
Me.txtPassword2.Size = New System.Drawing.Size(159, 20)
|
||||
Me.txtPassword2.TabIndex = 2
|
||||
'
|
||||
'Label3
|
||||
'
|
||||
Me.Label3.AutoSize = True
|
||||
Me.Label3.Location = New System.Drawing.Point(24, 78)
|
||||
Me.Label3.Name = "Label3"
|
||||
Me.Label3.Size = New System.Drawing.Size(96, 13)
|
||||
Me.Label3.TabIndex = 22
|
||||
Me.Label3.Text = "Re type Password:"
|
||||
'
|
||||
'cmb_userType
|
||||
'
|
||||
Me.cmb_userType.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
|
||||
Me.cmb_userType.Enabled = False
|
||||
Me.cmb_userType.FormattingEnabled = True
|
||||
Me.cmb_userType.Items.AddRange(New Object() {"", "Administrator", "Engineer", "Guest", "Operator", "Quality Control", "PPC"})
|
||||
Me.cmb_userType.Location = New System.Drawing.Point(124, 154)
|
||||
Me.cmb_userType.Name = "cmb_userType"
|
||||
Me.cmb_userType.Size = New System.Drawing.Size(159, 21)
|
||||
Me.cmb_userType.TabIndex = 5
|
||||
'
|
||||
'cbActive
|
||||
'
|
||||
Me.cbActive.AutoSize = True
|
||||
Me.cbActive.Enabled = False
|
||||
Me.cbActive.Location = New System.Drawing.Point(298, 24)
|
||||
Me.cbActive.Name = "cbActive"
|
||||
Me.cbActive.Size = New System.Drawing.Size(56, 17)
|
||||
Me.cbActive.TabIndex = 6
|
||||
Me.cbActive.Text = "Active"
|
||||
Me.cbActive.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Label5
|
||||
'
|
||||
Me.Label5.AutoSize = True
|
||||
Me.Label5.Location = New System.Drawing.Point(60, 159)
|
||||
Me.Label5.Name = "Label5"
|
||||
Me.Label5.Size = New System.Drawing.Size(56, 13)
|
||||
Me.Label5.TabIndex = 8
|
||||
Me.Label5.Text = "UserType:"
|
||||
'
|
||||
'txtPassword
|
||||
'
|
||||
Me.txtPassword.Enabled = False
|
||||
Me.txtPassword.Location = New System.Drawing.Point(124, 48)
|
||||
Me.txtPassword.Name = "txtPassword"
|
||||
Me.txtPassword.PasswordChar = Global.Microsoft.VisualBasic.ChrW(42)
|
||||
Me.txtPassword.Size = New System.Drawing.Size(159, 20)
|
||||
Me.txtPassword.TabIndex = 1
|
||||
'
|
||||
'txtUsername
|
||||
'
|
||||
Me.txtUsername.Enabled = False
|
||||
Me.txtUsername.Location = New System.Drawing.Point(124, 21)
|
||||
Me.txtUsername.Name = "txtUsername"
|
||||
Me.txtUsername.Size = New System.Drawing.Size(159, 20)
|
||||
Me.txtUsername.TabIndex = 0
|
||||
'
|
||||
'Label2
|
||||
'
|
||||
Me.Label2.AutoSize = True
|
||||
Me.Label2.Location = New System.Drawing.Point(62, 51)
|
||||
Me.Label2.Name = "Label2"
|
||||
Me.Label2.Size = New System.Drawing.Size(56, 13)
|
||||
Me.Label2.TabIndex = 1
|
||||
Me.Label2.Text = "Password:"
|
||||
'
|
||||
'Label1
|
||||
'
|
||||
Me.Label1.AutoSize = True
|
||||
Me.Label1.Location = New System.Drawing.Point(62, 24)
|
||||
Me.Label1.Name = "Label1"
|
||||
Me.Label1.Size = New System.Drawing.Size(58, 13)
|
||||
Me.Label1.TabIndex = 0
|
||||
Me.Label1.Text = "Username:"
|
||||
'
|
||||
'btn_find
|
||||
'
|
||||
Me.btn_find.Location = New System.Drawing.Point(296, 19)
|
||||
Me.btn_find.Name = "btn_find"
|
||||
Me.btn_find.Size = New System.Drawing.Size(75, 23)
|
||||
Me.btn_find.TabIndex = 7
|
||||
Me.btn_find.Text = "GO"
|
||||
Me.btn_find.UseVisualStyleBackColor = True
|
||||
'
|
||||
'ts_new
|
||||
'
|
||||
Me.ts_new.Image = CType(resources.GetObject("ts_new.Image"), System.Drawing.Image)
|
||||
Me.ts_new.ImageTransparentColor = System.Drawing.Color.Magenta
|
||||
Me.ts_new.Name = "ts_new"
|
||||
Me.ts_new.Size = New System.Drawing.Size(56, 22)
|
||||
Me.ts_new.Text = "Insert"
|
||||
'
|
||||
'ToolStripSeparator1
|
||||
'
|
||||
Me.ToolStripSeparator1.Name = "ToolStripSeparator1"
|
||||
Me.ToolStripSeparator1.Size = New System.Drawing.Size(6, 25)
|
||||
'
|
||||
'ts_edit
|
||||
'
|
||||
Me.ts_edit.Image = CType(resources.GetObject("ts_edit.Image"), System.Drawing.Image)
|
||||
Me.ts_edit.ImageTransparentColor = System.Drawing.Color.Magenta
|
||||
Me.ts_edit.Name = "ts_edit"
|
||||
Me.ts_edit.Size = New System.Drawing.Size(62, 22)
|
||||
Me.ts_edit.Text = "Update"
|
||||
'
|
||||
'ToolStripSeparator2
|
||||
'
|
||||
Me.ToolStripSeparator2.Name = "ToolStripSeparator2"
|
||||
Me.ToolStripSeparator2.Size = New System.Drawing.Size(6, 25)
|
||||
'
|
||||
'ts_delete
|
||||
'
|
||||
Me.ts_delete.Image = CType(resources.GetObject("ts_delete.Image"), System.Drawing.Image)
|
||||
Me.ts_delete.ImageTransparentColor = System.Drawing.Color.Magenta
|
||||
Me.ts_delete.Name = "ts_delete"
|
||||
Me.ts_delete.Size = New System.Drawing.Size(58, 22)
|
||||
Me.ts_delete.Text = "Delete"
|
||||
'
|
||||
'ToolStripSeparator3
|
||||
'
|
||||
Me.ToolStripSeparator3.Name = "ToolStripSeparator3"
|
||||
Me.ToolStripSeparator3.Size = New System.Drawing.Size(6, 25)
|
||||
'
|
||||
'ts_find
|
||||
'
|
||||
Me.ts_find.Image = CType(resources.GetObject("ts_find.Image"), System.Drawing.Image)
|
||||
Me.ts_find.ImageTransparentColor = System.Drawing.Color.Magenta
|
||||
Me.ts_find.Name = "ts_find"
|
||||
Me.ts_find.Size = New System.Drawing.Size(47, 22)
|
||||
Me.ts_find.Text = "Find"
|
||||
'
|
||||
'ToolStripSeparator4
|
||||
'
|
||||
Me.ToolStripSeparator4.Name = "ToolStripSeparator4"
|
||||
Me.ToolStripSeparator4.Size = New System.Drawing.Size(6, 25)
|
||||
'
|
||||
'ts_save
|
||||
'
|
||||
Me.ts_save.Enabled = False
|
||||
Me.ts_save.Image = CType(resources.GetObject("ts_save.Image"), System.Drawing.Image)
|
||||
Me.ts_save.ImageTransparentColor = System.Drawing.Color.Magenta
|
||||
Me.ts_save.Name = "ts_save"
|
||||
Me.ts_save.Size = New System.Drawing.Size(77, 22)
|
||||
Me.ts_save.Text = "Save Data"
|
||||
'
|
||||
'ToolStrip1
|
||||
'
|
||||
Me.ToolStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ts_new, Me.ToolStripSeparator1, Me.ts_edit, Me.ToolStripSeparator2, Me.ts_delete, Me.ToolStripSeparator3, Me.ts_revert, Me.ToolStripSeparator5, Me.ts_save, Me.ToolStripSeparator4, Me.ts_find})
|
||||
Me.ToolStrip1.Location = New System.Drawing.Point(0, 0)
|
||||
Me.ToolStrip1.Name = "ToolStrip1"
|
||||
Me.ToolStrip1.Size = New System.Drawing.Size(512, 25)
|
||||
Me.ToolStrip1.TabIndex = 3
|
||||
'
|
||||
'ts_revert
|
||||
'
|
||||
Me.ts_revert.Enabled = False
|
||||
Me.ts_revert.Image = CType(resources.GetObject("ts_revert.Image"), System.Drawing.Image)
|
||||
Me.ts_revert.ImageTransparentColor = System.Drawing.Color.Magenta
|
||||
Me.ts_revert.Name = "ts_revert"
|
||||
Me.ts_revert.Size = New System.Drawing.Size(60, 22)
|
||||
Me.ts_revert.Text = "Revert"
|
||||
'
|
||||
'ToolStripSeparator5
|
||||
'
|
||||
Me.ToolStripSeparator5.Name = "ToolStripSeparator5"
|
||||
Me.ToolStripSeparator5.Size = New System.Drawing.Size(6, 25)
|
||||
'
|
||||
'userForm
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.ClientSize = New System.Drawing.Size(512, 217)
|
||||
Me.ControlBox = False
|
||||
Me.Controls.Add(Me.GroupBox1)
|
||||
Me.Controls.Add(Me.ToolStrip1)
|
||||
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedSingle
|
||||
Me.Name = "userForm"
|
||||
Me.StartPosition = System.Windows.Forms.FormStartPosition.Manual
|
||||
Me.Text = "User Maintenance"
|
||||
Me.GroupBox1.ResumeLayout(False)
|
||||
Me.GroupBox1.PerformLayout()
|
||||
Me.ToolStrip1.ResumeLayout(False)
|
||||
Me.ToolStrip1.PerformLayout()
|
||||
Me.ResumeLayout(False)
|
||||
Me.PerformLayout()
|
||||
|
||||
End Sub
|
||||
Friend WithEvents GroupBox1 As System.Windows.Forms.GroupBox
|
||||
Friend WithEvents cmb_userType As System.Windows.Forms.ComboBox
|
||||
Friend WithEvents cbActive As System.Windows.Forms.CheckBox
|
||||
Friend WithEvents Label5 As System.Windows.Forms.Label
|
||||
Friend WithEvents txtPassword As System.Windows.Forms.TextBox
|
||||
Friend WithEvents txtUsername As System.Windows.Forms.TextBox
|
||||
Friend WithEvents Label2 As System.Windows.Forms.Label
|
||||
Friend WithEvents Label1 As System.Windows.Forms.Label
|
||||
Friend WithEvents ts_new As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents ToolStripSeparator1 As System.Windows.Forms.ToolStripSeparator
|
||||
Friend WithEvents ts_edit As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents ToolStripSeparator2 As System.Windows.Forms.ToolStripSeparator
|
||||
Friend WithEvents ts_delete As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents ToolStripSeparator3 As System.Windows.Forms.ToolStripSeparator
|
||||
Friend WithEvents ts_find As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents ToolStripSeparator4 As System.Windows.Forms.ToolStripSeparator
|
||||
Friend WithEvents ts_save As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents ToolStrip1 As System.Windows.Forms.ToolStrip
|
||||
Friend WithEvents btn_find As System.Windows.Forms.Button
|
||||
Friend WithEvents ts_revert As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents ToolStripSeparator5 As System.Windows.Forms.ToolStripSeparator
|
||||
Friend WithEvents cmbPlant As System.Windows.Forms.ComboBox
|
||||
Friend WithEvents Label4 As System.Windows.Forms.Label
|
||||
Friend WithEvents txtPassword2 As System.Windows.Forms.TextBox
|
||||
Friend WithEvents Label3 As System.Windows.Forms.Label
|
||||
Friend WithEvents cmbAccount As System.Windows.Forms.ComboBox
|
||||
Friend WithEvents Label6 As System.Windows.Forms.Label
|
||||
End Class
|
@ -0,0 +1,546 @@
|
||||
Imports System
|
||||
Imports System.Data
|
||||
Imports System.Data.SqlClient
|
||||
Imports System.IO
|
||||
Imports System.Security
|
||||
Imports System.Security.Cryptography
|
||||
Imports System.Text
|
||||
Public Class Sequence
|
||||
Private _ksqsequence As String
|
||||
Private _ksqmodel As String
|
||||
Private _ksqpcbside As String
|
||||
Private _ksqpartno As String
|
||||
Private _ksqmachine As String
|
||||
Private _ksqrevision As String
|
||||
Private _ksqtopsdloc As String
|
||||
Private _ksqfsbsqty As String
|
||||
Private _ksqdesc1 As String
|
||||
Private _ksqdesc2 As String
|
||||
Private _ksqtopmark As String
|
||||
Private _ksqmodule As String
|
||||
Private _ksqfeeder As String
|
||||
Private _ksqfeederType As String
|
||||
Private _ksqprepby As String
|
||||
Private _ksqupdtime As String
|
||||
Private _ksqcheckby As String
|
||||
Private _ksqchkdate As String
|
||||
Private _ksqremarks As String
|
||||
Private _ksqStatus As Integer
|
||||
Private cnstr As String
|
||||
|
||||
#Region "Properties"
|
||||
Public Property sequence() As String
|
||||
Get
|
||||
Return _ksqsequence
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_ksqsequence = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property model() As String
|
||||
Get
|
||||
Return _ksqmodel
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_ksqmodel = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property pcbside() As String
|
||||
Get
|
||||
Return _ksqpcbside
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_ksqpcbside = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property partno() As String
|
||||
Get
|
||||
Return _ksqpartno
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_ksqpartno = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property machine() As String
|
||||
Get
|
||||
Return _ksqmachine
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_ksqmachine = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property revision() As String
|
||||
Get
|
||||
Return _ksqrevision
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_ksqrevision = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property topsdloc() As String
|
||||
Get
|
||||
Return _ksqtopsdloc
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_ksqtopsdloc = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property fsbsqty() As String
|
||||
Get
|
||||
Return _ksqfsbsqty
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_ksqfsbsqty = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property desc1() As String
|
||||
Get
|
||||
Return _ksqdesc1
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_ksqdesc1 = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property desc2() As String
|
||||
Get
|
||||
Return _ksqdesc2
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_ksqdesc2 = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property topmark() As String
|
||||
Get
|
||||
Return _ksqtopmark
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_ksqtopmark = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property modules() As String
|
||||
Get
|
||||
Return _ksqmodule
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_ksqmodule = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property feeder() As String
|
||||
Get
|
||||
Return _ksqfeeder
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_ksqfeeder = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property feederType() As String
|
||||
Get
|
||||
Return _ksqfeederType
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_ksqfeederType = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property prepby() As String
|
||||
Get
|
||||
Return _ksqprepby
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_ksqprepby = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property updtime() As String
|
||||
Get
|
||||
Return _ksqupdtime
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_ksqupdtime = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property checkby() As String
|
||||
Get
|
||||
Return _ksqcheckby
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_ksqcheckby = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property chkdate() As String
|
||||
Get
|
||||
Return _ksqchkdate
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_ksqchkdate = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property remarks() As String
|
||||
Get
|
||||
Return _ksqremarks
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_ksqremarks = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property status() As Integer
|
||||
Get
|
||||
Return _ksqStatus
|
||||
End Get
|
||||
Set(ByVal value As Integer)
|
||||
_ksqStatus = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
#End Region
|
||||
|
||||
#Region "Methods"
|
||||
Public Sub New()
|
||||
cnstr = mainForm.cnstr
|
||||
End Sub
|
||||
|
||||
Public Function addHeader() As Boolean
|
||||
Dim conn As New SqlConnection(cnstr)
|
||||
|
||||
Dim myQuery As String
|
||||
myQuery = "INSERT INTO KSEQUENCE_HEADER " & _
|
||||
"VALUES(" & "'" & _ksqsequence & "'," & _
|
||||
"'" & _ksqrevision & "'," & _
|
||||
"'" & _ksqmachine & "'," & _
|
||||
"'" & _ksqpcbside & "'," & _
|
||||
"'" & _ksqprepby & "'," & _
|
||||
"'" & _ksqcheckby & "'," & _
|
||||
"'" & _ksqchkdate & "'," & _
|
||||
"'" & _ksqmodel & "'," & _
|
||||
"'" & DateTime.Now & "'," & _
|
||||
"0" & ")"
|
||||
|
||||
Dim mycommand As SqlCommand
|
||||
mycommand = New SqlCommand(myQuery, conn)
|
||||
|
||||
Try
|
||||
conn.Open()
|
||||
mycommand.ExecuteNonQuery()
|
||||
addHeader = True
|
||||
Catch ex As Exception
|
||||
MessageBox.Show(ex.Message, "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
|
||||
addHeader = False
|
||||
Exit Function
|
||||
Finally
|
||||
conn.Close()
|
||||
conn.Dispose()
|
||||
End Try
|
||||
End Function
|
||||
|
||||
Public Function addDetail() As Boolean
|
||||
Dim conn As New SqlConnection(cnstr)
|
||||
|
||||
Dim myQuery As String
|
||||
myQuery = "INSERT INTO KSEQUENCE_DETAIL " & _
|
||||
"VALUES(" & "'" & _ksqsequence & "'," & _
|
||||
"'" & _ksqrevision & "'," & _
|
||||
"'" & _ksqmodule & "'," & _
|
||||
"'" & _ksqfeeder & "'," & _
|
||||
"'" & _ksqfeederType & "'," & _
|
||||
"'" & _ksqpartno & "'," & _
|
||||
"'" & _ksqtopsdloc & "'," & _
|
||||
"'" & _ksqfsbsqty & "'," & _
|
||||
"'" & _ksqdesc1 & "'," & _
|
||||
"'" & _ksqdesc2 & "'," & _
|
||||
"'" & _ksqtopmark & "'," & _
|
||||
"'" & _ksqremarks & "')"
|
||||
|
||||
Dim mycommand As SqlCommand
|
||||
mycommand = New SqlCommand(myQuery, conn)
|
||||
|
||||
Try
|
||||
conn.Open()
|
||||
mycommand.ExecuteNonQuery()
|
||||
addDetail = True
|
||||
Catch ex As Exception
|
||||
MessageBox.Show(ex.Message, "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
|
||||
addDetail = False
|
||||
Exit Function
|
||||
Finally
|
||||
conn.Close()
|
||||
conn.Dispose()
|
||||
End Try
|
||||
End Function
|
||||
|
||||
Public Sub deleteHeader()
|
||||
Dim conn As New SqlConnection(cnstr)
|
||||
|
||||
Dim myQuery As String
|
||||
myQuery = "DELETE FROM KSEQUENCE_HEADER" & _
|
||||
" WHERE KSEQUENCE = '" & Me.sequence & "'" & _
|
||||
" AND KSQREVISION = '" & Me.revision & "'"
|
||||
|
||||
Dim mycommand As SqlCommand
|
||||
mycommand = New SqlCommand(myQuery, conn)
|
||||
|
||||
Try
|
||||
conn.Open()
|
||||
mycommand.ExecuteNonQuery()
|
||||
Catch ex As Exception
|
||||
MessageBox.Show(ex.Message, "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
|
||||
Exit Sub
|
||||
Finally
|
||||
conn.Close()
|
||||
conn.Dispose()
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
Public Sub deleteDetail()
|
||||
Dim conn As New SqlConnection(cnstr)
|
||||
|
||||
Dim myQuery As String
|
||||
myQuery = "DELETE FROM KSEQUENCE_DETAIL" & _
|
||||
" WHERE KSEQUENCE = '" & Me.sequence & "'" & _
|
||||
" AND KSQREVISION = '" & Me.revision & "'"
|
||||
|
||||
Dim mycommand As SqlCommand
|
||||
mycommand = New SqlCommand(myQuery, conn)
|
||||
|
||||
Try
|
||||
conn.Open()
|
||||
mycommand.ExecuteNonQuery()
|
||||
Catch ex As Exception
|
||||
MessageBox.Show(ex.Message, "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
|
||||
Exit Sub
|
||||
Finally
|
||||
conn.Close()
|
||||
conn.Dispose()
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
Public Function verify(ByVal partNo As String, ByVal sqModule As String, ByVal feeder As String) As Boolean
|
||||
Dim conn As New SqlConnection(cnstr)
|
||||
Dim status As Boolean = False
|
||||
|
||||
Dim myQuery As String
|
||||
myQuery = "SELECT * FROM KSEQUENCE_DETAIL" & _
|
||||
" WHERE KSEQUENCE = '" & Me.sequence & "'" & _
|
||||
" AND KSQREVISION = '" & Me.revision & "'" & _
|
||||
" AND KSQPARTNO = '" & partNo & "'" & _
|
||||
" AND KSQMODULE = '" & sqModule & "'" & _
|
||||
" AND KSQFEEDERNO = '" & feeder & "'"
|
||||
|
||||
|
||||
Dim mycommand As SqlCommand
|
||||
mycommand = New SqlCommand(myQuery, conn)
|
||||
|
||||
Try
|
||||
conn.Open()
|
||||
Dim reader As SqlDataReader = mycommand.ExecuteReader
|
||||
If reader.HasRows Then
|
||||
status = True
|
||||
End If
|
||||
Catch ex As Exception
|
||||
MessageBox.Show(ex.Message, "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
|
||||
Finally
|
||||
conn.Close()
|
||||
conn.Dispose()
|
||||
End Try
|
||||
Return status
|
||||
End Function
|
||||
|
||||
Public Function approve() As Boolean
|
||||
Dim conn As New SqlConnection(cnstr)
|
||||
Dim approved As Boolean = False
|
||||
|
||||
Dim myQuery As String
|
||||
myQuery = "UPDATE KSEQUENCE_HEADER SET KSQSTATUS = 1," & _
|
||||
"KSQCHECKBY = '" & Me.checkby & "'," & _
|
||||
"KSQCHKDATE = '" & Me.chkdate & "'" & _
|
||||
" WHERE KSEQUENCE = '" & Me.sequence & "'" & _
|
||||
" AND KSQREVISION = '" & Me.revision & "'"
|
||||
|
||||
Dim mycommand As SqlCommand
|
||||
mycommand = New SqlCommand(myQuery, conn)
|
||||
|
||||
Try
|
||||
conn.Open()
|
||||
mycommand.ExecuteNonQuery()
|
||||
approved = 1
|
||||
Catch ex As Exception
|
||||
MessageBox.Show(ex.Message, "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
|
||||
Finally
|
||||
conn.Close()
|
||||
conn.Dispose()
|
||||
End Try
|
||||
Return approved
|
||||
End Function
|
||||
|
||||
Public Function disApprove() As Boolean
|
||||
Dim conn As New SqlConnection(cnstr)
|
||||
Dim myQuery As String
|
||||
|
||||
myQuery = "UPDATE KSEQUENCE_HEADER SET KSQSTATUS = 0," & _
|
||||
"KSQCHECKBY = '" & Me.checkby & "'," & _
|
||||
"KSQCHKDATE = '" & Me.chkdate & "'" & _
|
||||
" WHERE KSEQUENCE = '" & Me.sequence & "'" & _
|
||||
" AND KSQREVISION = '" & Me.revision & "'"
|
||||
|
||||
Dim mycommand As SqlCommand
|
||||
mycommand = New SqlCommand(myQuery, conn)
|
||||
|
||||
Try
|
||||
conn.Open()
|
||||
mycommand.ExecuteNonQuery()
|
||||
disApprove = 1
|
||||
Catch ex As Exception
|
||||
MessageBox.Show(ex.Message, "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
|
||||
Finally
|
||||
conn.Close()
|
||||
conn.Dispose()
|
||||
End Try
|
||||
End Function
|
||||
|
||||
Public Function getValidSequence() As List(Of String)
|
||||
Dim sequenceList As New List(Of String)
|
||||
Dim conn As New SqlConnection(cnstr)
|
||||
|
||||
Dim myQuery As String
|
||||
myQuery = "SELECT * FROM KSEQUENCE_HEADER" & _
|
||||
" WHERE KSQSTATUS = 1" & _
|
||||
" ORDER BY KSEQUENCE"
|
||||
|
||||
Dim mycommand As SqlCommand
|
||||
mycommand = New SqlCommand(myQuery, conn)
|
||||
|
||||
Try
|
||||
conn.Open()
|
||||
Dim reader As SqlDataReader = mycommand.ExecuteReader()
|
||||
While reader.Read
|
||||
sequenceList.Add(reader("KSEQUENCE"))
|
||||
End While
|
||||
conn.Close()
|
||||
Catch ex As Exception
|
||||
MessageBox.Show(ex.Message, "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
|
||||
conn.Close()
|
||||
End Try
|
||||
Return sequenceList
|
||||
End Function
|
||||
|
||||
Public Function getAllSequence() As List(Of String)
|
||||
Dim sequenceList As New List(Of String)
|
||||
Dim conn As New SqlConnection(cnstr)
|
||||
|
||||
Dim myQuery As String
|
||||
myQuery = "SELECT * FROM KSEQUENCE_HEADER"
|
||||
|
||||
Dim mycommand As SqlCommand
|
||||
mycommand = New SqlCommand(myQuery, conn)
|
||||
|
||||
Try
|
||||
conn.Open()
|
||||
Dim reader As SqlDataReader = mycommand.ExecuteReader()
|
||||
While reader.Read
|
||||
sequenceList.Add(reader("KSEQUENCE"))
|
||||
End While
|
||||
conn.Close()
|
||||
Catch ex As Exception
|
||||
MessageBox.Show(ex.Message, "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
|
||||
conn.Close()
|
||||
End Try
|
||||
Return sequenceList
|
||||
End Function
|
||||
|
||||
Public Function getRevisions(ByVal sequence As String) As List(Of String)
|
||||
Dim revList As New List(Of String)
|
||||
Dim conn As New SqlConnection(cnstr)
|
||||
|
||||
Dim myQuery As String
|
||||
myQuery = "SELECT DISTINCT KSQREVISION FROM KSEQUENCE_HEADER " & _
|
||||
"WHERE KSEQUENCE = '" & sequence & "' " & _
|
||||
"ORDER BY KSQREVISION"
|
||||
|
||||
Dim mycommand As SqlCommand
|
||||
mycommand = New SqlCommand(myQuery, conn)
|
||||
|
||||
Try
|
||||
conn.Open()
|
||||
Dim reader As SqlDataReader = mycommand.ExecuteReader()
|
||||
While reader.Read
|
||||
revList.Add(reader("KSQREVISION"))
|
||||
End While
|
||||
conn.Close()
|
||||
Catch ex As Exception
|
||||
MessageBox.Show(ex.Message, "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
|
||||
conn.Close()
|
||||
End Try
|
||||
Return revList
|
||||
End Function
|
||||
|
||||
Public Function isVerified(ByVal sequence As String, ByVal revision As String) As Boolean
|
||||
Dim conn As New SqlConnection(cnstr)
|
||||
|
||||
Dim myQuery As String
|
||||
myQuery = "SELECT KSQSTATUS FROM KSEQUENCE_HEADER" & _
|
||||
" WHERE KSEQUENCE = '" & sequence & "'" & _
|
||||
" AND KSQREVISION = '" & revision & "'"
|
||||
|
||||
Dim mycommand As SqlCommand
|
||||
mycommand = New SqlCommand(myQuery, conn)
|
||||
|
||||
Try
|
||||
conn.Open()
|
||||
Dim reader As SqlDataReader = mycommand.ExecuteReader()
|
||||
reader.Read()
|
||||
If reader("KSQSTATUS") = 1 Then
|
||||
isVerified = True
|
||||
Else
|
||||
isVerified = False
|
||||
End If
|
||||
conn.Close()
|
||||
Catch ex As Exception
|
||||
MessageBox.Show(ex.Message, "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
|
||||
conn.Close()
|
||||
End Try
|
||||
End Function
|
||||
|
||||
Public Function verificationDetails(ByVal sequence As String, ByVal revision As String) As List(Of String)
|
||||
Dim verDetails As New List(Of String)
|
||||
Dim conn As New SqlConnection(cnstr)
|
||||
|
||||
Dim myQuery As String
|
||||
myQuery = "SELECT * FROM KSEQUENCE_HEADER" & _
|
||||
" WHERE KSEQUENCE = '" & sequence & "'" & _
|
||||
" AND KSQREVISION = '" & revision & "'"
|
||||
|
||||
Dim mycommand As SqlCommand
|
||||
mycommand = New SqlCommand(myQuery, conn)
|
||||
|
||||
Try
|
||||
conn.Open()
|
||||
Dim reader As SqlDataReader = mycommand.ExecuteReader()
|
||||
While reader.Read
|
||||
verDetails.Add(reader("KSQCHECKBY"))
|
||||
verDetails.Add(reader("KSQCHKDATE"))
|
||||
End While
|
||||
conn.Close()
|
||||
Catch ex As Exception
|
||||
MessageBox.Show(ex.Message, "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
|
||||
conn.Close()
|
||||
End Try
|
||||
Return verDetails
|
||||
End Function
|
||||
#End Region
|
||||
End Class
|
@ -0,0 +1,120 @@
|
||||
<?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.Runtime.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:import namespace="http://www.w3.org/XML/1998/namespace" />
|
||||
<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" use="required" type="xsd:string" />
|
||||
<xsd:attribute name="type" type="xsd:string" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</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" use="required" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</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>
|
Some files were not shown because too many files have changed in this diff Show More
Loading…
Reference in New Issue
Block a user