Problema MonthName(Month(Date())-1)

[neodani]

Buenas,

Tengo un problema esta linea ha dejado de funcionar ahora en enero del 2010

nombremesanterior=MonthName(Month(Date())-1)


Intuyo que el problema es que el hará un 1 - 1 y peta el mes 0
¿Sabéis como puedo obtener en la variable nombremesanterior el mes de diciembre de 2009?

Muchas gracias de antemano!

[eperedo]

Prueba con algo así:

Código vb.net:

Dim mes As String = MonthName(Month(Date.Now.AddMonths(-1)))
MessageBox.Show(mes)
 

Es algo más largo, pero funciona bien y no creo que influya en tu código.

[triqui]

Está en C# pasarla a VB no te costara mucho, con texto en castellano.

using System.Globalization;

string mes = Convert.ToString(CultureInfo.CurrentCulture.DateTi meFormat.GetMonthName(DateTime.Now.AddMonths(-1).Month));

[JonaRock]

Hola NeoDani

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim nombremesanterior As String = ""
nombremesanterior = MonthName(Date.Now.Month) TextBox1.Text = nombremesanterior
End Sub

Con eso solucionas tu problema.

[JonaRock]

Disculpa, esta es la respuesta correcta =)

Dim nombremesanterior As String = ""
If (Date.Now.Month = 1) Then
nombremesanterior = MonthName(Date.Now.Month)
TextBox1.Text = nombremesanterior
Else
nombremesanterior = MonthName(Date.Now.Month - 1)
TextBox1.Text = nombremesanterior
End If

[neodani]

Creo que me he colado y esto no es .net sino que es simple ASP. Por lo que las respuestas que me habéis dado no me funcionan, lo siento :(

Si podéis mover el tema al otro foro o ayudarme de nuevo pensando que es ASP clásico...

Muchas gracias!