Visual Basic

26-Apr-07 6:01

Hi,

I just can't access the information in the AppSettings part of my appConfig file.

I have used the following statements -

1/ strKeys = ConfigurationManager.AppSettings.AllKeys

and strKeys.Count = 0

2/ ConfigurationManager.AppSettings.Count

this equals 0 too

3/ ConfigurationManager.AppSettings("theName")

this returns 'nothing'

The appConfig file has been created through the Settings of the IDE and compiles just fine.

Please can anyone help. I would be very grateful.

Many thanks,

Polly Anna

Dave Kreskowiak26-Apr-07 6:38

26-Apr-07 6:38

Without seeing your App.Config file (make sure you enable the "Ignore HTML tags in this message" checkbox before you post it!), it's impossible to tell you why it failed. The App.Config is nothing but an XML text file that is NOT compiled into your app. Therefore, you won't get any error message if it's not formatting properly.

Dave Kreskowiak
Microsoft MVP
Visual Developer - Visual Basic
2006, 2007

kubben26-Apr-07 8:12

kubben

26-Apr-07 8:12

When you make changes to your app.config file you need to build your app and then your exename.exe.config file gets created.

So I am guessing that either you changed your app.config file and didn't recompile. Or you changed your exename.exe.config file and then built your app and it got wiped out.

Note you don't get an app.config file by default. If you add one to the project you still have to add the appSetting section.
<?xml version="1.0" encoding="utf-8" ?>
<configuration>
<appSettings>

Hope that helps.
Ben

PollyAnna33326-Apr-07 22:14

26-Apr-07 22:14

Hi Ben, Hi Dave,

Thank you for your responses.

I have used the VS2005 Express Edition IDE, Project > Properties > Settings to specify the Application Settings part of the config file.

I have put a copy of the original appconfig file below.

After what you said about what my config file should look like, I removed the following enclosing tags

<applicationSettings>
<EmailProcessor.My.MySettings>

bla bla bla settings

</EmailProcessor.My.MySettings>
</applicationSettings>

and replaced them with these -

<appSettings>
bla bla bla settings
</appSettings>

but it still did not work.

My VB.Net code that tries to access the information in the AppConfig file is as follows -

A/ i = System.Configuration.ConfigurationManager.AppSettings.Count

This outputs zero

B/ strMailServerName = ConfigurationManager.AppSettings("PW03MailServer")

This outputs nothing

C/ strMailServerName = My.Settings.PW03MailServer

This outputs the correct information - but I cannot use it as I
want to allow many subscribers to use this program.

Thank you very much for your thoughts to date. I would be very pleased if you could help me find out why this isn't working.

Kind regards,

Polly Anna

A/ Original config file

<?xml version="1.0" encoding="utf-8" ?>
<configuration>
<configSections>
<sectionGroup name="applicationSettings" type="System.Configuration.ApplicationSettingsGroup, System, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" >
<section name="EmailProcessor.My.MySettings" type="System.Configuration.ClientSettingsSection, System, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" requirePermission="false" />
</sectionGroup>
<sectionGroup name="userSettings" type="System.Configuration.UserSettingsGroup, System, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" >
<section name="EmailProcessor.My.MySettings" type="System.Configuration.ClientSettingsSection, System, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" allowExeDefinition="MachineToLocalUser" requirePermission="false" />
</sectionGroup>
</configSections>
<system.diagnostics>
<sources>

<source name="DefaultSource" switchName="DefaultSwitch">
<listeners>
<add name="FileLog"/>


</listeners>
</source>
</sources>
<switches>
<add name="DefaultSwitch" value="Information" />
</switches>
<sharedListeners>
<add name="FileLog"
type="Microsoft.VisualBasic.Logging.FileLogTraceListener, Microsoft.VisualBasic, Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a, processorArchitecture=MSIL"
initializeData="FileLogWriter"/>


</sharedListeners>
</system.diagnostics>

