ViewVC Help
View File | Revision Log | Show Annotations | Download File | View Changeset | Root Listing
root/AnywhereTS-MSSQL/branches/anywherets.r2.sourceforge/VBDLL/My Project/Settings.Designer.vb
Revision: 5
Committed: Wed Jul 11 15:09:09 2012 UTC (10 years, 10 months ago) by william
File size: 3749 byte(s)
Log Message:
Created branch: anywherets.r2.sourceforge
Snapshot of: https://anywherets.svn.sourceforge.net/svnroot/anywherets/trunk/
at Revision 2

File Contents

# User Rev Content
1 william 4 '------------------------------------------------------------------------------
2     ' <auto-generated>
3     ' This code was generated by a tool.
4     ' Runtime Version:2.0.50727.3607
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", "9.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