Visualizzazione dei risultati da 1 a 3 su 3
  1. #1

    Problema con funzione

    Salve a tutti ho un piccolo probemino.

    Ho una funzione getDataOra() che a seconda dell'ora e della lingua saluta il visitatore:


    codice:
        Public Sub getDataOra()
    
            If (CInt(Date.Now.Hour) > 6) And (CInt(Date.Now.Hour) < 12) Then
    
                If Culture = "it-IT" Then
                    Response.Write("Buongiorno visitatore ")
                Else
                    Response.Write("Goodmorning visitor ")
                End If
    
                Response.Write(Date.Now)
            ElseIf (CInt(Date.Now.Hour) > 12) And (CInt(Date.Now.Hour) < 18) Then
    
                If Culture = "Italiano (Italia)" Then
                    Response.Write("Buon pomeriggio visitatore ")
                Else
                    Response.Write("Good afternoon visitor ")
                End If
    
                Response.Write(Date.Now)
            ElseIf (CInt(Date.Now.Hour) > 18) And (CInt(Date.Now.Hour) < 23) Then
    
                If Culture = "Italiano (Italia)" Then
                    Response.Write("Buonasera visitatore ")
                Else
                    Response.Write("Good evening visitor ")
                End If
    
                Response.Write(Date.Now)
            Else
    
                If Culture = "Italiano (Italia)" Then
                    Response.Write("Salve visitatore ")
                Else
                    Response.Write("Hi visitor ")
                End If
    
                Response.Write(Date.Now)
            End If
    
        End Sub
    In locale funziona alla grande, ma in remoto sull'host la frasetta è sempre e comunque in lingua inglese anche cambiando lingua dagli appositi tasti.

    Se invece di If Culture = "Italiano (Italia)" inserisco "it-IT" non va....altre soluzioni?

  2. #2
    Moderatore di ASP.net L'avatar di djciko
    Registrato dal
    Nov 2002
    Messaggi
    6,887
    Scusa, a parte il tuo problema, ma "Response.Write(Date.Now)" non puoi posizionarlo prima della fine della sub ?

    Inoltre, come ricavi Culture ?

  3. #3
    Infatti.....piccola svista grazie cmq

    Il culture info lo recupero cosi



    Dim c as CultureInfo
    .
    .
    .
    c = CultureInfo.CreateSpecificCulture("it-IT")
    Thread.CurrentThread.CurrentCulture = c
    Thread.CurrentThread.CurrentUICulture = c
    Ecco, cosi è implementato nell'evento click del tasto cmdItaliano.

    Stessa cosa per l'inglese ma:

    c = CultureInfo.CreateSpecificCulture("en-US")

Permessi di invio

  • Non puoi inserire discussioni
  • Non puoi inserire repliche
  • Non puoi inserire allegati
  • Non puoi modificare i tuoi messaggi
  •  
Powered by vBulletin® Version 4.2.1
Copyright © 2026 vBulletin Solutions, Inc. All rights reserved.