<applicationSettings>
<EmailProcessor.My.MySettings>
<setting name="MCMSCefasMailServerName" serializeAs="String">
<value>LOWEXPRESS</value>
</setting>
<setting name="MCMSCefasMailBoxName" serializeAs="String">
<value>MCMS_OLC_Cefas</value>
</setting>
<setting name="MCMSCefasMailBoxPassword" serializeAs="String">
<value>password</value>
</setting>
<setting name="MCMSCefasAttachmentType" serializeAs="String">
<value>xml</value>
</setting>
<setting name="MCMSCefasFolder" serializeAs="String">
<value>C:\Folder</value>
</setting>
<setting name="PW03MailServer" serializeAs="String">
<value>LOWEXPRESS</value>
</setting>
<setting name="PW03MailBoxName" serializeAs="String">
<value>PW03</value>
</setting>
<setting name="PW03MailBoxPassword" serializeAs="String">
<value>daniel1132</value>
</setting>
<setting name="PW03AttachmentType" serializeAs="String">
<value>xml</value>
</setting>
<setting name="PW03Folder" serializeAs="String">
<value>C:\Polly'sFolder</value>
</setting>
<setting name="PW03LogFile" serializeAs="String">
<value>C:\Polly'sFolder</value>
</setting>
<setting name="MCMSCefasLogFile" serializeAs="String">
<value>C:\Folder</value>
</setting>
</EmailProcessor.My.MySettings>
</applicationSettings>
</configuration>

PollyAnna33327-Apr-07 5:09

27-Apr-07 5:09

I've found out what the problem was.

I was using a windows form in another project (i.e. Solution had 2 projects), so it was reading the appConfig file of the windows form and not of the Class library.

Really sorry to have wasted everybody's time - including my own and thank you very much for your suggestions which I have used - i.e. I have used <appsettings> as opposed to <applicationsettings>

Thank you once again.

Kind regards,

Polly Anna

kubben27-Apr-07 8:11

kubben

27-Apr-07 8:11

Normall in appSettings the values you can access through
System.Configuration.ConfigurationManager.AppSettings

Are set like this:
<applicationSettings>
<add key="MCMSCefasMailServerName" value="LOWEXPRESS"/>
<add key="MCMSCefasMailBoxName" value="MCMS_OLC_Cefas"
...

That is how you get values into your appsettings.
When you use the settings parameters you have created a new config section so you would handle that differently. I would suggest you manually change the entries to match my example above and it should work fine.

Hope that helps.
Ben

PollyAnna33329-Apr-07 21:13

Write a tag to a jpeg file in Vista

29-Apr-07 21:13

Hi Ben,

yes that is a big help - thank you very much.

Kind regards,

Polly

bigshop26-Apr-07 5:56

bigshop

26-Apr-07 5:56

Im looking for a way to write a tag to a jpeg file in Vista
I have a lot of existing jpeg files and I would like to be able to set the tag for them from within my program
Anybody have an example or any reference they can point me to

Thanks

Check for keypress on timer tick

RyanPotter26-Apr-07 5:36

RyanPotter

26-Apr-07 5:36

Hey guys, I have a bit of code that's giving me trouble. I have an If Then statement within a timer which checks if the user has pressed a certain key. If so, it should display a messagebox, but every time the timer ticks, it displays the messagebox regardless of any buttons being pressed. Here's the code:

  Private Sub UpTimer_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles UpTimer.Tick<br />
<br />
        If Keys.Up Then<br />
            MessageBox.Show("", "")<br />
        End If<br />
<br />
End Sub

Thanks!

Re: Check for keypress on timer tick

Dave Kreskowiak26-Apr-07 5:45

Re: Check for keypress on timer tick

26-Apr-07 5:45

This is because you're code is checking the value of the enumeration Keys.Up against 0, which will always return true since there is no key with a scancode of 0.

Your code won't work. As there is nothing that holds the value of the last key pressed. You don't need a Timer for this. All you need to do is handle the form's KeyDown event.

