Initial
This commit is contained in:
265
EDOKA/OnDemand/frmColdViewerx.resx
Normal file
265
EDOKA/OnDemand/frmColdViewerx.resx
Normal file
@@ -0,0 +1,265 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 1.3
|
||||
|
||||
The primary goals of this format is to allow a simple XML format
|
||||
that is mostly human readable. The generation and parsing of the
|
||||
various data types are done through the TypeConverter classes
|
||||
associated with the data types.
|
||||
|
||||
Example:
|
||||
|
||||
... ado.net/XML headers & schema ...
|
||||
<resheader name="resmimetype">text/microsoft-resx</resheader>
|
||||
<resheader name="version">1.3</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1">this is my long string</data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
[base64 mime encoded serialized .NET Framework object]
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
[base64 mime encoded string representing a byte array form of the .NET Framework object]
|
||||
</data>
|
||||
|
||||
There are any number of "resheader" rows that contain simple
|
||||
name/value pairs.
|
||||
|
||||
Each data row contains a name, and value. The row also contains a
|
||||
type or mimetype. Type corresponds to a .NET class that support
|
||||
text/value conversion through the TypeConverter architecture.
|
||||
Classes that don't support this are serialized and stored with the
|
||||
mimetype set.
|
||||
|
||||
The mimetype is used for serialized objects, and tells the
|
||||
ResXResourceReader how to depersist the object. This is currently not
|
||||
extensible. For a given mimetype the value must be set accordingly:
|
||||
|
||||
Note - application/x-microsoft.net.object.binary.base64 is the format
|
||||
that the ResXResourceWriter will generate, however the reader can
|
||||
read any of the formats listed below.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.binary.base64
|
||||
value : The object must be serialized with
|
||||
: System.Serialization.Formatters.Binary.BinaryFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.soap.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
mimetype: application/x-microsoft.net.object.bytearray.base64
|
||||
value : The object must be serialized into a byte array
|
||||
: using a System.ComponentModel.TypeConverter
|
||||
: and then encoded with base64 encoding.
|
||||
-->
|
||||
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="data">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="resheader">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:choice>
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:schema>
|
||||
<resheader name="resmimetype">
|
||||
<value>text/microsoft-resx</value>
|
||||
</resheader>
|
||||
<resheader name="version">
|
||||
<value>1.3</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<data name="ToolBar1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="ToolBtnExit.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="ToolBarButton1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="ToolBarButton2.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="ToolBarButton3.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="ToolBarButton4.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="ToolBarButton5.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="ToolBarButton6.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="ToolBarButton7.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="ToolBarButton8.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="ToolBarButton9.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="ToolBarButton10.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="ToolBarButton11.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="ToolBarButton12.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="ImageList1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="ImageList1.Location" type="System.Drawing.Point, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>17, 17</value>
|
||||
</data>
|
||||
<data name="ImageList1.ImageStream" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>
|
||||
AAEAAAD/////AQAAAAAAAAAMAgAAAFpTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj0xLjAuMzMw
|
||||
MC4wLCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZT
|
||||
eXN0ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMA
|
||||
AACYDgAAAk1TRnQBSQFMAgEBDAEAAQ4BAAEEAQABEAEAARABAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQC
|
||||
AAEoAwABQAMAAUADAAEBAQABCAYAARAYAAGAAgABgAMAAoABAAGAAwABgAEAAYABAAKAAgADwAEAAcAB
|
||||
3AHAAQAB8AHKAaYBAAEzBQABMwEAATMBAAEzAQACMwIAAxYBAAMcAQADIgEAAykBAANVAQADTQEAA0IB
|
||||
AAM5AQABgAF8Af8BAAJQAf8BAAGTAQAB1gEAAf8B7AHMAQABxgHWAe8BAAHWAucBAAGQAakBrQIAAf8B
|
||||
MwMAAWYDAAGZAwABzAIAATMDAAIzAgABMwFmAgABMwGZAgABMwHMAgABMwH/AgABZgMAAWYBMwIAAmYC
|
||||
AAFmAZkCAAFmAcwCAAFmAf8CAAGZAwABmQEzAgABmQFmAgACmQIAAZkBzAIAAZkB/wIAAcwDAAHMATMC
|
||||
AAHMAWYCAAHMAZkCAALMAgABzAH/AgAB/wFmAgAB/wGZAgAB/wHMAQABMwH/AgAB/wEAATMBAAEzAQAB
|
||||
ZgEAATMBAAGZAQABMwEAAcwBAAEzAQAB/wEAAf8BMwIAAzMBAAIzAWYBAAIzAZkBAAIzAcwBAAIzAf8B
|
||||
AAEzAWYCAAEzAWYBMwEAATMCZgEAATMBZgGZAQABMwFmAcwBAAEzAWYB/wEAATMBmQIAATMBmQEzAQAB
|
||||
MwGZAWYBAAEzApkBAAEzAZkBzAEAATMBmQH/AQABMwHMAgABMwHMATMBAAEzAcwBZgEAATMBzAGZAQAB
|
||||
MwLMAQABMwHMAf8BAAEzAf8BMwEAATMB/wFmAQABMwH/AZkBAAEzAf8BzAEAATMC/wEAAWYDAAFmAQAB
|
||||
MwEAAWYBAAFmAQABZgEAAZkBAAFmAQABzAEAAWYBAAH/AQABZgEzAgABZgIzAQABZgEzAWYBAAFmATMB
|
||||
mQEAAWYBMwHMAQABZgEzAf8BAAJmAgACZgEzAQADZgEAAmYBmQEAAmYBzAEAAWYBmQIAAWYBmQEzAQAB
|
||||
ZgGZAWYBAAFmApkBAAFmAZkBzAEAAWYBmQH/AQABZgHMAgABZgHMATMBAAFmAcwBmQEAAWYCzAEAAWYB
|
||||
zAH/AQABZgH/AgABZgH/ATMBAAFmAf8BmQEAAWYB/wHMAQABzAEAAf8BAAH/AQABzAEAApkCAAGZATMB
|
||||
mQEAAZkBAAGZAQABmQEAAcwBAAGZAwABmQIzAQABmQEAAWYBAAGZATMBzAEAAZkBAAH/AQABmQFmAgAB
|
||||
mQFmATMBAAGZATMBZgEAAZkBZgGZAQABmQFmAcwBAAGZATMB/wEAApkBMwEAApkBZgEAA5kBAAKZAcwB
|
||||
AAKZAf8BAAGZAcwCAAGZAcwBMwEAAWYBzAFmAQABmQHMAZkBAAGZAswBAAGZAcwB/wEAAZkB/wIAAZkB
|
||||
/wEzAQABmQHMAWYBAAGZAf8BmQEAAZkB/wHMAQABmQL/AQABzAMAAZkBAAEzAQABzAEAAWYBAAHMAQAB
|
||||
mQEAAcwBAAHMAQABmQEzAgABzAIzAQABzAEzAWYBAAHMATMBmQEAAcwBMwHMAQABzAEzAf8BAAHMAWYC
|
||||
AAHMAWYBMwEAAZkCZgEAAcwBZgGZAQABzAFmAcwBAAGZAWYB/wEAAcwBmQIAAcwBmQEzAQABzAGZAWYB
|
||||
AAHMApkBAAHMAZkBzAEAAcwBmQH/AQACzAIAAswBMwEAAswBZgEAAswBmQEAA8wBAALMAf8BAAHMAf8C
|
||||
AAHMAf8BMwEAAZkB/wFmAQABzAH/AZkBAAHMAf8BzAEAAcwC/wEAAcwBAAEzAQAB/wEAAWYBAAH/AQAB
|
||||
mQEAAcwBMwIAAf8CMwEAAf8BMwFmAQAB/wEzAZkBAAH/ATMBzAEAAf8BMwH/AQAB/wFmAgAB/wFmATMB
|
||||
AAHMAmYBAAH/AWYBmQEAAf8BZgHMAQABzAFmAf8BAAH/AZkCAAH/AZkBMwEAAf8BmQFmAQAB/wKZAQAB
|
||||
/wGZAcwBAAH/AZkB/wEAAf8BzAIAAf8BzAEzAQAB/wHMAWYBAAH/AcwBmQEAAf8CzAEAAf8BzAH/AQAC
|
||||
/wEzAQABzAH/AWYBAAL/AZkBAAL/AcwBAAJmAf8BAAFmAf8BZgEAAWYC/wEAAf8CZgEAAf8BZgH/AQAC
|
||||
/wFmAQABIQEAAaUBAANfAQADdwEAA4YBAAOWAQADywEAA7IBAAPXAQAD3QEAA+MBAAPqAQAD8QEAA/gB
|
||||
AAHwAfsB/wEAAaQCoAEAA4ADAAH/AgAB/wMAAv8BAAH/AwAB/wEAAf8BAAL/AgAD//8A/wD/AP8AOAAB
|
||||
rgRmAa4BzwVKAZkzAAFJAbUB7wFmAbUB6wYaAUoyAAHvBmYB7wX/AUoxAAFJAWYB7wHxAd0B7wGuAe8B
|
||||
ZgX/AUowAAGZAUkBZgHzBLUBCQFmBOsB/wFKMAABSQFOAWYB8wS1Ad0BZgX/AUowAAFJAU4BZgHzBLUB
|
||||
3QFmAesB/wFzA+swAAFJAXEBZgHvA/MB8QHvAWYC/wHrAf8BSgEaMAABSQFxAe8GZgHvAv8B6wFKARoB
|
||||
STAAAUkBTgZxAZkE6wEaAU4BSTAAAUkBTgJxAv8BcQL/AXEC/wJxAU4BSTAAAZkBSQFOAXEC/wFxAv8B
|
||||
cQL/AXEBTgFJAZkxAAJJCnECSTMAAkkBTgZxAU4CSTUAAkkCTgJxAk4CSTcAAZkGSQGZBAAgByAAAgcI
|
||||
AAgHCAAGByAAAgcBAAX/AQcCAAcHAQAF/wEHAgAFBwMAAewBBwH7AgcBAAPsFAACBwEAAf8BBwH6AQcB
|
||||
/wEHAQABBwEABgcBAAH/AQcB+gEHAf8BBwEAAQcBAAQHAwAB7AP/AfsB/wEAAfsBBwLsEgACBwEAAf8B
|
||||
BwH6AQcB/wEHAQAB/wEHAQAFBwEAAf8BBwH6AQcB/wEHAQAB/wEHAQADBwQAAewB+wP/AfsBAAH/AfsB
|
||||
BwHsEQACBwEABv8FAAQHAQAG/wUAAgcEAAHsAv8B+wL/AQAB/wIAAewRAAIHAQAB/wMAAwcD/wEABAcB
|
||||
AAT/AwcD/wEAAgcFAAHsA/8B+wHsAQAB/wH7AQcRAAIHAQAB/wL8AQQEBwL/AQAEBwEAA/8FBwL/AQAC
|
||||
BwcAAfsD/wH7Av8BBxEAAgcBAAEHAvwBBAUHAf8BAAMHCQACBwH/AQACBwUAAgEBAAH/AfsD/wH7AQcR
|
||||
AAEHAwQC/AMEAQACBwH/AQACBwn5AQACBwH/AQACBwEAAgEDAAEBAQAD/wH7Av8BBxEAAQcI/AEAAgcB
|
||||
/wEAAgcJ+QEAAgcB/wEAAgcBAAH5AQEBAAH5AQABAQMAA/8B+wEHEQABBwX8AwQE/wEAAgcJ+QEAA/8B
|
||||
AAIHAQAC+QIAAvkBAAP/AfsC/wEHEQACBwEAAf8C/AEEAQcF/wEAAgcJ+QT/AQACBwcAAv8B+wP/AfsB
|
||||
BxEAAgcBAAH/AvwBBAb/AQAEBwEACv8BAAIHBQAB7AH/AfsD/wH7Av8BBxEAAgcBAAr/AQAEBwEACv8B
|
||||
AAIHBQAK7BEAAgcMAAQHDAACB0AAIAcGAAEDAf8KAAsTAwAgBwQAAewBAwHsAf8JAAETCbwBEwG8ARMC
|
||||
ACAHAgABAwHsAQMB7AEDAf8IAA0TAbwBEwEACQcB7wGSAuwIBwHsAfcJBwEAAQMB7AEDAewBAwHsAf8B
|
||||
AAHsBgABEwa8A14CvAMTAQAIBwHsAesBEgEAAewIBwEOAesB7AgHAQAB7AEDAewBAwHsAQMB/wEAAewG
|
||||
AAETBrwD7wK8ARMBvAETAQAGBwHtAewBEAEOAgAB7AgHAgABEALsAZIFBwEAAQMB7AEDAgAB7AH/AQAB
|
||||
7AYADRMCvAETBQcB7AESBQAB7AgHBAABQwHqBQcBAAHsAQMB7AIHAQMB/wEAAewBAAEGBAABEwq8ARMB
|
||||
vAETAbwBEwQHAW0HAAHsCAcHAAQHAQABAwHsAQMB7AEDAewB/wIAAQYF/gEAChMBvAETAbwCEwQHAZIB
|
||||
bQYAAewIBwUAAQ8B7AQHAQAB7AEDAewBAwHsAQMB/wEAAW0G/gIAARMI/wETAbwBEwG8ARMHBwFDBAAB
|
||||
7AgHAwABQwHsBgcBAAEDAewBAwHsAQMB7AH/AQAB7AFtAf4EbQMAARMB/wUTAf8EEwEACAcB7wEVAgAB
|
||||
7AgHAgAB7wgHAQAB7AEDAewBAwHsAQMB/wEAAewBAAJtBgABEwj/ARMDAAoHAe8BbQkHAW0KBwEAAQMB
|
||||
7AEDAewBBwH/AewBAAHsAgABbQcAARMB/wUTAf8BEwMAIAcBAAHsAQMBBwH/AewBAAPsCgABEwj/ARMC
|
||||
ACAHAQABBwH/AewBAAXsCwAJEwIAIAcgACAHAUIBTQE+BwABPgMAASgDAAFAAwABQAMAAQEBAAEBBgAB
|
||||
AhYAA/+BAAb/AeABAAP/AX8B/gH/AeABAAH+Aa8E/wHAAQAC/wH9AVUBqgG/AYABAAHwAS8B+QL/AZ8C
|
||||
AAHwAT8B8AEFAaABDwIAAfABLwHgAQcB4AEHAgAB8AE/AcABBQGgAQMCAAHwASsBgAEHAeABAQIAAfAB
|
||||
PwHAAQUBoAEDAgABwAEPAeABBwHgAQcCAAHgAR8B8AEHAeABDwIAAfABPwH5Av8BnwGAAQEB+AF/Af0C
|
||||
/wG/AcABAwH8Bf8B4AEHBv8B8AEPBAAE/wQAAfABDwH+Af8EAAHgAQMB/AF/BAAB4AEBAfgBPwQAAfAB
|
||||
AAHwAR8EAAHwAQAB4AEPBAAB+AEAAcABBwQAAfgBAAHwAT8EAAGQAQAB8AErBgAB8AE/BgAB8AEvBgAB
|
||||
8AE/BAABmAEAAfABLwQAAfgBAAL/BAAB+AEAAf4BrwQABP8B/AF/Av8EAAHwAX8BwAEHBAABwAF/AYAB
|
||||
AwUAAR8BAAEBBQABHwEAAQEFAAEXAQABAQUAAQcQAAGABwABwAcAAeABAQUAAQcB4AEHBQABFwHwAQcF
|
||||
AAEfAfABAwUAAR8B+AEDBQABHwL/BAAL
|
||||
</value>
|
||||
</data>
|
||||
<data name="PrintDocument1.Location" type="System.Drawing.Point, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>123, 17</value>
|
||||
</data>
|
||||
<data name="PrintDocument1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="NoteLabel.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="Panel1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="OnDemand.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="OnDemand.OcxState" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>
|
||||
AAEAAAD/////AQAAAAAAAAAMAgAAAFpTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj0xLjAuMzMw
|
||||
MC4wLCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACFT
|
||||
eXN0ZW0uV2luZG93cy5Gb3Jtcy5BeEhvc3QrU3RhdGUBAAAABERhdGEHAgIAAAAJAwAAAA8DAAAAJQAA
|
||||
AAIBAAAAAQAAAAAAAAAAAAAAABAAAAAAAAEAKlUAACg2AAAAAAAACw==
|
||||
</value>
|
||||
</data>
|
||||
<data name="$this.Name">
|
||||
<value>frmcoldviewer</value>
|
||||
</data>
|
||||
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
AAABAAIAICAQAAAAAADoAgAAJgAAABAQEAAAAAAAKAEAAA4DAAAoAAAAIAAAAEAAAAABAAQAAAAAAIAC
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgAAAgAAAAICAAIAAAACAAIAAgIAAAICAgADAwMAAAAD/AAD/
|
||||
AAAA//8A/wAAAP8A/wD//wAA////AP/////////////////////////////w///////////////////w
|
||||
Dw//////////////////D//w////////////////8P///w//////////////8A/////w////////////
|
||||
/w///////w////////////D////////w//////////AP/////////w////////8P///////////w////
|
||||
///w////////////8P///////w////////////8P///////w////////////8P///////w//////////
|
||||
//8P///////w////////////8P///////w////////////8P///////w////////////8P///////w//
|
||||
//////////8P///////w////////////8P//////8P////////////8P//////8P//////////8A////
|
||||
////8P/////////w//////////8P///////wD///////////8P//////D/////////////8P////AP//
|
||||
////////////8P//8P////////////////8P8A//////////////////8A///////////////////wD/
|
||||
//////////////////D/////////////////////////////////////////////////////AAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAoAAAAEAAAACAAAAABAAQAAAAAAMAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgAAAgAAAAICAAIAA
|
||||
AACAAIAAgIAAAICAgADAwMAAAAD/AAD/AAAA//8A/wAAAP8A/wD//wAA////AP////9P///////4d/eP
|
||||
////+Hf//3j///h3////94//V/+I/4j/eP9X+P+IiIj3j/h/iIiIiI9//4cIiIiI/3H/c3+IiP/4gf8z
|
||||
d4j/j/9/9zf4f4eId//zOP+HiHf///F///h3/////4//////////////////////////////AAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA==
|
||||
</value>
|
||||
</data>
|
||||
</root>
|
||||
771
EDOKA/OnDemand/frmColdViewerx.vb
Normal file
771
EDOKA/OnDemand/frmColdViewerx.vb
Normal file
@@ -0,0 +1,771 @@
|
||||
Imports System.Data
|
||||
Imports System.Data.SqlTypes
|
||||
Imports System.Data.SqlClient
|
||||
Imports System.ComponentModel
|
||||
Imports UtilityLibrary.Win32
|
||||
|
||||
Public Class frmcoldviewer
|
||||
Inherits System.Windows.Forms.Form
|
||||
|
||||
#Region " Vom Windows Form Designer generierter Code "
|
||||
|
||||
Public Sub New()
|
||||
MyBase.New()
|
||||
|
||||
' Dieser Aufruf ist für den Windows Form-Designer erforderlich.
|
||||
InitializeComponent()
|
||||
|
||||
' Initialisierungen nach dem Aufruf InitializeComponent() hinzufügen
|
||||
|
||||
End Sub
|
||||
|
||||
' Die Form überschreibt den Löschvorgang der Basisklasse, um Komponenten zu bereinigen.
|
||||
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
If disposing Then
|
||||
If Not (components Is Nothing) Then
|
||||
components.Dispose()
|
||||
End If
|
||||
End If
|
||||
MyBase.Dispose(disposing)
|
||||
End Sub
|
||||
|
||||
' Für Windows Form-Designer erforderlich
|
||||
Private components As System.ComponentModel.IContainer
|
||||
|
||||
'HINWEIS: Die folgende Prozedur ist für den Windows Form-Designer erforderlich
|
||||
'Sie kann mit dem Windows Form-Designer modifiziert werden.
|
||||
'Verwenden Sie nicht den Code-Editor zur Bearbeitung.
|
||||
Friend WithEvents ToolBar1 As System.Windows.Forms.ToolBar
|
||||
Friend WithEvents ToolBtnExit As System.Windows.Forms.ToolBarButton
|
||||
Friend WithEvents ImageList1 As System.Windows.Forms.ImageList
|
||||
Friend WithEvents ToolBarButton1 As System.Windows.Forms.ToolBarButton
|
||||
Friend WithEvents ToolBarButton2 As System.Windows.Forms.ToolBarButton
|
||||
Friend WithEvents ToolBarButton3 As System.Windows.Forms.ToolBarButton
|
||||
Friend WithEvents PrintDocument1 As System.Drawing.Printing.PrintDocument
|
||||
Friend WithEvents ToolBarButton4 As System.Windows.Forms.ToolBarButton
|
||||
Friend WithEvents ToolBarButton5 As System.Windows.Forms.ToolBarButton
|
||||
Friend WithEvents NoteLabel As System.Windows.Forms.Label
|
||||
Friend WithEvents ToolBarButton6 As System.Windows.Forms.ToolBarButton
|
||||
Friend WithEvents ToolBarButton7 As System.Windows.Forms.ToolBarButton
|
||||
Friend WithEvents ToolBarButton8 As System.Windows.Forms.ToolBarButton
|
||||
Friend WithEvents ToolBarButton9 As System.Windows.Forms.ToolBarButton
|
||||
Friend WithEvents ToolBarButton10 As System.Windows.Forms.ToolBarButton
|
||||
Friend WithEvents ToolBarButton11 As System.Windows.Forms.ToolBarButton
|
||||
Friend WithEvents ToolBarButton12 As System.Windows.Forms.ToolBarButton
|
||||
Friend WithEvents Panel1 As System.Windows.Forms.Panel
|
||||
Friend WithEvents OnDemand As AxARSOLELib.AxArsOle
|
||||
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
|
||||
Me.components = New System.ComponentModel.Container()
|
||||
Dim resources As System.Resources.ResourceManager = New System.Resources.ResourceManager(GetType(frmcoldviewer))
|
||||
Me.ToolBar1 = New System.Windows.Forms.ToolBar()
|
||||
Me.ToolBtnExit = New System.Windows.Forms.ToolBarButton()
|
||||
Me.ToolBarButton1 = New System.Windows.Forms.ToolBarButton()
|
||||
Me.ToolBarButton2 = New System.Windows.Forms.ToolBarButton()
|
||||
Me.ToolBarButton3 = New System.Windows.Forms.ToolBarButton()
|
||||
Me.ToolBarButton4 = New System.Windows.Forms.ToolBarButton()
|
||||
Me.ToolBarButton5 = New System.Windows.Forms.ToolBarButton()
|
||||
Me.ToolBarButton6 = New System.Windows.Forms.ToolBarButton()
|
||||
Me.ToolBarButton7 = New System.Windows.Forms.ToolBarButton()
|
||||
Me.ToolBarButton8 = New System.Windows.Forms.ToolBarButton()
|
||||
Me.ToolBarButton9 = New System.Windows.Forms.ToolBarButton()
|
||||
Me.ToolBarButton10 = New System.Windows.Forms.ToolBarButton()
|
||||
Me.ToolBarButton11 = New System.Windows.Forms.ToolBarButton()
|
||||
Me.ToolBarButton12 = New System.Windows.Forms.ToolBarButton()
|
||||
Me.ImageList1 = New System.Windows.Forms.ImageList(Me.components)
|
||||
Me.PrintDocument1 = New System.Drawing.Printing.PrintDocument()
|
||||
Me.NoteLabel = New System.Windows.Forms.Label()
|
||||
Me.Panel1 = New System.Windows.Forms.Panel()
|
||||
Me.OnDemand = New AxARSOLELib.AxArsOle()
|
||||
Me.Panel1.SuspendLayout()
|
||||
CType(Me.OnDemand, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'ToolBar1
|
||||
'
|
||||
Me.ToolBar1.Buttons.AddRange(New System.Windows.Forms.ToolBarButton() {Me.ToolBtnExit, Me.ToolBarButton1, Me.ToolBarButton2, Me.ToolBarButton3, Me.ToolBarButton4, Me.ToolBarButton5, Me.ToolBarButton6, Me.ToolBarButton7, Me.ToolBarButton8, Me.ToolBarButton9, Me.ToolBarButton10, Me.ToolBarButton11, Me.ToolBarButton12})
|
||||
Me.ToolBar1.DropDownArrows = True
|
||||
Me.ToolBar1.ImageList = Me.ImageList1
|
||||
Me.ToolBar1.Name = "ToolBar1"
|
||||
Me.ToolBar1.ShowToolTips = True
|
||||
Me.ToolBar1.Size = New System.Drawing.Size(824, 25)
|
||||
Me.ToolBar1.TabIndex = 0
|
||||
'
|
||||
'ToolBtnExit
|
||||
'
|
||||
Me.ToolBtnExit.ImageIndex = 0
|
||||
Me.ToolBtnExit.ToolTipText = "Fenster schliessen"
|
||||
'
|
||||
'ToolBarButton1
|
||||
'
|
||||
Me.ToolBarButton1.ImageIndex = 1
|
||||
Me.ToolBarButton1.ToolTipText = "Dokument drucken"
|
||||
'
|
||||
'ToolBarButton2
|
||||
'
|
||||
Me.ToolBarButton2.ImageIndex = 9
|
||||
Me.ToolBarButton2.ToolTipText = "Vorherige Seite"
|
||||
'
|
||||
'ToolBarButton3
|
||||
'
|
||||
Me.ToolBarButton3.ImageIndex = 10
|
||||
Me.ToolBarButton3.ToolTipText = "Nächste Seite"
|
||||
'
|
||||
'ToolBarButton4
|
||||
'
|
||||
Me.ToolBarButton4.ImageIndex = 5
|
||||
Me.ToolBarButton4.ToolTipText = "Ansicht verkleinern"
|
||||
'
|
||||
'ToolBarButton5
|
||||
'
|
||||
Me.ToolBarButton5.ImageIndex = 4
|
||||
Me.ToolBarButton5.ToolTipText = "Ansicht vergrössern"
|
||||
'
|
||||
'ToolBarButton6
|
||||
'
|
||||
Me.ToolBarButton6.ImageIndex = 6
|
||||
Me.ToolBarButton6.Style = System.Windows.Forms.ToolBarButtonStyle.Separator
|
||||
'
|
||||
'ToolBarButton7
|
||||
'
|
||||
Me.ToolBarButton7.ImageIndex = 6
|
||||
Me.ToolBarButton7.Visible = False
|
||||
'
|
||||
'ToolBarButton8
|
||||
'
|
||||
Me.ToolBarButton8.ImageIndex = 6
|
||||
Me.ToolBarButton8.Visible = False
|
||||
'
|
||||
'ToolBarButton9
|
||||
'
|
||||
Me.ToolBarButton9.Style = System.Windows.Forms.ToolBarButtonStyle.Separator
|
||||
'
|
||||
'ToolBarButton10
|
||||
'
|
||||
Me.ToolBarButton10.ImageIndex = 8
|
||||
Me.ToolBarButton10.ToolTipText = "Vorheriges Dokument"
|
||||
'
|
||||
'ToolBarButton11
|
||||
'
|
||||
Me.ToolBarButton11.ImageIndex = 7
|
||||
Me.ToolBarButton11.ToolTipText = "Nächstes Dokument"
|
||||
'
|
||||
'ToolBarButton12
|
||||
'
|
||||
Me.ToolBarButton12.ImageIndex = 11
|
||||
Me.ToolBarButton12.ToolTipText = "Dokument mit COLD-Viewer anzeigen"
|
||||
'
|
||||
'ImageList1
|
||||
'
|
||||
Me.ImageList1.ColorDepth = System.Windows.Forms.ColorDepth.Depth8Bit
|
||||
Me.ImageList1.ImageSize = New System.Drawing.Size(16, 16)
|
||||
Me.ImageList1.ImageStream = CType(resources.GetObject("ImageList1.ImageStream"), System.Windows.Forms.ImageListStreamer)
|
||||
Me.ImageList1.TransparentColor = System.Drawing.Color.Transparent
|
||||
'
|
||||
'NoteLabel
|
||||
'
|
||||
Me.NoteLabel.Location = New System.Drawing.Point(232, 8)
|
||||
Me.NoteLabel.Name = "NoteLabel"
|
||||
Me.NoteLabel.Size = New System.Drawing.Size(216, 16)
|
||||
Me.NoteLabel.TabIndex = 3
|
||||
Me.NoteLabel.Text = "Dokument 1 von 1"
|
||||
'
|
||||
'Panel1
|
||||
'
|
||||
Me.Panel1.Controls.AddRange(New System.Windows.Forms.Control() {Me.OnDemand})
|
||||
Me.Panel1.Dock = System.Windows.Forms.DockStyle.Fill
|
||||
Me.Panel1.Location = New System.Drawing.Point(0, 25)
|
||||
Me.Panel1.Name = "Panel1"
|
||||
Me.Panel1.Size = New System.Drawing.Size(824, 524)
|
||||
Me.Panel1.TabIndex = 4
|
||||
'
|
||||
'OnDemand
|
||||
'
|
||||
Me.OnDemand.ContainingControl = Me
|
||||
Me.OnDemand.Dock = System.Windows.Forms.DockStyle.Fill
|
||||
Me.OnDemand.Enabled = True
|
||||
Me.OnDemand.Name = "OnDemand"
|
||||
Me.OnDemand.OcxState = CType(resources.GetObject("OnDemand.OcxState"), System.Windows.Forms.AxHost.State)
|
||||
Me.OnDemand.Size = New System.Drawing.Size(824, 524)
|
||||
Me.OnDemand.TabIndex = 1
|
||||
'
|
||||
'frmcoldviewer
|
||||
'
|
||||
Me.AutoScaleBaseSize = New System.Drawing.Size(5, 13)
|
||||
Me.AutoScroll = True
|
||||
Me.AutoScrollMargin = New System.Drawing.Size(100, 0)
|
||||
Me.AutoScrollMinSize = New System.Drawing.Size(100, 100)
|
||||
Me.ClientSize = New System.Drawing.Size(824, 549)
|
||||
Me.Controls.AddRange(New System.Windows.Forms.Control() {Me.Panel1, Me.NoteLabel, Me.ToolBar1})
|
||||
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
|
||||
Me.Name = "frmcoldviewer"
|
||||
Me.ShowInTaskbar = False
|
||||
Me.Text = "Edoka-Cold-Dokumentviewer"
|
||||
Me.TransparencyKey = System.Drawing.Color.White
|
||||
Me.Panel1.ResumeLayout(False)
|
||||
CType(Me.OnDemand, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.ResumeLayout(False)
|
||||
|
||||
End Sub
|
||||
|
||||
#End Region
|
||||
|
||||
#Region "Deklarationen"
|
||||
Dim m_scolddokumentid As String
|
||||
Property Colddokumentid() As String
|
||||
Get
|
||||
Return m_scolddokumentid
|
||||
End Get
|
||||
Set(ByVal Value As String)
|
||||
m_scolddokumentid = Value
|
||||
End Set
|
||||
End Property
|
||||
Dim m_dokumentid As String
|
||||
Property DokumentId() As String
|
||||
Get
|
||||
Return m_dokumentid
|
||||
End Get
|
||||
Set(ByVal Value As String)
|
||||
m_dokumentid = Value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Dim m_partnernr As String
|
||||
Property PartnerNr() As String
|
||||
Get
|
||||
Return m_partnernr
|
||||
End Get
|
||||
Set(ByVal Value As String)
|
||||
m_partnernr = Value
|
||||
While Len(m_partnernr) < 9
|
||||
m_partnernr = "0" & m_partnernr
|
||||
End While
|
||||
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Dim m_dokumenttyp As Integer
|
||||
Property Dokumenttyp() As Integer
|
||||
Get
|
||||
Return m_dokumenttyp
|
||||
End Get
|
||||
Set(ByVal Value As Integer)
|
||||
m_dokumenttyp = Value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Dim m_colddokumentid As String
|
||||
Dim m_coldfolder As String
|
||||
|
||||
Dim server
|
||||
Dim user
|
||||
Dim pw
|
||||
Dim xnumdocs
|
||||
Dim xnumfields
|
||||
Dim xname As String
|
||||
Dim i
|
||||
Dim v1
|
||||
Dim v2
|
||||
Dim numservers
|
||||
Dim rc As Short
|
||||
Dim ret As Short
|
||||
Dim tmp
|
||||
|
||||
Dim WithEvents hscrol As New HScrollBar()
|
||||
Dim WithEvents vscrol As New VScrollBar()
|
||||
Dim m_currentpage As Integer
|
||||
Property CurrentPage() As Integer
|
||||
Get
|
||||
Return m_currentpage
|
||||
End Get
|
||||
Set(ByVal Value As Integer)
|
||||
m_currentpage = Value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
#End Region
|
||||
|
||||
Public zf As Short = 100
|
||||
Public o As Object
|
||||
Public k As Object
|
||||
Dim first As Boolean = True
|
||||
|
||||
Dim txtuser As String = ""
|
||||
Dim txtdatetime As String = ""
|
||||
Dim txttext As String = ""
|
||||
Dim page As Object
|
||||
Dim publ As Object
|
||||
Dim copied As Object
|
||||
Dim numnote As Object
|
||||
Dim notes As New DataTable()
|
||||
|
||||
#Region "Datenzugriffe"
|
||||
Private Function Get_Cold_Data_by_Dokumentid()
|
||||
Dim scmCmdToExecute As SqlCommand = New SqlCommand()
|
||||
scmCmdToExecute.CommandText = "dbo.sp_get_coldfolder_by_documentid"
|
||||
scmCmdToExecute.CommandType = CommandType.StoredProcedure
|
||||
Dim dtToReturn As DataTable = New DataTable()
|
||||
Dim sdaAdapter As SqlDataAdapter = New SqlDataAdapter(scmCmdToExecute)
|
||||
Try
|
||||
scmCmdToExecute.Connection = conn.scoDBConnection
|
||||
scmCmdToExecute.Parameters.Add(New SqlParameter("@dokumentid", SqlDbType.VarChar, 255, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, Me.DokumentId))
|
||||
|
||||
sdaAdapter.Fill(dtToReturn)
|
||||
If Me.Colddokumentid = "" Then
|
||||
Me.m_colddokumentid = dtToReturn.Rows(0).Item(1)
|
||||
Else
|
||||
Me.m_colddokumentid = Me.Colddokumentid
|
||||
End If
|
||||
Me.m_coldfolder = dtToReturn.Rows(0).Item(0)
|
||||
Catch ex As Exception
|
||||
Throw New Exception("Get_Cold_Folder :" & scmCmdToExecute.CommandText & "::Error occured." & ex.Message, ex)
|
||||
Finally
|
||||
scmCmdToExecute.Dispose()
|
||||
sdaAdapter.Dispose()
|
||||
End Try
|
||||
End Function
|
||||
|
||||
|
||||
Private Function Get_Cold_Data_by_Dokumenttyp()
|
||||
Dim scmCmdToExecute As SqlCommand = New SqlCommand()
|
||||
scmCmdToExecute.CommandText = "dbo.sp_get_coldfolder_by_documenttyp"
|
||||
scmCmdToExecute.CommandType = CommandType.StoredProcedure
|
||||
Dim dtToReturn As DataTable = New DataTable()
|
||||
Dim sdaAdapter As SqlDataAdapter = New SqlDataAdapter(scmCmdToExecute)
|
||||
Try
|
||||
scmCmdToExecute.Connection = conn.scoDBConnection
|
||||
scmCmdToExecute.Parameters.Add(New SqlParameter("@dokumenttyp", SqlDbType.VarChar, 255, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, Me.Dokumenttyp))
|
||||
sdaAdapter.Fill(dtToReturn)
|
||||
Me.m_coldfolder = dtToReturn.Rows(0).Item(0)
|
||||
Catch ex As Exception
|
||||
Throw New Exception("Get_Cold_Folder :" & scmCmdToExecute.CommandText & "::Error occured." & ex.Message, ex)
|
||||
Finally
|
||||
scmCmdToExecute.Dispose()
|
||||
sdaAdapter.Dispose()
|
||||
End Try
|
||||
End Function
|
||||
|
||||
#End Region
|
||||
|
||||
#Region "COLD_Ondemand_Funktionen"
|
||||
Public Function Cold_Login() As Boolean
|
||||
server = Globals.Applikationsdaten.Rows(0).Item("coldsystem")
|
||||
user = Globals.Applikationsdaten.Rows(0).Item("colduser")
|
||||
pw = Globals.Applikationsdaten.Rows(0).Item("coldpassword")
|
||||
Me.OnDemand.SetUserMessageMode(2)
|
||||
Me.OnDemand.Logon(server, user, pw)
|
||||
If ret <> 0 And ret <> 8 Then
|
||||
MsgBox("Die Anmeldung am COLD ist fehlgeschlagen", MsgBoxStyle.Exclamation)
|
||||
Cold_Login = False
|
||||
Exit Function
|
||||
End If
|
||||
Cold_Login = True
|
||||
End Function
|
||||
|
||||
Public Function Show_Dokument(ByVal folder As String, ByVal dokumentid As String)
|
||||
Dim rc
|
||||
Dim ret
|
||||
Dim xnumdocs
|
||||
Try
|
||||
ret = Me.OnDemand.SetUserMessageMode(0)
|
||||
ret = Me.OnDemand.OpenFolder(folder)
|
||||
If ret <> 0 Then
|
||||
MsgBox("Der gewählte Order " & folder & " kann nicht geöffnet werden", MsgBoxStyle.Critical)
|
||||
Me.OnDemand.Logoff()
|
||||
Exit Function
|
||||
End If
|
||||
|
||||
ret = Me.OnDemand.ClearFolderSearchFields()
|
||||
If ret <> 0 Then
|
||||
MsgBox("Die Suchliste konnte nicht initialisiert werden", MsgBoxStyle.Critical)
|
||||
Me.OnDemand.Logoff()
|
||||
Exit Function
|
||||
End If
|
||||
|
||||
Dim xx As String
|
||||
xx = ""
|
||||
ret = Me.OnDemand.SetFolderSearchFieldData("Dokument-Id", 11, dokumentid, xx)
|
||||
If ret <> 0 Then
|
||||
MsgBox("Fehler beim setzen des Suchkriteriums", MsgBoxStyle.Critical)
|
||||
Me.OnDemand.Logoff()
|
||||
Exit Function
|
||||
End If
|
||||
|
||||
ret = Me.OnDemand.SearchFolder(False)
|
||||
If ret <> 0 Then
|
||||
MsgBox("Beim Zugriff auf das COLD ist ein Fehler aufgetreten", MsgBoxStyle.Critical)
|
||||
Me.OnDemand.Logoff()
|
||||
Exit Function
|
||||
End If
|
||||
|
||||
ret = Me.OnDemand.GetNumDocsInList(xnumdocs)
|
||||
If xnumdocs < 1 Then
|
||||
MsgBox("Es sind keine Dokumente gefunden worden.", MsgBoxStyle.Critical)
|
||||
Me.OnDemand.Logoff()
|
||||
Exit Function
|
||||
End If
|
||||
Me.OnDemand.OpenDoc(0, "", 0)
|
||||
get_annotations()
|
||||
Catch ex As Exception
|
||||
MsgBox(ex.Message)
|
||||
End Try
|
||||
End Function
|
||||
#End Region
|
||||
|
||||
'shu coldanzeige
|
||||
Dim m_collectionentry As Integer = 1
|
||||
Property CollectionEntry() As Integer
|
||||
Get
|
||||
Return m_collectionentry
|
||||
End Get
|
||||
Set(ByVal Value As Integer)
|
||||
m_collectionentry = Value
|
||||
End Set
|
||||
End Property
|
||||
Dim m_data As New Collection()
|
||||
Property dokdata() As Collection
|
||||
Get
|
||||
Return m_data
|
||||
End Get
|
||||
Set(ByVal Value As Collection)
|
||||
m_data = Value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Sub New(ByVal datacollection As Collection)
|
||||
MyBase.New()
|
||||
InitializeComponent()
|
||||
Me.dokdata = datacollection
|
||||
End Sub
|
||||
|
||||
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
|
||||
show_doc(Me.CollectionEntry)
|
||||
|
||||
'Dim m_dokument As New edokadb.clsDokument()
|
||||
'Get_Cold_Data_by_Dokumentid()
|
||||
'If Not Cold_Login() Then Exit Sub
|
||||
'Me.ondemand.BackColor = System.Drawing.Color.White
|
||||
|
||||
'Me.CurrentPage = 1
|
||||
|
||||
'Me.notes.Columns.Add("ID")
|
||||
'Me.notes.Columns.Add("Text")
|
||||
'Me.notes.Columns.Add("UserID")
|
||||
'Me.notes.Columns.Add("DateTime")
|
||||
'Me.notes.Columns.Add("Page")
|
||||
'Me.notes.Columns.Add("ispublic")
|
||||
'Me.notes.Columns.Add("canbecopied")
|
||||
'Me.notes.Columns.Add("status")
|
||||
'Show_Dokument(Me.m_coldfolder, Me.m_colddokumentid)
|
||||
|
||||
End Sub
|
||||
|
||||
Dim folder As String
|
||||
Dim belegart As String
|
||||
Dim numpages As Integer
|
||||
Dim curpage As Integer
|
||||
Dim coldata As clsMehrfachdruck_Data
|
||||
Public Sub show_doc(ByVal collectionentry As Integer)
|
||||
Dim xnumdocs
|
||||
Dim xnumfields
|
||||
Dim xname As String
|
||||
Dim i
|
||||
Dim v1
|
||||
Dim v2
|
||||
Dim numservers
|
||||
Dim rc As Short
|
||||
Dim ret As Short
|
||||
Dim tmp
|
||||
coldata = Me.dokdata.Item(collectionentry)
|
||||
If Not Me.Cold_Login Then
|
||||
MsgBox("Login to Cold failed")
|
||||
Exit Sub
|
||||
|
||||
End If
|
||||
Me.NoteLabel.Text = "Dokument " + Me.CollectionEntry.ToString + " von " + Me.dokdata.Count.ToString
|
||||
' Select Case coldata.Enum_Typ
|
||||
' Case coldata.Enum_Typ.ZV
|
||||
belegart = "ZV"
|
||||
folder = "TGKB ZV-Scanning Belege (erweiterte Suche)"
|
||||
' Case coldata.Enum_Typ.HOST
|
||||
'belegart = "HOST"
|
||||
'folder = "TGKB Kundenoutput AGI-OMS für EDOKA User"
|
||||
' Case coldata.Enum_Typ.EDOKA
|
||||
' End Select
|
||||
|
||||
ret = Me.OnDemand.SetUserMessageMode(0)
|
||||
ret = Me.OnDemand.OpenFolder(folder)
|
||||
If ret <> 0 Then
|
||||
MsgBox("Der gewählte Order " & folder & " kann nicht geöffnet werden", MsgBoxStyle.Critical)
|
||||
Me.OnDemand.Logoff()
|
||||
Exit Sub
|
||||
End If
|
||||
|
||||
rc = Me.OnDemand.GetNumFolderSearchFields(xnumfields)
|
||||
For i = 0 To xnumfields - 1
|
||||
tmp = ""
|
||||
ret = OnDemand.GetFolderSearchFieldName(i, tmp)
|
||||
Next
|
||||
|
||||
ret = Me.OnDemand.ClearFolderSearchFields()
|
||||
If ret <> 0 Then
|
||||
MsgBox("Die Suchliste konnte nicht initialisiert werden", MsgBoxStyle.Critical)
|
||||
Me.OnDemand.Logoff()
|
||||
Exit Sub
|
||||
End If
|
||||
|
||||
Dim xx As String
|
||||
xx = ""
|
||||
'Hutter 2004-10-04 Aktivierung COLD-Print
|
||||
Select Case belegart
|
||||
Case "HOST"
|
||||
ret = Me.OnDemand.SetFolderSearchFieldData("Dokument-Id", 1, coldata.DokumentId, xx)
|
||||
ret = Me.OnDemand.SetFolderSearchFieldData("Erstellung od. Valuta Datum", 1, coldata.Erstellungsdatum, xx)
|
||||
Case "UVM"
|
||||
Case "ZV"
|
||||
ret = Me.OnDemand.SetFolderSearchFieldData("Dokumenttyp", 1, coldata.DokumentTyp, xx)
|
||||
ret = Me.OnDemand.SetFolderSearchFieldData("Auftrag-Nr.", 1, coldata.Auftragnr, xx)
|
||||
ret = Me.OnDemand.SetFolderSearchFieldData("Paginator", 1, coldata.DokumentId, xx)
|
||||
Case Else
|
||||
Dim s As String
|
||||
' s = Trim(Me.PartnerNr)
|
||||
' While Len(s) < 9
|
||||
' s = "0" + s
|
||||
' End While
|
||||
' ret = Me.OnDemand.SetFolderSearchFieldData("Partner-Nr.", 1, s, xx)
|
||||
ret = Me.OnDemand.SetFolderSearchFieldData("Dokument-Id", 11, DokumentId, xx)
|
||||
End Select
|
||||
'If Me.m_coldfolder = "TGKB Kundenoutput AGI-OMS für EDOKA User" Then
|
||||
' ret = Me.OnDemand.SetFolderSearchFieldData("Dokument-Id", 1, Me.DokumentId, xx)
|
||||
' ret = Me.OnDemand.SetFolderSearchFieldData("Erstellung od. Valuta Datum", 1, Me.Erstellungsdatum, xx)
|
||||
'Else
|
||||
' ret = Me.OnDemand.SetFolderSearchFieldData("Dokument-Id", 11, dokumentid, xx)
|
||||
'End If
|
||||
|
||||
If ret <> 0 Then
|
||||
MsgBox("Fehler beim setzen des Suchkriteriums", MsgBoxStyle.Critical)
|
||||
Me.OnDemand.Logoff()
|
||||
Exit Sub
|
||||
End If
|
||||
|
||||
ret = Me.OnDemand.SearchFolder(False)
|
||||
If ret <> 0 Then
|
||||
MsgBox("Beim Zugriff auf das COLD ist ein Fehler aufgetreten", MsgBoxStyle.Critical)
|
||||
Me.OnDemand.Logoff()
|
||||
Exit Sub
|
||||
End If
|
||||
|
||||
ret = Me.OnDemand.GetNumDocsInList(xnumdocs)
|
||||
If xnumdocs < 1 Then
|
||||
If Not DivFnkt.BDR_Dokument(Me.DokumentId) Then
|
||||
MyMsg.show_standardmessage(81, MsgBoxStyle.Information)
|
||||
Else
|
||||
MyMsg.show_standardmessage(275, MsgBoxStyle.Information)
|
||||
End If
|
||||
Me.OnDemand.Logoff()
|
||||
|
||||
Exit Sub
|
||||
End If
|
||||
Try
|
||||
Me.OnDemand.CloseDoc()
|
||||
Catch
|
||||
End Try
|
||||
Me.OnDemand.OpenDoc(0, "", 0)
|
||||
Dim o As Object
|
||||
o = Nothing
|
||||
ret = OnDemand.GetDocNumPages(o)
|
||||
If ret = 0 Then Me.numpages = o
|
||||
o = Nothing
|
||||
ret = OnDemand.GetDocCurrentPage(o)
|
||||
If ret = 0 Then Me.curpage = o
|
||||
|
||||
If first Then
|
||||
first = False
|
||||
zf = 75
|
||||
o = Nothing
|
||||
k = Nothing
|
||||
ret = Me.OnDemand.SetDocZoom(zf, o, k)
|
||||
End If
|
||||
o = Nothing
|
||||
k = Nothing
|
||||
ret = Me.OnDemand.SetDocZoom(zf, o, k)
|
||||
Me.CurrentPage = 1
|
||||
End Sub
|
||||
|
||||
Public Function get_annotations()
|
||||
|
||||
Dim rc As DataRowCollection
|
||||
Dim newrow As DataRow()
|
||||
rc = notes.Rows
|
||||
Dim rowvals(7) As Object
|
||||
Dim i As Integer
|
||||
ret = Me.OnDemand.GetNumDocAnnotations(Me.numnote)
|
||||
|
||||
For i = 0 To Me.numnote - 1
|
||||
ret = Me.OnDemand.GetAnnotationForDoc(i, txttext, txtuser, txtdatetime, page, publ, copied)
|
||||
rowvals(0) = i
|
||||
rowvals(1) = txttext
|
||||
rowvals(2) = txtuser
|
||||
rowvals(3) = txtdatetime
|
||||
rowvals(4) = page
|
||||
rowvals(5) = publ
|
||||
rowvals(6) = copied
|
||||
rowvals(7) = ""
|
||||
notes.Rows.Add(rowvals)
|
||||
Next
|
||||
|
||||
'If Me.numnote > 0 Then
|
||||
' Me.NoteCount.Text = Me.numnote.ToString
|
||||
' Me.NoteCount.Visible = True
|
||||
' Me.NoteLabel.Visible = True
|
||||
'Else
|
||||
' Me.NoteCount.Visible = False
|
||||
' Me.NoteLabel.Visible = False
|
||||
'End If
|
||||
End Function
|
||||
|
||||
|
||||
|
||||
Private Sub ToolBar1_ButtonClick(ByVal sender As System.Object, ByVal e As System.Windows.Forms.ToolBarButtonClickEventArgs) Handles ToolBar1.ButtonClick
|
||||
Select Case ToolBar1.Buttons.IndexOf(e.Button)
|
||||
Case 0
|
||||
Me.Close()
|
||||
Case 1
|
||||
Me.OnDemand.PrintDoc(-1, 0, Me.PrintDocument1.PrinterSettings.PrinterName, True, 1, 3, 0.5, 0.5, 0.5, 0.5, False)
|
||||
Me.CurrentPage = Me.CurrentPage - 1
|
||||
ret = Me.OnDemand.SetDocCurrentPage(Me.CurrentPage)
|
||||
If ret <> 0 Then Me.CurrentPage = Me.CurrentPage + 1
|
||||
Case 2
|
||||
Me.CurrentPage = Me.CurrentPage - 1
|
||||
ret = Me.OnDemand.SetDocCurrentPage(Me.CurrentPage)
|
||||
If ret <> 0 Then Me.CurrentPage = Me.CurrentPage + 1
|
||||
Case 3
|
||||
Me.CurrentPage = Me.CurrentPage + 1
|
||||
ret = Me.OnDemand.SetDocCurrentPage(Me.CurrentPage)
|
||||
If ret <> 0 Then Me.CurrentPage = Me.CurrentPage - 1
|
||||
Case 4
|
||||
zf = zf - 25
|
||||
o = Nothing
|
||||
k = Nothing
|
||||
If zf < 25 Then zf = 25
|
||||
ret = Me.OnDemand.SetDocZoom(zf, o, k)
|
||||
Case 5
|
||||
zf = zf + 25
|
||||
o = Nothing
|
||||
k = Nothing
|
||||
If zf > 1000 Then zf = 1000
|
||||
ret = Me.OnDemand.SetDocZoom(zf, o, k)
|
||||
Case 7
|
||||
Dim f As New frmNotes()
|
||||
f.ondemand = Me.OnDemand
|
||||
f.notes = Me.notes
|
||||
f.ShowDialog()
|
||||
Case 10
|
||||
Me.CollectionEntry = Me.CollectionEntry - 1
|
||||
If Me.CollectionEntry < 1 Then Me.CollectionEntry = 1
|
||||
Me.show_doc(Me.CollectionEntry)
|
||||
Case 11
|
||||
Me.CollectionEntry = Me.CollectionEntry + 1
|
||||
If Me.CollectionEntry > Me.dokdata.Count Then Me.CollectionEntry = Me.dokdata.Count
|
||||
Me.show_doc(Me.CollectionEntry)
|
||||
Case 12
|
||||
coldata = dokdata(Me.CollectionEntry)
|
||||
DivFnkt.Erstellungsdatum = coldata.Erstellungsdatum
|
||||
DivFnkt.Auftragnr = coldata.Auftragnr
|
||||
DivFnkt.UVMZVDokumenttyp = coldata.DokumentTyp
|
||||
DivFnkt.Belegart = "ZV"
|
||||
DivFnkt.ShowColdDocHost(coldata.DokumentId, Me, coldata.DokumentId, coldata.PartnerNr, coldata.PartnerName, coldata.DokumentTyp)
|
||||
Me.Cursor = Cursors.Default
|
||||
End Select
|
||||
End Sub
|
||||
|
||||
Public Function GetColdDokumente() As DataTable
|
||||
Dim m_dokument As New edokadb.clsDokument()
|
||||
Get_Cold_Data_by_Dokumenttyp()
|
||||
If Not Me.Cold_Login Then Exit Function
|
||||
Get_Folder_Documents(Me.m_coldfolder)
|
||||
End Function
|
||||
|
||||
Private Function Get_Folder_Documents(ByVal Folder As String)
|
||||
ret = Me.OnDemand.SetUserMessageMode(0)
|
||||
ret = Me.OnDemand.OpenFolder(Folder)
|
||||
If ret <> 0 Then
|
||||
MsgBox("Der gewählte Order " & Folder & " kann nicht geöffnet werden", MsgBoxStyle.Critical)
|
||||
Me.OnDemand.Logoff()
|
||||
Exit Function
|
||||
End If
|
||||
|
||||
ret = Me.OnDemand.ClearFolderSearchFields()
|
||||
If ret <> 0 Then
|
||||
MsgBox("Die Suchliste konnte nicht initialisiert werden", MsgBoxStyle.Critical)
|
||||
Me.OnDemand.Logoff()
|
||||
Exit Function
|
||||
End If
|
||||
|
||||
Dim xx As String
|
||||
xx = ""
|
||||
ret = Me.OnDemand.SetFolderSearchFieldData("Partner-Nr.", 1, Me.PartnerNr, xx)
|
||||
'ret = Me.OnDemand.SetFolderSearchFieldData("Dok.-Status", 11, "Aktuell", xx)
|
||||
If ret <> 0 Then
|
||||
MsgBox("Fehler beim setzen des Suchkriteriums", MsgBoxStyle.Critical)
|
||||
Me.OnDemand.Logoff()
|
||||
Exit Function
|
||||
End If
|
||||
|
||||
ret = Me.OnDemand.SearchFolder(False)
|
||||
If ret <> 0 Then
|
||||
MsgBox("Beim Zugriff auf das COLD ist ein Fehler aufgetreten", MsgBoxStyle.Critical)
|
||||
Me.OnDemand.Logoff()
|
||||
Exit Function
|
||||
End If
|
||||
|
||||
ret = Me.OnDemand.GetNumDocsInList(xnumdocs)
|
||||
If xnumdocs < 1 Then
|
||||
MsgBox("Es sind keine Dokumente gefunden worden.", MsgBoxStyle.Critical)
|
||||
Me.OnDemand.Logoff()
|
||||
Exit Function
|
||||
End If
|
||||
Dim tmp As String
|
||||
|
||||
Dim i As Short
|
||||
Dim i1 As Short
|
||||
tmp = ""
|
||||
ret = OnDemand.GetNumFolderDisplayFields(xnumfields)
|
||||
Dim foldernames(xnumfields) As String
|
||||
For i = 0 To xnumfields - 1
|
||||
tmp = Nothing
|
||||
OnDemand.GetFolderDisplayFieldName(i, tmp)
|
||||
foldernames(i) = tmp
|
||||
MsgBox(foldernames(i))
|
||||
Next
|
||||
|
||||
Dim t As New DataTable()
|
||||
Dim newrow As DataRow
|
||||
Dim rc As DataRowCollection
|
||||
rc = t.Rows
|
||||
Dim rowvals(xnumfields) As Object
|
||||
|
||||
For i = 0 To xnumdocs
|
||||
For i1 = 0 To xnumfields
|
||||
ret = OnDemand.GetDocDisplayValue(i, i1, tmp)
|
||||
If ret = 0 Then
|
||||
rowvals(i1) = tmp
|
||||
End If
|
||||
Next i1
|
||||
|
||||
newrow = rc.Add(rowvals)
|
||||
Next i
|
||||
|
||||
End Function
|
||||
|
||||
Private Sub vscrol_ValueChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles vscrol.ValueChanged
|
||||
Try
|
||||
zf = 1
|
||||
|
||||
o = 60
|
||||
ret = Me.OnDemand.ScrollDocVert(zf, o)
|
||||
Catch ex As Exception
|
||||
MsgBox(ret)
|
||||
MsgBox(ex.Message)
|
||||
End Try
|
||||
End Sub
|
||||
End Class
|
||||
124
EDOKA/OnDemand/frmNewNote.resx
Normal file
124
EDOKA/OnDemand/frmNewNote.resx
Normal file
@@ -0,0 +1,124 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 1.3
|
||||
|
||||
The primary goals of this format is to allow a simple XML format
|
||||
that is mostly human readable. The generation and parsing of the
|
||||
various data types are done through the TypeConverter classes
|
||||
associated with the data types.
|
||||
|
||||
Example:
|
||||
|
||||
... ado.net/XML headers & schema ...
|
||||
<resheader name="resmimetype">text/microsoft-resx</resheader>
|
||||
<resheader name="version">1.3</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1">this is my long string</data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
[base64 mime encoded serialized .NET Framework object]
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
[base64 mime encoded string representing a byte array form of the .NET Framework object]
|
||||
</data>
|
||||
|
||||
There are any number of "resheader" rows that contain simple
|
||||
name/value pairs.
|
||||
|
||||
Each data row contains a name, and value. The row also contains a
|
||||
type or mimetype. Type corresponds to a .NET class that support
|
||||
text/value conversion through the TypeConverter architecture.
|
||||
Classes that don't support this are serialized and stored with the
|
||||
mimetype set.
|
||||
|
||||
The mimetype is used for serialized objects, and tells the
|
||||
ResXResourceReader how to depersist the object. This is currently not
|
||||
extensible. For a given mimetype the value must be set accordingly:
|
||||
|
||||
Note - application/x-microsoft.net.object.binary.base64 is the format
|
||||
that the ResXResourceWriter will generate, however the reader can
|
||||
read any of the formats listed below.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.binary.base64
|
||||
value : The object must be serialized with
|
||||
: System.Serialization.Formatters.Binary.BinaryFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.soap.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
mimetype: application/x-microsoft.net.object.bytearray.base64
|
||||
value : The object must be serialized into a byte array
|
||||
: using a System.ComponentModel.TypeConverter
|
||||
: and then encoded with base64 encoding.
|
||||
-->
|
||||
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="data">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="resheader">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:choice>
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:schema>
|
||||
<resheader name="resmimetype">
|
||||
<value>text/microsoft-resx</value>
|
||||
</resheader>
|
||||
<resheader name="version">
|
||||
<value>1.3</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<data name="Label1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="TextBox1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="Button1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="Button2.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="$this.Name">
|
||||
<value>frmNewNote</value>
|
||||
</data>
|
||||
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
AAABAAEAEBAQAAAAAAAoAQAAFgAAACgAAAAQAAAAIAAAAAEABAAAAAAAwAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAACAAACAAAAAgIAAgAAAAIAAgACAgAAAwMDAAICAgAAAAP8AAP8AAAD//wD/AAAA/wD/AP//
|
||||
AAD///8AAAAAAAAAAAAAAAAAAAAAAAAIe3cIiAAAAAj/+/C3iAAAAIv/+w+3gAAAj/v/DwCAAAAI//uA
|
||||
+3AAAAAL//v/cAAAARD7//twARAAEP/7/3AJEJAQAP/7cAmQCZD/+/9wAAAAD/v/+3AAAAj7//v/cAAA
|
||||
CIiIiIiAAAAAAAAAAAD//wAA8A8AAOADAADgAQAA8AAAAPAAAAD4AAAA+AAAAJAAAAAAAAAAAAAAAAAA
|
||||
AACYAAAA+AAAAPgAAAD//wAA
|
||||
</value>
|
||||
</data>
|
||||
</root>
|
||||
109
EDOKA/OnDemand/frmNewNote.vb
Normal file
109
EDOKA/OnDemand/frmNewNote.vb
Normal file
@@ -0,0 +1,109 @@
|
||||
Public Class frmNewNote
|
||||
Inherits System.Windows.Forms.Form
|
||||
|
||||
#Region " Vom Windows Form Designer generierter Code "
|
||||
|
||||
Public Sub New()
|
||||
MyBase.New()
|
||||
|
||||
' Dieser Aufruf ist für den Windows Form-Designer erforderlich.
|
||||
InitializeComponent()
|
||||
|
||||
' Initialisierungen nach dem Aufruf InitializeComponent() hinzufügen
|
||||
|
||||
End Sub
|
||||
|
||||
' Die Form überschreibt den Löschvorgang der Basisklasse, um Komponenten zu bereinigen.
|
||||
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
If disposing Then
|
||||
If Not (components Is Nothing) Then
|
||||
components.Dispose()
|
||||
End If
|
||||
End If
|
||||
MyBase.Dispose(disposing)
|
||||
End Sub
|
||||
|
||||
' Für Windows Form-Designer erforderlich
|
||||
Private components As System.ComponentModel.IContainer
|
||||
|
||||
'HINWEIS: Die folgende Prozedur ist für den Windows Form-Designer erforderlich
|
||||
'Sie kann mit dem Windows Form-Designer modifiziert werden.
|
||||
'Verwenden Sie nicht den Code-Editor zur Bearbeitung.
|
||||
Friend WithEvents Label1 As System.Windows.Forms.Label
|
||||
Friend WithEvents TextBox1 As System.Windows.Forms.TextBox
|
||||
Friend WithEvents Button1 As System.Windows.Forms.Button
|
||||
Friend WithEvents Button2 As System.Windows.Forms.Button
|
||||
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
|
||||
Dim resources As System.Resources.ResourceManager = New System.Resources.ResourceManager(GetType(frmNewNote))
|
||||
Me.Label1 = New System.Windows.Forms.Label()
|
||||
Me.TextBox1 = New System.Windows.Forms.TextBox()
|
||||
Me.Button1 = New System.Windows.Forms.Button()
|
||||
Me.Button2 = New System.Windows.Forms.Button()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'Label1
|
||||
'
|
||||
Me.Label1.Location = New System.Drawing.Point(8, 8)
|
||||
Me.Label1.Name = "Label1"
|
||||
Me.Label1.Size = New System.Drawing.Size(100, 16)
|
||||
Me.Label1.TabIndex = 0
|
||||
Me.Label1.Text = "Notiz"
|
||||
'
|
||||
'TextBox1
|
||||
'
|
||||
Me.TextBox1.Location = New System.Drawing.Point(8, 24)
|
||||
Me.TextBox1.Multiline = True
|
||||
Me.TextBox1.Name = "TextBox1"
|
||||
Me.TextBox1.Size = New System.Drawing.Size(472, 128)
|
||||
Me.TextBox1.TabIndex = 1
|
||||
Me.TextBox1.Text = ""
|
||||
'
|
||||
'Button1
|
||||
'
|
||||
Me.Button1.Location = New System.Drawing.Point(160, 160)
|
||||
Me.Button1.Name = "Button1"
|
||||
Me.Button1.TabIndex = 2
|
||||
Me.Button1.Text = "&Abbruch"
|
||||
'
|
||||
'Button2
|
||||
'
|
||||
Me.Button2.DialogResult = System.Windows.Forms.DialogResult.OK
|
||||
Me.Button2.Location = New System.Drawing.Point(240, 160)
|
||||
Me.Button2.Name = "Button2"
|
||||
Me.Button2.TabIndex = 3
|
||||
Me.Button2.Text = "&Speichern"
|
||||
'
|
||||
'frmNewNote
|
||||
'
|
||||
Me.AutoScaleBaseSize = New System.Drawing.Size(5, 13)
|
||||
Me.ClientSize = New System.Drawing.Size(496, 190)
|
||||
Me.Controls.AddRange(New System.Windows.Forms.Control() {Me.Button2, Me.Button1, Me.TextBox1, Me.Label1})
|
||||
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedSingle
|
||||
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
|
||||
Me.Name = "frmNewNote"
|
||||
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
|
||||
Me.Text = "Neue Notiz erfassen"
|
||||
Me.ResumeLayout(False)
|
||||
|
||||
End Sub
|
||||
|
||||
#End Region
|
||||
|
||||
Public ondemand As Object
|
||||
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
|
||||
Dim ret As Short
|
||||
Me.TextBox1.Text = Me.TextBox1.Text + vbCrLf + vbCrLf + "----------------------------------------------------"
|
||||
Me.TextBox1.Text = Me.TextBox1.Text + vbCrLf
|
||||
Me.TextBox1.Text = Me.TextBox1.Text + Globals.CurrentMitarbeiterdata.Rows(0).Item("name") + " " + Globals.CurrentMitarbeiterdata.Rows(0).Item("vorname") + ", " + Globals.CurrentMitarbeiterdata.Rows(0).Item("tgnummer")
|
||||
ret = Me.ondemand.AnnotateDoc(0, Me.TextBox1.Text, 1, 1, 0)
|
||||
End Sub
|
||||
|
||||
Private Sub frmNewNote_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
|
||||
Me.DialogResult = DialogResult.Abort
|
||||
Me.Close()
|
||||
End Sub
|
||||
End Class
|
||||
127
EDOKA/OnDemand/frmNoteDetail.resx
Normal file
127
EDOKA/OnDemand/frmNoteDetail.resx
Normal file
@@ -0,0 +1,127 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 1.3
|
||||
|
||||
The primary goals of this format is to allow a simple XML format
|
||||
that is mostly human readable. The generation and parsing of the
|
||||
various data types are done through the TypeConverter classes
|
||||
associated with the data types.
|
||||
|
||||
Example:
|
||||
|
||||
... ado.net/XML headers & schema ...
|
||||
<resheader name="resmimetype">text/microsoft-resx</resheader>
|
||||
<resheader name="version">1.3</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1">this is my long string</data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
[base64 mime encoded serialized .NET Framework object]
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
[base64 mime encoded string representing a byte array form of the .NET Framework object]
|
||||
</data>
|
||||
|
||||
There are any number of "resheader" rows that contain simple
|
||||
name/value pairs.
|
||||
|
||||
Each data row contains a name, and value. The row also contains a
|
||||
type or mimetype. Type corresponds to a .NET class that support
|
||||
text/value conversion through the TypeConverter architecture.
|
||||
Classes that don't support this are serialized and stored with the
|
||||
mimetype set.
|
||||
|
||||
The mimetype is used for serialized objects, and tells the
|
||||
ResXResourceReader how to depersist the object. This is currently not
|
||||
extensible. For a given mimetype the value must be set accordingly:
|
||||
|
||||
Note - application/x-microsoft.net.object.binary.base64 is the format
|
||||
that the ResXResourceWriter will generate, however the reader can
|
||||
read any of the formats listed below.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.binary.base64
|
||||
value : The object must be serialized with
|
||||
: System.Serialization.Formatters.Binary.BinaryFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.soap.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
mimetype: application/x-microsoft.net.object.bytearray.base64
|
||||
value : The object must be serialized into a byte array
|
||||
: using a System.ComponentModel.TypeConverter
|
||||
: and then encoded with base64 encoding.
|
||||
-->
|
||||
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="data">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="resheader">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:choice>
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:schema>
|
||||
<resheader name="resmimetype">
|
||||
<value>text/microsoft-resx</value>
|
||||
</resheader>
|
||||
<resheader name="version">
|
||||
<value>1.3</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<data name="TextBox1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="Label1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="TextBox2.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="Label2.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="Button1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="$this.Name">
|
||||
<value>frmNoteDetail</value>
|
||||
</data>
|
||||
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
AAABAAEAEBAQAAAAAAAoAQAAFgAAACgAAAAQAAAAIAAAAAEABAAAAAAAwAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAACAAACAAAAAgIAAgAAAAIAAgACAgAAAwMDAAICAgAAAAP8AAP8AAAD//wD/AAAA/wD/AP//
|
||||
AAD///8AAAAAAAAAAAAAAAAAAAAAAAAIe3cIiAAAAAj/+/C3iAAAAIv/+w+3gAAAj/v/DwCAAAAI//uA
|
||||
+3AAAAAL//v/cAAAARD7//twARAAEP/7/3AJEJAQAP/7cAmQCZD/+/9wAAAAD/v/+3AAAAj7//v/cAAA
|
||||
CIiIiIiAAAAAAAAAAAD//wAA8A8AAOADAADgAQAA8AAAAPAAAAD4AAAA+AAAAJAAAAAAAAAAAAAAAAAA
|
||||
AACYAAAA+AAAAPgAAAD//wAA
|
||||
</value>
|
||||
</data>
|
||||
</root>
|
||||
104
EDOKA/OnDemand/frmNoteDetail.vb
Normal file
104
EDOKA/OnDemand/frmNoteDetail.vb
Normal file
@@ -0,0 +1,104 @@
|
||||
Public Class frmNoteDetail
|
||||
Inherits System.Windows.Forms.Form
|
||||
|
||||
#Region " Vom Windows Form Designer generierter Code "
|
||||
|
||||
Public Sub New()
|
||||
MyBase.New()
|
||||
|
||||
' Dieser Aufruf ist für den Windows Form-Designer erforderlich.
|
||||
InitializeComponent()
|
||||
|
||||
' Initialisierungen nach dem Aufruf InitializeComponent() hinzufügen
|
||||
|
||||
End Sub
|
||||
|
||||
' Die Form überschreibt den Löschvorgang der Basisklasse, um Komponenten zu bereinigen.
|
||||
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
If disposing Then
|
||||
If Not (components Is Nothing) Then
|
||||
components.Dispose()
|
||||
End If
|
||||
End If
|
||||
MyBase.Dispose(disposing)
|
||||
End Sub
|
||||
|
||||
' Für Windows Form-Designer erforderlich
|
||||
Private components As System.ComponentModel.IContainer
|
||||
|
||||
'HINWEIS: Die folgende Prozedur ist für den Windows Form-Designer erforderlich
|
||||
'Sie kann mit dem Windows Form-Designer modifiziert werden.
|
||||
'Verwenden Sie nicht den Code-Editor zur Bearbeitung.
|
||||
Friend WithEvents TextBox1 As System.Windows.Forms.TextBox
|
||||
Friend WithEvents Label1 As System.Windows.Forms.Label
|
||||
Friend WithEvents TextBox2 As System.Windows.Forms.TextBox
|
||||
Friend WithEvents Label2 As System.Windows.Forms.Label
|
||||
Friend WithEvents Button1 As System.Windows.Forms.Button
|
||||
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
|
||||
Dim resources As System.Resources.ResourceManager = New System.Resources.ResourceManager(GetType(frmNoteDetail))
|
||||
Me.TextBox1 = New System.Windows.Forms.TextBox()
|
||||
Me.Label1 = New System.Windows.Forms.Label()
|
||||
Me.TextBox2 = New System.Windows.Forms.TextBox()
|
||||
Me.Label2 = New System.Windows.Forms.Label()
|
||||
Me.Button1 = New System.Windows.Forms.Button()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'TextBox1
|
||||
'
|
||||
Me.TextBox1.Location = New System.Drawing.Point(64, 48)
|
||||
Me.TextBox1.Multiline = True
|
||||
Me.TextBox1.Name = "TextBox1"
|
||||
Me.TextBox1.Size = New System.Drawing.Size(512, 168)
|
||||
Me.TextBox1.TabIndex = 0
|
||||
Me.TextBox1.Text = "TextBox1"
|
||||
'
|
||||
'Label1
|
||||
'
|
||||
Me.Label1.Location = New System.Drawing.Point(8, 16)
|
||||
Me.Label1.Name = "Label1"
|
||||
Me.Label1.Size = New System.Drawing.Size(48, 23)
|
||||
Me.Label1.TabIndex = 1
|
||||
Me.Label1.Text = "Datum"
|
||||
'
|
||||
'TextBox2
|
||||
'
|
||||
Me.TextBox2.Location = New System.Drawing.Point(64, 16)
|
||||
Me.TextBox2.Name = "TextBox2"
|
||||
Me.TextBox2.Size = New System.Drawing.Size(512, 20)
|
||||
Me.TextBox2.TabIndex = 2
|
||||
Me.TextBox2.Text = "TextBox2"
|
||||
'
|
||||
'Label2
|
||||
'
|
||||
Me.Label2.Location = New System.Drawing.Point(8, 48)
|
||||
Me.Label2.Name = "Label2"
|
||||
Me.Label2.Size = New System.Drawing.Size(56, 23)
|
||||
Me.Label2.TabIndex = 3
|
||||
Me.Label2.Text = "Notiz"
|
||||
'
|
||||
'Button1
|
||||
'
|
||||
Me.Button1.Location = New System.Drawing.Point(256, 224)
|
||||
Me.Button1.Name = "Button1"
|
||||
Me.Button1.TabIndex = 4
|
||||
Me.Button1.Text = "&Schliessen"
|
||||
'
|
||||
'frmNoteDetail
|
||||
'
|
||||
Me.AutoScaleBaseSize = New System.Drawing.Size(5, 13)
|
||||
Me.ClientSize = New System.Drawing.Size(592, 254)
|
||||
Me.Controls.AddRange(New System.Windows.Forms.Control() {Me.Button1, Me.Label2, Me.TextBox2, Me.Label1, Me.TextBox1})
|
||||
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
|
||||
Me.Name = "frmNoteDetail"
|
||||
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
|
||||
Me.Text = "Notiz"
|
||||
Me.ResumeLayout(False)
|
||||
|
||||
End Sub
|
||||
|
||||
#End Region
|
||||
|
||||
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
|
||||
Me.Close()
|
||||
End Sub
|
||||
End Class
|
||||
141
EDOKA/OnDemand/frmNotes.resx
Normal file
141
EDOKA/OnDemand/frmNotes.resx
Normal file
@@ -0,0 +1,141 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 1.3
|
||||
|
||||
The primary goals of this format is to allow a simple XML format
|
||||
that is mostly human readable. The generation and parsing of the
|
||||
various data types are done through the TypeConverter classes
|
||||
associated with the data types.
|
||||
|
||||
Example:
|
||||
|
||||
... ado.net/XML headers & schema ...
|
||||
<resheader name="resmimetype">text/microsoft-resx</resheader>
|
||||
<resheader name="version">1.3</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1">this is my long string</data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
[base64 mime encoded serialized .NET Framework object]
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
[base64 mime encoded string representing a byte array form of the .NET Framework object]
|
||||
</data>
|
||||
|
||||
There are any number of "resheader" rows that contain simple
|
||||
name/value pairs.
|
||||
|
||||
Each data row contains a name, and value. The row also contains a
|
||||
type or mimetype. Type corresponds to a .NET class that support
|
||||
text/value conversion through the TypeConverter architecture.
|
||||
Classes that don't support this are serialized and stored with the
|
||||
mimetype set.
|
||||
|
||||
The mimetype is used for serialized objects, and tells the
|
||||
ResXResourceReader how to depersist the object. This is currently not
|
||||
extensible. For a given mimetype the value must be set accordingly:
|
||||
|
||||
Note - application/x-microsoft.net.object.binary.base64 is the format
|
||||
that the ResXResourceWriter will generate, however the reader can
|
||||
read any of the formats listed below.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.binary.base64
|
||||
value : The object must be serialized with
|
||||
: System.Serialization.Formatters.Binary.BinaryFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.soap.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
mimetype: application/x-microsoft.net.object.bytearray.base64
|
||||
value : The object must be serialized into a byte array
|
||||
: using a System.ComponentModel.TypeConverter
|
||||
: and then encoded with base64 encoding.
|
||||
-->
|
||||
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="data">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="resheader">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:choice>
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:schema>
|
||||
<resheader name="resmimetype">
|
||||
<value>text/microsoft-resx</value>
|
||||
</resheader>
|
||||
<resheader name="version">
|
||||
<value>1.3</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<data name="BtnNew.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="BtnDelete.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="NoteList.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="resource.Images" type="System.Drawing.Bitmap, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
iVBORw0KGgoAAAANSUhEUgAAAAkAAAAJCAYAAADgkQYQAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
|
||||
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAADdJREFUKFNjYMAE
|
||||
/7GIgYWQJXCxURTCFOE1ESSJoQAmiI9GcSayQqzuR3cLVithOvH6DpsisBgAoKoc5C8W7oEAAAAASUVO
|
||||
RK5CYII=
|
||||
</value>
|
||||
</data>
|
||||
<data name="ContextMenu1.Location" type="System.Drawing.Point, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>17, 17</value>
|
||||
</data>
|
||||
<data name="ContextMenu1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="MenuItem1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="MenuItem2.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="$this.Name">
|
||||
<value>frmNotes</value>
|
||||
</data>
|
||||
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
AAABAAEAEBAQAAAAAAAoAQAAFgAAACgAAAAQAAAAIAAAAAEABAAAAAAAwAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAACAAACAAAAAgIAAgAAAAIAAgACAgAAAwMDAAICAgAAAAP8AAP8AAAD//wD/AAAA/wD/AP//
|
||||
AAD///8AAAAAAAAAAAAAAAAAAAAAAAAIe3cIiAAAAAj/+/C3iAAAAIv/+w+3gAAAj/v/DwCAAAAI//uA
|
||||
+3AAAAAL//v/cAAAARD7//twARAAEP/7/3AJEJAQAP/7cAmQCZD/+/9wAAAAD/v/+3AAAAj7//v/cAAA
|
||||
CIiIiIiAAAAAAAAAAAD//wAA8A8AAOADAADgAQAA8AAAAPAAAAD4AAAA+AAAAJAAAAAAAAAAAAAAAAAA
|
||||
AACYAAAA+AAAAPgAAAD//wAA
|
||||
</value>
|
||||
</data>
|
||||
</root>
|
||||
280
EDOKA/OnDemand/frmNotes.vb
Normal file
280
EDOKA/OnDemand/frmNotes.vb
Normal file
@@ -0,0 +1,280 @@
|
||||
Public Class frmNotes
|
||||
Inherits System.Windows.Forms.Form
|
||||
|
||||
#Region " Vom Windows Form Designer generierter Code "
|
||||
|
||||
Public Sub New()
|
||||
MyBase.New()
|
||||
|
||||
' Dieser Aufruf ist für den Windows Form-Designer erforderlich.
|
||||
InitializeComponent()
|
||||
|
||||
' Initialisierungen nach dem Aufruf InitializeComponent() hinzufügen
|
||||
|
||||
End Sub
|
||||
|
||||
' Die Form überschreibt den Löschvorgang der Basisklasse, um Komponenten zu bereinigen.
|
||||
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
If disposing Then
|
||||
If Not (components Is Nothing) Then
|
||||
components.Dispose()
|
||||
End If
|
||||
End If
|
||||
MyBase.Dispose(disposing)
|
||||
End Sub
|
||||
|
||||
' Für Windows Form-Designer erforderlich
|
||||
Private components As System.ComponentModel.IContainer
|
||||
|
||||
'HINWEIS: Die folgende Prozedur ist für den Windows Form-Designer erforderlich
|
||||
'Sie kann mit dem Windows Form-Designer modifiziert werden.
|
||||
'Verwenden Sie nicht den Code-Editor zur Bearbeitung.
|
||||
Friend WithEvents BtnNew As System.Windows.Forms.Button
|
||||
Friend WithEvents BtnDelete As System.Windows.Forms.Button
|
||||
Friend WithEvents NoteList As C1.Win.C1TrueDBGrid.C1TrueDBGrid
|
||||
Friend WithEvents ContextMenu1 As System.Windows.Forms.ContextMenu
|
||||
Friend WithEvents MenuItem1 As System.Windows.Forms.MenuItem
|
||||
Friend WithEvents MenuItem2 As System.Windows.Forms.MenuItem
|
||||
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
|
||||
Dim resources As System.Resources.ResourceManager = New System.Resources.ResourceManager(GetType(frmNotes))
|
||||
Dim GridLines1 As C1.Win.C1TrueDBGrid.Util.GridLines = New C1.Win.C1TrueDBGrid.Util.GridLines()
|
||||
Me.BtnNew = New System.Windows.Forms.Button()
|
||||
Me.BtnDelete = New System.Windows.Forms.Button()
|
||||
Me.NoteList = New C1.Win.C1TrueDBGrid.C1TrueDBGrid()
|
||||
Me.ContextMenu1 = New System.Windows.Forms.ContextMenu()
|
||||
Me.MenuItem1 = New System.Windows.Forms.MenuItem()
|
||||
Me.MenuItem2 = New System.Windows.Forms.MenuItem()
|
||||
CType(Me.NoteList, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'BtnNew
|
||||
'
|
||||
Me.BtnNew.Location = New System.Drawing.Point(544, 8)
|
||||
Me.BtnNew.Name = "BtnNew"
|
||||
Me.BtnNew.Size = New System.Drawing.Size(112, 24)
|
||||
Me.BtnNew.TabIndex = 1
|
||||
Me.BtnNew.Text = "Neue Notiz"
|
||||
'
|
||||
'BtnDelete
|
||||
'
|
||||
Me.BtnDelete.Location = New System.Drawing.Point(544, 312)
|
||||
Me.BtnDelete.Name = "BtnDelete"
|
||||
Me.BtnDelete.Size = New System.Drawing.Size(112, 24)
|
||||
Me.BtnDelete.TabIndex = 2
|
||||
Me.BtnDelete.Text = "Fenster schliessen"
|
||||
'
|
||||
'NoteList
|
||||
'
|
||||
Me.NoteList.AllowFilter = True
|
||||
Me.NoteList.AllowRowSizing = C1.Win.C1TrueDBGrid.RowSizingEnum.AllRows
|
||||
Me.NoteList.AllowSort = True
|
||||
Me.NoteList.AllowUpdate = False
|
||||
Me.NoteList.AllowUpdateOnBlur = False
|
||||
Me.NoteList.AlternatingRows = True
|
||||
Me.NoteList.BackColor = System.Drawing.Color.FromArgb(CType(224, Byte), CType(224, Byte), CType(224, Byte))
|
||||
Me.NoteList.CaptionHeight = 17
|
||||
Me.NoteList.CollapseColor = System.Drawing.Color.Black
|
||||
Me.NoteList.ContextMenu = Me.ContextMenu1
|
||||
Me.NoteList.DataChanged = False
|
||||
Me.NoteList.DeadAreaBackColor = System.Drawing.Color.Empty
|
||||
Me.NoteList.ExpandColor = System.Drawing.Color.Black
|
||||
Me.NoteList.GroupByCaption = "Drag a column header here to group by that column"
|
||||
Me.NoteList.Images.Add(CType(resources.GetObject("resource.Images"), System.Drawing.Bitmap))
|
||||
Me.NoteList.Location = New System.Drawing.Point(8, 8)
|
||||
Me.NoteList.MarqueeStyle = C1.Win.C1TrueDBGrid.MarqueeEnum.DottedCellBorder
|
||||
Me.NoteList.Name = "NoteList"
|
||||
Me.NoteList.PreviewInfo.Location = New System.Drawing.Point(0, 0)
|
||||
Me.NoteList.PreviewInfo.Size = New System.Drawing.Size(0, 0)
|
||||
Me.NoteList.PreviewInfo.ZoomFactor = 75
|
||||
Me.NoteList.PrintInfo.ShowOptionsDialog = False
|
||||
Me.NoteList.RecordSelectorWidth = 17
|
||||
GridLines1.Color = System.Drawing.Color.DarkGray
|
||||
GridLines1.Style = C1.Win.C1TrueDBGrid.LineStyleEnum.Single
|
||||
Me.NoteList.RowDivider = GridLines1
|
||||
Me.NoteList.RowHeight = 15
|
||||
Me.NoteList.RowSubDividerColor = System.Drawing.Color.DarkGray
|
||||
Me.NoteList.ScrollTips = False
|
||||
Me.NoteList.Size = New System.Drawing.Size(528, 328)
|
||||
Me.NoteList.TabIndex = 13
|
||||
Me.NoteList.Text = "C1TrueDBGrid1"
|
||||
Me.NoteList.PropBag = "<?xml version=""1.0""?><Blob><Styles type=""C1.Win.C1TrueDBGrid.Design.ContextWrappe" & _
|
||||
"r""><Data>Group{BackColor:ControlDark;Border:None,,0, 0, 0, 0;AlignVert:Center;}E" & _
|
||||
"ditor{}Style2{}Style5{}Style4{}Style7{}Style6{}EvenRow{BackColor:White;}Selected" & _
|
||||
"{ForeColor:HighlightText;BackColor:Highlight;}Style3{}Inactive{ForeColor:Inactiv" & _
|
||||
"eCaptionText;BackColor:InactiveCaption;}FilterBar{BackColor:255, 255, 192;}Foote" & _
|
||||
"r{}Caption{AlignHorz:Center;}Normal{BackColor:224, 224, 224;}HighlightRow{ForeCo" & _
|
||||
"lor:HighlightText;BackColor:Highlight;}Style9{}OddRow{BackColor:224, 224, 224;}R" & _
|
||||
"ecordSelector{AlignImage:Center;}Heading{Wrap:True;AlignVert:Center;Border:Raise" & _
|
||||
"d,,1, 1, 1, 1;ForeColor:ControlText;BackColor:Control;}Style8{}Style10{AlignHorz" & _
|
||||
":Near;}Style11{}Style12{}Style13{}Style1{}</Data></Styles><Splits><C1.Win.C1True" & _
|
||||
"DBGrid.MergeView Name="""" AlternatingRowStyle=""True"" CaptionHeight=""17"" ColumnCap" & _
|
||||
"tionHeight=""17"" ColumnFooterHeight=""17"" MarqueeStyle=""DottedCellBorder"" RecordSe" & _
|
||||
"lectorWidth=""17"" DefRecSelWidth=""17"" VerticalScrollGroup=""1"" HorizontalScrollGro" & _
|
||||
"up=""1""><ClientRect>0, 0, 524, 324</ClientRect><BorderSide>0</BorderSide><Caption" & _
|
||||
"Style parent=""Style2"" me=""Style10"" /><EditorStyle parent=""Editor"" me=""Style5"" />" & _
|
||||
"<EvenRowStyle parent=""EvenRow"" me=""Style8"" /><FilterBarStyle parent=""FilterBar"" " & _
|
||||
"me=""Style13"" /><FooterStyle parent=""Footer"" me=""Style3"" /><GroupStyle parent=""Gr" & _
|
||||
"oup"" me=""Style12"" /><HeadingStyle parent=""Heading"" me=""Style2"" /><HighLightRowSt" & _
|
||||
"yle parent=""HighlightRow"" me=""Style7"" /><InactiveStyle parent=""Inactive"" me=""Sty" & _
|
||||
"le4"" /><OddRowStyle parent=""OddRow"" me=""Style9"" /><RecordSelectorStyle parent=""R" & _
|
||||
"ecordSelector"" me=""Style11"" /><SelectedStyle parent=""Selected"" me=""Style6"" /><St" & _
|
||||
"yle parent=""Normal"" me=""Style1"" /></C1.Win.C1TrueDBGrid.MergeView></Splits><Name" & _
|
||||
"dStyles><Style parent="""" me=""Normal"" /><Style parent=""Normal"" me=""Heading"" /><St" & _
|
||||
"yle parent=""Heading"" me=""Footer"" /><Style parent=""Heading"" me=""Caption"" /><Style" & _
|
||||
" parent=""Heading"" me=""Inactive"" /><Style parent=""Normal"" me=""Selected"" /><Style " & _
|
||||
"parent=""Normal"" me=""Editor"" /><Style parent=""Normal"" me=""HighlightRow"" /><Style " & _
|
||||
"parent=""Normal"" me=""EvenRow"" /><Style parent=""Normal"" me=""OddRow"" /><Style paren" & _
|
||||
"t=""Heading"" me=""RecordSelector"" /><Style parent=""Normal"" me=""FilterBar"" /><Style" & _
|
||||
" parent=""Caption"" me=""Group"" /></NamedStyles><vertSplits>1</vertSplits><horzSpli" & _
|
||||
"ts>1</horzSplits><Layout>None</Layout><DefaultRecSelWidth>17</DefaultRecSelWidth" & _
|
||||
"><ClientArea>0, 0, 524, 324</ClientArea></Blob>"
|
||||
'
|
||||
'ContextMenu1
|
||||
'
|
||||
Me.ContextMenu1.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.MenuItem1, Me.MenuItem2})
|
||||
'
|
||||
'MenuItem1
|
||||
'
|
||||
Me.MenuItem1.Index = 0
|
||||
Me.MenuItem1.Text = "&Notiz anzeigen"
|
||||
'
|
||||
'MenuItem2
|
||||
'
|
||||
Me.MenuItem2.Index = 1
|
||||
Me.MenuItem2.Text = "&Neue Notiz erfassen"
|
||||
'
|
||||
'frmNotes
|
||||
'
|
||||
Me.AutoScaleBaseSize = New System.Drawing.Size(5, 13)
|
||||
Me.ClientSize = New System.Drawing.Size(664, 342)
|
||||
Me.Controls.AddRange(New System.Windows.Forms.Control() {Me.NoteList, Me.BtnDelete, Me.BtnNew})
|
||||
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedSingle
|
||||
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
|
||||
Me.Name = "frmNotes"
|
||||
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
|
||||
Me.Text = "Notizen"
|
||||
CType(Me.NoteList, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.ResumeLayout(False)
|
||||
|
||||
End Sub
|
||||
|
||||
#End Region
|
||||
|
||||
Public ondemand As AxARSOLELib.AxArsOle
|
||||
Public zf As Short = 100
|
||||
Public o As Object
|
||||
Public k As Object
|
||||
|
||||
Dim txtuser As String = ""
|
||||
Dim txtdatetime As String = ""
|
||||
Dim txttext As String = ""
|
||||
Dim page As Object
|
||||
Dim publ As Object
|
||||
Dim copied As Object
|
||||
Dim numnote As Object
|
||||
Dim ret As Short
|
||||
|
||||
|
||||
Dim m_notes As DataTable
|
||||
Property notes() As DataTable
|
||||
Get
|
||||
Return m_notes
|
||||
End Get
|
||||
Set(ByVal Value As DataTable)
|
||||
m_notes = Value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
|
||||
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
|
||||
Me.NoteList.DataSource = Me.notes
|
||||
Me.NoteList.DataMember = Me.notes.TableName
|
||||
DivFnkt.SpaltenTitel_Aktualisieren(Me.NoteList, Me.notes, "notizlist")
|
||||
End Sub
|
||||
|
||||
Private Sub BtnNew_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnNew.Click
|
||||
Dim f As New frmNewNote()
|
||||
f.ondemand = Me.ondemand
|
||||
f.ShowDialog()
|
||||
If f.DialogResult = DialogResult.OK Then
|
||||
get_annotations()
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Public Function get_annotations()
|
||||
Me.notes.Rows.Clear()
|
||||
Dim rc As DataRowCollection
|
||||
Dim newrow As DataRow()
|
||||
rc = notes.Rows
|
||||
Dim rowvals(7) As Object
|
||||
Dim i As Integer
|
||||
Me.numnote = Nothing
|
||||
ret = Me.ondemand.GetNumDocAnnotations(Me.numnote)
|
||||
|
||||
For i = 0 To Me.numnote - 1
|
||||
page = Nothing
|
||||
publ = Nothing
|
||||
copied = Nothing
|
||||
ret = Me.ondemand.GetAnnotationForDoc(i, txttext, txtuser, txtdatetime, page, publ, copied)
|
||||
rowvals(0) = i
|
||||
rowvals(1) = txttext
|
||||
rowvals(3) = txtuser
|
||||
rowvals(2) = txtdatetime
|
||||
rowvals(4) = page
|
||||
rowvals(5) = publ
|
||||
rowvals(6) = copied
|
||||
rowvals(7) = ""
|
||||
notes.Rows.Add(rowvals)
|
||||
Next
|
||||
Me.NoteList.DataSource = Me.notes
|
||||
Me.NoteList.DataMember = Me.notes.TableName
|
||||
DivFnkt.SpaltenTitel_Aktualisieren(Me.NoteList, Me.notes, "notizlist")
|
||||
For i = 0 To Me.notes.Rows.Count - 1
|
||||
Me.NoteList.Splits(0).Rows(i).AutoSize()
|
||||
Next
|
||||
End Function
|
||||
|
||||
Private Sub BtnDelete_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnDelete.Click
|
||||
Me.Close()
|
||||
End Sub
|
||||
|
||||
Private Sub frmNotes_Closing(ByVal sender As Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles MyBase.Closing
|
||||
Me.DialogResult = DialogResult.OK
|
||||
End Sub
|
||||
|
||||
Private Sub NoteList_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles NoteList.DoubleClick
|
||||
Try
|
||||
Dim f As New frmNoteDetail()
|
||||
f.TextBox2.Text = Me.NoteList.Columns(2).Text
|
||||
f.TextBox1.Text = Me.NoteList.Columns(1).Text
|
||||
f.ShowDialog()
|
||||
f.Dispose()
|
||||
Catch
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
Private Sub MenuItem1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MenuItem1.Click
|
||||
Try
|
||||
Dim f As New frmNoteDetail()
|
||||
f.TextBox2.Text = Me.NoteList.Columns(2).Text
|
||||
f.TextBox1.Text = Me.NoteList.Columns(1).Text
|
||||
f.ShowDialog()
|
||||
f.Dispose()
|
||||
Catch
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub MenuItem2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MenuItem2.Click
|
||||
Dim f As New frmNewNote()
|
||||
f.ondemand = Me.ondemand
|
||||
f.ShowDialog()
|
||||
If f.DialogResult = DialogResult.OK Then
|
||||
get_annotations()
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub ContextMenu1_Popup(ByVal sender As Object, ByVal e As System.EventArgs) Handles ContextMenu1.Popup
|
||||
If Me.notes.Rows.Count = 0 Then Me.MenuItem1.Enabled = False Else Me.MenuItem1.Enabled = True
|
||||
End Sub
|
||||
End Class
|
||||
223
EDOKA/OnDemand/frmcoldview.resx
Normal file
223
EDOKA/OnDemand/frmcoldview.resx
Normal file
@@ -0,0 +1,223 @@
|
||||
<?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="ImageList1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>411, 30</value>
|
||||
</metadata>
|
||||
<data name="ImageList1.ImageStream" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>
|
||||
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj0yLjAuMC4w
|
||||
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZTeXN0
|
||||
ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMAAAAU
|
||||
DgAAAk1TRnQBSQFMAgEBCwEAATQBAAE0AQABEAEAARABAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQCAAEo
|
||||
AwABQAMAATADAAEBAQABCAYAAQwYAAGAAgABgAMAAoABAAGAAwABgAEAAYABAAKAAgADwAEAAcAB3AHA
|
||||
AQAB8AHKAaYBAAEzBQABMwEAATMBAAEzAQACMwIAAxYBAAMcAQADIgEAAykBAANVAQADTQEAA0IBAAM5
|
||||
AQABgAF8Af8BAAJQAf8BAAGTAQAB1gEAAf8B7AHMAQABxgHWAe8BAAHWAucBAAGQAakBrQIAAf8BMwMA
|
||||
AWYDAAGZAwABzAIAATMDAAIzAgABMwFmAgABMwGZAgABMwHMAgABMwH/AgABZgMAAWYBMwIAAmYCAAFm
|
||||
AZkCAAFmAcwCAAFmAf8CAAGZAwABmQEzAgABmQFmAgACmQIAAZkBzAIAAZkB/wIAAcwDAAHMATMCAAHM
|
||||
AWYCAAHMAZkCAALMAgABzAH/AgAB/wFmAgAB/wGZAgAB/wHMAQABMwH/AgAB/wEAATMBAAEzAQABZgEA
|
||||
ATMBAAGZAQABMwEAAcwBAAEzAQAB/wEAAf8BMwIAAzMBAAIzAWYBAAIzAZkBAAIzAcwBAAIzAf8BAAEz
|
||||
AWYCAAEzAWYBMwEAATMCZgEAATMBZgGZAQABMwFmAcwBAAEzAWYB/wEAATMBmQIAATMBmQEzAQABMwGZ
|
||||
AWYBAAEzApkBAAEzAZkBzAEAATMBmQH/AQABMwHMAgABMwHMATMBAAEzAcwBZgEAATMBzAGZAQABMwLM
|
||||
AQABMwHMAf8BAAEzAf8BMwEAATMB/wFmAQABMwH/AZkBAAEzAf8BzAEAATMC/wEAAWYDAAFmAQABMwEA
|
||||
AWYBAAFmAQABZgEAAZkBAAFmAQABzAEAAWYBAAH/AQABZgEzAgABZgIzAQABZgEzAWYBAAFmATMBmQEA
|
||||
AWYBMwHMAQABZgEzAf8BAAJmAgACZgEzAQADZgEAAmYBmQEAAmYBzAEAAWYBmQIAAWYBmQEzAQABZgGZ
|
||||
AWYBAAFmApkBAAFmAZkBzAEAAWYBmQH/AQABZgHMAgABZgHMATMBAAFmAcwBmQEAAWYCzAEAAWYBzAH/
|
||||
AQABZgH/AgABZgH/ATMBAAFmAf8BmQEAAWYB/wHMAQABzAEAAf8BAAH/AQABzAEAApkCAAGZATMBmQEA
|
||||
AZkBAAGZAQABmQEAAcwBAAGZAwABmQIzAQABmQEAAWYBAAGZATMBzAEAAZkBAAH/AQABmQFmAgABmQFm
|
||||
ATMBAAGZATMBZgEAAZkBZgGZAQABmQFmAcwBAAGZATMB/wEAApkBMwEAApkBZgEAA5kBAAKZAcwBAAKZ
|
||||
Af8BAAGZAcwCAAGZAcwBMwEAAWYBzAFmAQABmQHMAZkBAAGZAswBAAGZAcwB/wEAAZkB/wIAAZkB/wEz
|
||||
AQABmQHMAWYBAAGZAf8BmQEAAZkB/wHMAQABmQL/AQABzAMAAZkBAAEzAQABzAEAAWYBAAHMAQABmQEA
|
||||
AcwBAAHMAQABmQEzAgABzAIzAQABzAEzAWYBAAHMATMBmQEAAcwBMwHMAQABzAEzAf8BAAHMAWYCAAHM
|
||||
AWYBMwEAAZkCZgEAAcwBZgGZAQABzAFmAcwBAAGZAWYB/wEAAcwBmQIAAcwBmQEzAQABzAGZAWYBAAHM
|
||||
ApkBAAHMAZkBzAEAAcwBmQH/AQACzAIAAswBMwEAAswBZgEAAswBmQEAA8wBAALMAf8BAAHMAf8CAAHM
|
||||
Af8BMwEAAZkB/wFmAQABzAH/AZkBAAHMAf8BzAEAAcwC/wEAAcwBAAEzAQAB/wEAAWYBAAH/AQABmQEA
|
||||
AcwBMwIAAf8CMwEAAf8BMwFmAQAB/wEzAZkBAAH/ATMBzAEAAf8BMwH/AQAB/wFmAgAB/wFmATMBAAHM
|
||||
AmYBAAH/AWYBmQEAAf8BZgHMAQABzAFmAf8BAAH/AZkCAAH/AZkBMwEAAf8BmQFmAQAB/wKZAQAB/wGZ
|
||||
AcwBAAH/AZkB/wEAAf8BzAIAAf8BzAEzAQAB/wHMAWYBAAH/AcwBmQEAAf8CzAEAAf8BzAH/AQAC/wEz
|
||||
AQABzAH/AWYBAAL/AZkBAAL/AcwBAAJmAf8BAAFmAf8BZgEAAWYC/wEAAf8CZgEAAf8BZgH/AQAC/wFm
|
||||
AQABIQEAAaUBAANfAQADdwEAA4YBAAOWAQADywEAA7IBAAPXAQAD3QEAA+MBAAPqAQAD8QEAA/gBAAHw
|
||||
AfsB/wEAAaQCoAEAA4ADAAH/AgAB/wMAAv8BAAH/AwAB/wEAAf8BAAL/AgAD/0UAA/89AAP/PQAD/z0A
|
||||
A/89AAP/PQAD/z0AA/89AAP/PQAD/xAAAUEQAAFBGwAD/w8AAkEQAAJBGgAD/w4AA0EQAANBGQAD/w0A
|
||||
BEEQAARBGAAD/w4AA0EQAANBGQAD/w8AAkEQAAJBLQABQRAAAUEXACAHIAACBwgACAcIAAYHFAAD/wkA
|
||||
AgcBAAX/AQcCAAcHAQAF/wEHAgAFBwMAAewBBwH7AgcBAAPsCAAD/wkAAgcBAAH/AQcB+gEHAf8BBwEA
|
||||
AQcBAAYHAQAB/wEHAfoBBwH/AQcBAAEHAQAEBwMAAewD/wH7Af8BAAH7AQcC7AYAA/8JAAIHAQAB/wEH
|
||||
AfoBBwH/AQcBAAH/AQcBAAUHAQAB/wEHAfoBBwH/AQcBAAH/AQcBAAMHBAAB7AH7A/8B+wEAAf8B+wEH
|
||||
AewFAAP/CQACBwEABv8FAAQHAQAG/wUAAgcEAAHsAv8B+wL/AQAB/wIAAewFAAP/CQACBwEAAf8DAAMH
|
||||
A/8BAAQHAQAE/wMHA/8BAAIHBQAB7AP/AfsB7AEAAf8B+wEHBQAD/wkAAgcBAAH/AvwBBAQHAv8BAAQH
|
||||
AQAD/wUHAv8BAAIHBwAB+wP/AfsC/wEHBQAD/wkAAgcBAAEHAvwBBAUHAf8BAAMHCQACBwH/AQACBwUA
|
||||
AgEBAAH/AfsD/wH7AQcFAAP/CQABBwMEAvwDBAEAAgcB/wEAAgcJ+QEAAgcB/wEAAgcBAAIBAwABAQEA
|
||||
A/8B+wL/AQcFAAP/CQABBwj8AQACBwH/AQACBwn5AQACBwH/AQACBwEAAfkBAQEAAfkBAAEBAwAD/wH7
|
||||
AQcFAAP/CQABBwX8AwQE/wEAAgcJ+QEAA/8BAAIHAQAC+QIAAvkBAAP/AfsC/wEHBQAD/wkAAgcBAAH/
|
||||
AvwBBAEHBf8BAAIHCfkE/wEAAgcHAAL/AfsD/wH7AQcFAAP/CQACBwEAAf8C/AEEBv8BAAQHAQAK/wEA
|
||||
AgcFAAHsAf8B+wP/AfsC/wEHBQAD/wkAAgcBAAr/AQAEBwEACv8BAAIHBQAK7AUAA/8JAAIHDAAEBwwA
|
||||
AgdAACAHBgABAwH/CgALEwMAIAcEAAHsAQMB7AH/CQABEwm8ARMBvAETAgAgBwIAAQMB7AEDAewBAwH/
|
||||
CAANEwG8ARMBAAkHAe8BkgLsCAcB7AH3CQcBAAEDAewBAwHsAQMB7AH/AQAB7AYAARMGvANeArwDEwEA
|
||||
CAcB7AHrARIBAAHsCAcBDgHrAewIBwEAAewBAwHsAQMB7AEDAf8BAAHsBgABEwa8A+8CvAETAbwBEwEA
|
||||
BgcB7QHsARABDgIAAewIBwIAARAC7AGSBQcBAAEDAewBAwIAAewB/wEAAewGAA0TArwBEwUHAewBEgUA
|
||||
AewIBwQAAUMB6gUHAQAB7AEDAewCBwEDAf8BAAHsAQABBgQAARMKvAETAbwBEwG8ARMEBwFtBwAB7AgH
|
||||
BwAEBwEAAQMB7AEDAewBAwHsAf8CAAEGBf4BAAoTAbwBEwG8AhMEBwGSAW0GAAHsCAcFAAEPAewEBwEA
|
||||
AewBAwHsAQMB7AEDAf8BAAFtBv4CAAETCP8BEwG8ARMBvAETBwcBQwQAAewIBwMAAUMB7AYHAQABAwHs
|
||||
AQMB7AEDAewB/wEAAewBbQH+BG0DAAETAf8FEwH/BBMBAAgHAe8BFQIAAewIBwIAAe8IBwEAAewBAwHs
|
||||
AQMB7AEDAf8BAAHsAQACbQYAARMI/wETAwAKBwHvAW0JBwFtCgcBAAEDAewBAwHsAQcB/wHsAQAB7AIA
|
||||
AW0HAAETAf8FEwH/ARMDACAHAQAB7AEDAQcB/wHsAQAD7AoAARMI/wETAgAgBwEAAQcB/wHsAQAF7AsA
|
||||
CRMCACAHIAAgBwFCAU0BPgcAAT4DAAEoAwABQAMAATADAAEBAQABAQUAAYABARYAA/8BAAb/AgABgQX/
|
||||
AgABgQH/AfwBHwH4AT8CAAGBAv8B7wH3Af8CAAGBAv8B9wHvAf8CAAGBAe8B/wH7Ad8B/wIAAYEB7wH/
|
||||
AfsB3wH/AgABgQHvAf8B+wHfAf8CAAGBAQEB/wH7Ad8B/wIAAYEB7wH+AfsB3wF/AgABgQHvAfwB9wHv
|
||||
AT8CAAGBAe8B+AHvAfcBHwIAAYEB/wHwAR8B+AEPAgABgQH/AfgC/wEfAgABgQH/AfwC/wE/AgAC/wH+
|
||||
Av8BfwYABP8EAAHwAQ8BgQH/BAAB4AEDAYEB/wQAAeABAQGBAf8EAAHwAQABgQH/BAAB8AEAAYEB/wQA
|
||||
AfgBAAGBAf8EAAH4AQABgQH/BAABkAEAAYEBAQYAAYEB/wYAAYEB/wYAAYEB/wQAAZgBAAGBAf8EAAH4
|
||||
AQABgQH/BAAB+AEAAYEB/wQABP8B/AF/Av8EAAHwAX8BwAEHBAABwAF/AYABAwUAAR8BAAEBBQABHwEA
|
||||
AQEFAAEXAQABAQUAAQcQAAGABwABwAcAAeABAQUAAQcB4AEHBQABFwHwAQcFAAEfAfABAwUAAR8B+AED
|
||||
BQABHwL/BAAL
|
||||
</value>
|
||||
</data>
|
||||
<metadata name="PrintDocument1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>517, 30</value>
|
||||
</metadata>
|
||||
<assembly alias="System.Drawing" name="System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
|
||||
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
AAABAAEAEBAAAAEACABoBQAAFgAAACgAAAAQAAAAIAAAAAEACAAAAAAAQAEAAAAAAAAAAAAAAAAAAAAA
|
||||
AACAgIAAAAAAAP///wDAwMAA2q+vAOfLywDNlJQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAQEBAAEBAQEBAQEBAQEBAQEBAQACAwMCAwMDAgMBAQEBAQEAAgICAgICAgIDAQEBAQEBAAID
|
||||
AwIDAwMCAwEBAQEBAQACAgICAgICAgMBAQEBAQEAAgMDAwMDAwIDAQEBAQEBAAICAgICAgICAwEBAQEB
|
||||
AQACAwMDAwIDAgMBAQEBAQEAAgICAgICAgIDAQEBAQEBAAIDAwMDAgICAwEBAQEBAQACAgICAgIBAQEB
|
||||
AQEBAQEAAgMDAwMCAAIBAQEBAQEBAAICAgICAgABAQEBAQEBAQAAAAAAAAAAAQEBAQEBAQEBAQEBAQEB
|
||||
AQEBAQEBAQEBAQEBAQEBAQEBAQEBAeADAADgAwAA4AMAAOADAADgAwAA4AMAAOADAADgAwAA4AMAAOAD
|
||||
AADgAwAA4AcAAOAPAADgHwAA//8AAP//AAA=
|
||||
</value>
|
||||
</data>
|
||||
</root>
|
||||
1339
EDOKA/OnDemand/frmcoldview.vb
Normal file
1339
EDOKA/OnDemand/frmcoldview.vb
Normal file
File diff suppressed because it is too large
Load Diff
BIN
EDOKA/OnDemand/vssver.scc
Normal file
BIN
EDOKA/OnDemand/vssver.scc
Normal file
Binary file not shown.
Reference in New Issue
Block a user