/[AnywhereTS-MSSQL]/trunk/VBDLL/My Project/Settings.Designer.vb
ViewVC logotype

Contents of /trunk/VBDLL/My Project/Settings.Designer.vb

Parent Directory Parent Directory | Revision Log Revision Log


Revision 111 - (show annotations) (download)
Sat Jul 14 07:07:25 2012 UTC (7 years, 7 months ago) by william
File size: 3751 byte(s)
+ upgrade to VS2010

1 '------------------------------------------------------------------------------
2 ' <auto-generated>
3 ' This code was generated by a tool.
4 ' Runtime Version:4.0.30319.269
5 '
6 ' Changes to this file may cause incorrect behavior and will be lost if
7 ' the code is regenerated.
8 ' </auto-generated>
9 '------------------------------------------------------------------------------
10
11 Option Strict On
12 Option Explicit On
13
14
15 Namespace My
16
17 <Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(), _
18 Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Editors.SettingsDesigner.SettingsSingleFileGenerator", "10.0.0.0"), _
19 Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
20 Partial Friend NotInheritable Class MySettings
21 Inherits Global.System.Configuration.ApplicationSettingsBase
22
23 Private Shared defaultInstance As MySettings = CType(Global.System.Configuration.ApplicationSettingsBase.Synchronized(New MySettings()),MySettings)
24
25 #Region "My.Settings Auto-Save Functionality"
26 #If _MyType = "WindowsForms" Then
27 Private Shared addedHandler As Boolean
28
29 Private Shared addedHandlerLockObject As New Object
30
31 <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
32 Private Shared Sub AutoSaveSettings(ByVal sender As Global.System.Object, ByVal e As Global.System.EventArgs)
33 If My.Application.SaveMySettingsOnExit Then
34 My.Settings.Save()
35 End If
36 End Sub
37 #End If
38 #End Region
39
40 Public Shared ReadOnly Property [Default]() As MySettings
41 Get
42
43 #If _MyType = "WindowsForms" Then
44 If Not addedHandler Then
45 SyncLock addedHandlerLockObject
46 If Not addedHandler Then
47 AddHandler My.Application.Shutdown, AddressOf AutoSaveSettings
48 addedHandler = True
49 End If
50 End SyncLock
51 End If
52 #End If
53 Return defaultInstance
54 End Get
55 End Property
56
57 <Global.System.Configuration.ApplicationScopedSettingAttribute(), _
58 Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
59 Global.System.Configuration.SpecialSettingAttribute(Global.System.Configuration.SpecialSetting.ConnectionString), _
60 Global.System.Configuration.DefaultSettingValueAttribute("Data Source=.\SQLEXPRESS;AttachDbFilename=""C:\Documents and Settings\ab\My Docume"& _
61 "nts\AnywhereTS\TS-CONIFG\SOURCE\TSAdminTool\ats.mdf"";Integrated Security=True;Us"& _
62 "er Instance=True")> _
63 Public ReadOnly Property atsConnectionString() As String
64 Get
65 Return CType(Me("atsConnectionString"),String)
66 End Get
67 End Property
68 End Class
69 End Namespace
70
71 Namespace My
72
73 <Global.Microsoft.VisualBasic.HideModuleNameAttribute(), _
74 Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
75 Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute()> _
76 Friend Module MySettingsProperty
77
78 <Global.System.ComponentModel.Design.HelpKeywordAttribute("My.Settings")> _
79 Friend ReadOnly Property Settings() As Global.AnywhereTS.My.MySettings
80 Get
81 Return Global.AnywhereTS.My.MySettings.Default
82 End Get
83 End Property
84 End Module
85 End Namespace

  ViewVC Help
Powered by ViewVC 1.1.22