Private Sub Form1_KeyDown(ByVal sender As Object, ByVal e As KeyEventArgs) Handles Me.KeyDown
    If e.KeyCode = Keys.Up Then
        MessageBox.Show("", "")
    End If
End Sub

Oh...I almost forgot. In order for the Form's Key events to work, you have to enable it's KeyPreview property. This gives the form the first look at the keys being hit, instead of the keys being sent directly to the controls on the form.

Me.KeyPreview = True

Dave Kreskowiak
Microsoft MVP
Visual Developer - Visual Basic
2006, 2007

RyanPotter26-Apr-07 5:53

RyanPotter

26-Apr-07 5:53

Yes, I know that you can do that, but I only want this to occur when the timer is on. Once the timer turns off I want the key to do something else. I also have other things within the timer, I just showed you the problem area. The other things in the code don't affect the outcome if this.

If I wanted to do this within my timer, how would I do that?

Re: Check for keypress on timer tick

Dave Kreskowiak26-Apr-07 6:18

Comparitive function for Format() in .NET

26-Apr-07 6:18

Exactly the same thing, but, in the KeyDown event, you'd save the KeyCode off to a class-scoped variable that you check in your If statement in the Timer Tick event.

Public Class MyForm
 
    Private LastKey As Keys
 
    Keydown Handler    
         LastKey = e.KeyCode

    Tick Handler
    If LastKey = Keys.Up Then
        ...
    End If

Dave Kreskowiak
Microsoft MVP
Visual Developer - Visual Basic
2006, 2007

Marcus J. Smith26-Apr-07 5:05

Marcus J. Smith

26-Apr-07 5:05

I like to be a .NET purist, meaning that if I know something is a VB6 specific function I want to try to avoid it. In doing so there are times that the work around becomes a hassle as is the case with Format(). Say I have a string strValue = "0001" and I want to add some characters around it and within it. If I were to say use Format(strValue, "**000/0**) I believe I would end up with "**000/1**". What is the equivalent of that with .NET without concatenating strings? String.Format() gives a different output.

_Cle^aKO

"I think you'll be okay here, they have a thin candy shell. 'Surprised you didn't know that.'" - Tommy (Tommy Boy)
"Fill it up again! Fill it up again! Once it hits your lips, it's so good!" - Frank the Tank (Old School)

Re: Comparitive function for Format() in .NET

Dave Kreskowiak26-Apr-07 5:40

Re: Comparitive function for Format() in .NET

26-Apr-07 5:40

CleaKO wrote:
strValue = "0001"

CleaKO wrote:
Format(strValue, "**000/0**)

The old string formatting characters in VB6, I think the whole set was "@&<>!", are no longer supported in VB.NET. They've been supplanted with something like this:

Debug.Print(String.Format("**000{0,8}0**", "ABC123"))
 
Results:
    **000  ABC1230**

Or, for a left-justified field:

Debug.Print(String.Format("**000{0,-8}0**", "ABC123"))
 
Results:
    **000ABC123  0**

The 8 and -8 just say that this field, whatever ends up in it, must be 8 characters wide and should be padded with spaces. The 0 means that this is the placeholder for the first expression argument.

Dave Kreskowiak
Microsoft MVP
Visual Developer - Visual Basic
2006, 2007

mabo4226-Apr-07 5:40

mabo42

26-Apr-07 5:40

Not sure, what you are trying to accomplish, but if you use the numeric value of strValue, it would be something like that:

string s = "0001";
s = string.Format("**{0:000/0}**", Convert.ToInt32(s));

Sorry that's c#, assume similar syntax for VB.

Hope that helps.

Treeview Topnode problem

dBrong26-Apr-07 5:02

dBrong

26-Apr-07 5:02

I build a treeview from data sorted alpha. Everything works fine, looks fine.

However treeview.topnode.ensurevisible() is at about the 4 th node.

Treeview.Nodes(0).Ensurevisible() works!

Does anyone know what property VB uses to determine the top node?

Re: Treeview Topnode problem

Dave Kreskowiak26-Apr-07 5:19

Re: Treeview Topnode problem

26-Apr-07 5:19

It sounds like you've assumed that TopNode returns the root node of the Tree. Reading the documentation tells you what is really means. TopNode returns the first fully-visible node displayed in the TreeView.

And it's not VB that makes this determination, it's the code in the TreeView code in the .NET Framework.

Dave Kreskowiak
Microsoft MVP
Visual Developer - Visual Basic
2006, 2007

dBrong26-Apr-07 14:05

dBrong

26-Apr-07 14:05

Silly me, I assumed the top node was the Top Node! Thanks for the clarification.

CodeDom : How to write #region blocks?

Duncan Edwards Jones26-Apr-07 3:46

Duncan Edwards Jones

26-Apr-07 3:46

I am using CodeDom to write some code.

e.g. To create a class:-

<br />
    Dim _generator As System.CodeDom.Compiler.ICodeGenerator<br />
    Dim _writer As System.IO.TextWriter<br />
    Dim _codeGenOptions As System.CodeDom.Compiler.CodeGeneratorOptions<br />
<br />
        'Set the desired language to vb<br />
        Dim foo As New Microsoft.VisualBasic.VBCodeProvider<br />
        _generator = foo.CreateGenerator("C:\duncan.vb")<br />
<br />
<br />
        'Set the code generation options to be used when creating this class<br />
        _codeGenOptions = New System.CodeDom.Compiler.CodeGeneratorOptions<br />
        _codeGenOptions.BlankLinesBetweenMembers = True<br />
        _codeGenOptions.VerbatimOrder = False<br />
<br />
        If Not _generator Is Nothing Then<br />
            _writer = New System.IO.StreamWriter(fi.FullName)<br />
<br />
            Dim _myDocumentClass As New CodeTypeDeclaration("DuncansClass")<br />
            _myDocumentClass.Attributes = MemberAttributes.Public<br />
            _myDocumentClass.Comments.Add(New CodeCommentStatement(" Created " & System.DateTime.Now.ToString))<br />
<br />
                        Dim _txtmember As New CodeMemberField<br />
                        _txtmember.Type = New CodeTypeReference("System.String")<br />
                        _txtmember.Attributes = MemberAttributes.Private<br />
                        _txtmember.Name = _generator.CreateValidIdentifier("_Duncan_Text")<br />
                        _txtmember.Comments.Add(New CodeCommentStatement("Text to use here "))<br />
                        _myDocumentClass.Members.Add(_txtmember)<br />
<br />
        End If<br />
<br />
_generator.GenerateCodeFromType(_myDocumentClass, _writer, _codeGenOptions)<br />

which creates the code:

<br />
'Created 2007-04-21<br />
Public Class DuncansClass<br />
<br />
   'Text to use here<br />
   Private _Duncan_text As String<br />
   <br />
End Class<br />

Any Ideas as to how I could put the private member declaration in a region using codeDom?
e.g.

<br />
'Created 2007-04-21<br />
Public Class DuncansClass<br />
<br />
  #Region "Private members"<br />
   'Text to use here<br />
   Private _Duncan_text As String<br />
   #End Region<br />
<br />
End Class<br />

'--8<------------------------
Ex Datis:
Duncan Jones
Merrion Computing Ltd

Re: CodeDom : How to write #region blocks?

Dave Kreskowiak26-Apr-07 6:49

Re: CodeDom : How to write #region blocks?

26-Apr-07 6:49

Could you be looking for the CodeRegionDirective[^] class? Be careful, not all languages support Regions!

Dave Kreskowiak
Microsoft MVP
Visual Developer - Visual Basic
2006, 2007

Duncan Edwards Jones26-Apr-07 22:19

Duncan Edwards Jones

26-Apr-07 22:19

Excellent - that did the trick, thanks...

'--8<------------------------
Ex Datis:
Duncan Jones
Merrion Computing Ltd

Re: CodeDom : How to write #region blocks?

Dave Kreskowiak27-Apr-07 10:11