Son Dakika Haberlerini Takip Edebileceğiniz FrmTR Haber Yayında.
Forum TR
Go Back   Forum TR > Programlama Dilleri Yazılım Teknolojileri ve Algoritmalar > ASP, Perl, Php, Html
FrmTR'ye Reklam Vermek İçin: [email protected]

calendar türkçe dil sorunu yardım

Programlama Dilleri Yazılım Teknolojileri ve Algoritmalar Kategorisinde ve ASP, Perl, Php, Html Forumunda Bulunan calendar türkçe dil sorunu yardım Konusunu Görüntülemektesiniz => merhaba bir takvim uygulaması buldum fakat sunucuda tarihler ingilizce çıkıyo ben türkçe ocak şubat mart diye çıksın istiyorum aşağıdaki kodlarda ...

Cevapla
 
Konu Araçları
Eski 07-01-11, 03:24   #1

Varsayılan calendar türkçe dil sorunu yardım


merhaba

bir takvim uygulaması buldum fakat sunucuda tarihler ingilizce çıkıyo ben türkçe ocak şubat mart diye çıksın istiyorum aşağıdaki kodlarda değişiklik yapacakmışım am yapamadım bir türlü lütfen biri bana yardım etsin bu kodlarla takvimin türkçe olmasını nasıl sağlayacam açıklama kısımlarını değiştirebiliyorum 1055 yaptım olmadı nasıl yazmalıyım lütfen yardım kodlar şu şekilde

<% Response.buffer = true
'----------------------------------------------------------------------------------------
'- WEB Calendar Application - Version 2.5 - 05 December 2005
'- Copyright © 2005 - Livio Siri () - All Rights Reserved.
'----------------------------------------------------------------------------------------
'##### CONFIGURATION ##################################
'#### EDIT YOUR LOGIN USERNAME and PASSWORD HERE ####
UserName = "admin"
Password = "pass"
'--- Password protect add/edit/delete
bProtect = True
'-- The database name
dbcalendar = "calendar25.mdb"
'--- The database path on Server (this dir MUST have write permission on server)
' dbremotepath = "C:\inetpub\wwwroot\yourdomain\calendar\databa se\"
dbremotepath = Server.MapPath("/calendar/database") & "/"
'--- The local database path (OPTIONAL, for local PWS debugging purpose only)
' dblocalPath = "C:\inetpub\wwwroot\calendar\database\"
dblocalPath = Server.MapPath("/calendar/database") & "/"
'--- The calendar files path refered to the root path
sScriptDir ="/calendar/"
'--- Events are shown in a pop-up window (True) or in your own events page (False)
bEventsPopUp = False
'--- If bEventsPopUp = False then define here your own events calendar page name and path refered to the root path
sCalendarEventsPage = "/calendar_events.asp"
'--- Show upcoming events
bUpcomingEvents = True
'--- How many upcoming events
iUpcomingEvents = 10
'--- Show bottom info line for next month events
bNextMonth = False
'--- Show daily/weekly events checkbox selection
bWeeklyEvents = True
'--- Show weekly events at start
bWeeklyEventsStart = False

'##### EMAIL EVENT REMINDER Config #################
bEmailer = False '--- Enable/disable email reminder feature
intEmailDays = 5 '--- How many days before event should the email reminder be sent
sFrom = "Calendar Reminder" '--- Sender description and subject
sAdministratorsEmail = "[Linkleri sadece kayıtlı üyelerimiz görebilir.ForumTR üyesi olmak için tıklayınız]" '--- Sender email address
sMailRecipient = "[Linkleri sadece kayıtlı üyelerimiz görebilir.ForumTR üyesi olmak için tıklayınız]" '--- email reminder destination address
sMailRecipientBCC = "" '--- BCC email reminder destination address
sMailObject = "CDOSYS" '--- email Object, either "CDOSYS" or "JMail" or "CDONTS" or "AspEmail"
sMailServerAddress = "localhost:25" '--- SMTP Mail Server address (required for JMail only)
sFormat = "HTML" '--- Email reminder format "HTML" or "TEXT"

'########### Calendar Language ########################
ActualLCID = Session.LCID
'--- You can add below your own calendar language translation
'--- Automatic language selection
If instr(UCase(Request.Servervariables("HTTP_ACCEPT_L ANGUAGE")), "IT") > 0 THEN
Session.LCID = 1040 '--- italiano
binternational = True '--- date format=DD/MM/YYYY
strEventi = "Oggi ci sono eventi!!"
strClicca = "Clicca per vederli"
strEventi2 = "Ci sono %1 eventi in Calendario"
strEventiPassati = "Eventi già passati"
strNoEventi = "Nessun evento schedulato per questo giorno"
strMesePre = "Mese passato"
strMeseNex = "Mese prossimo"
strAnnoPre = "Anno passato"
strAnnoNex = "Anno prossimo"
strAddEventi = "Aggiungi evento"
strNewEventi = "Aggiorna evento"
strDelEventi = "Cancella evento"
strModEventi = "Edita evento"
strCalendario = "Calendario eventi"
strOggi = "Oggi"
strFormError = "Errore nel form"
strReqField = "Campo richiesto!"
strRequired = "Richiesto"
strOptional = "Opzionale"
strEventDate = "Data evento"
strEventEndDate = "Data fine evento"
strEventEditor = "Nome editore"
strEventTitle = "Titolo evento"
strEventDetails = "Dettagli evento"
strEventExit = "Esci"
strEventDelete = "Sei sicuro di cancellare l'evento:"
strYes = "SI"
strNo = "NO"
strEventRepeat = "Ricorrente ogni anno"
strEventActive = "Attivo"
strEventInactive = "Disattivato"
strEventEmail = "Ricordato via Email"
strEventEmailDate = "Ultima email inviata:"
strEventUpcoming = "I prossimi %1 eventi:"
strEndNote = "NOTA: Deve avere lo stesso mese di ""%1""<br>Se l'evento è a cavallo di mesi differenti editare 2 eventi separati."
strEventRange = "Periodo evento:"
strAllEvents = "%1 eventi totali"
strShowUp = "Mostra la lista dei prossimi %1 eventi"
strHideUp = "Nascondi la lista dei prossimi %1 eventi"
strEventManager = "Apri manager eventi"
strEventUp = "Vedi evento del"
strPageControl = "Controllo pagine"
strPagep = "Pagina "
strFirstpTitle = " Prima "
strPrevpTitle = " Precedente "
strNextpTitle = " Successiva "
strLastpTitle = " Ultima "
strOfp = " di "
strAll = " Tutti i record "
strNorfp = "Nessun Record Trovato"
strShowWK = "Mostra eventi per settimana"
strHideWK = "Mostra eventi per giorno"
strWK = "Settimana"
'--- ###### ADD YOUR TRANSLATION HERE ###############
' ElseIf instr(UCase(Request.Servervariables("HTTP_ACCEPT_L ANGUAGE")), "YOUR LANGUAGE ID IN UPPERCASE") > 0 THEN
' Session.LCID = YOUR COUNTRY SESSION.LCID NUMBER
' binternational = YOUR COUNTRY DATE FORMAT. False=MM/DD/YYYY, True=DD/MM/YYYY
' strEventi = ....... copy here and translate all variables etc.
'--- ##########################################
Else '--- calendar in english
If instr(UCase(Request.Servervariables("HTTP_ACCEPT_L ANGUAGE")), "US") > 0 THEN
Session.LCID = 1033 '--- English (USA)
binternational = False '--- date format=MM/DD/YYYY
Else
Session.LCID = 2057 '--- English (British)
binternational = True '--- date format=DD/MM/YYYY
End if
strEventi = "You have events today!!"
strClicca = "Click to see"
strEventi2 = "There are %1 event(s)"
strEventiPassati = "Events already passed"
strNoEventi = "There are currently no events scheduled for this day"
strMesePre = "Previous month"
strMeseNex = "Next month"
strAnnoPre = "Previous year"
strAnnoNex = "Next year"
strAddEventi = "Add event"
strNewEventi = "Update event"
strDelEventi = "Delete event"
strModEventi = "Edit event"
strCalendario = "Web Calendar"
strOggi = "Today"
strFormError = "Form error"
strReqField = "Field Required!"
strRequired = "Required"
strOptional = "Optional"
strEventDate = "Event date"
strEventEndDate = "Event end date"
strEventEditor = "Editor name"
strEventTitle = "Event title"
strEventDetails = "Details"
strEventExit = "Exit"
strEventDelete = "Are you shure to delete event:"
strYes = "YES"
strNo = "NO"
strEventRepeat = "Yearly recursive event"
strEventActive = "Active event"
strEventInactive = "Event not active"
strEventEmail = "Email reminder"
strEventEmailDate = "Last Email reminder:"
strEventUpcoming = "Next %1 upcoming events:"
strEndNote = "NOTE: Must have the same month as ""%1""<br>If event range is between months then edit 2 different events."
strEventRange = "Event range:"
strEventManager = "Toggle events manager"
strAllEvents = "%1 total recorded events"
strShowUp = "Show next %1 upcoming event list"
strHideUp = "Hide upcoming %1 event list"
strEventUp = "Show event on"
strPageControl = "Page control"
strPagep = "Page "
strFirstpTitle = " First "
strPrevpTitle = " Previous "
strNextpTitle = " Next "
strLastpTitle = " Last "
strOfp = " of "
strAll = " All records shown "
strNorfp = "No Record Found"
strShowWK = "Toggle Weekly view ON"
strHideWK = "Toggle Daily view ON"
strWK = "Week"
end if
'################################################
'--- DO NOT Edit the entries below
'----------------------------------------------------
IgVersion = "2.5"
Session("DisableAction") = False
strSSubDisabled = "Submit disabled"
'--- Define common variables
Dim UserName, Password, bProtect, dbCalendar, dbremotePath, dblocalPath, sScriptDir
Dim sCalendarEventsPage, bUpcomingEvents, iUpcomingEvents, bNextMonth
Dim sDB, sDSN, connOLE, RS, sSQL, bEvents, bWeeklyEvents, bWeeklyEventsStart
Dim dbpath, ActualLCID, binternational, strSSubDisabled, bEventsPopUp
Dim connCalendar, IgVersion, sScriptPath, intThisMonth, intThisYear
Dim sFrom, sMailRecipient, sMailRecipientBCC, sMailObject, sMailServerAddress
Dim sFormat, sAdministratorsEmail, intEmailDays, bEmailer
'--- Define language variables
Dim strEventi, strClicca, strEventi2, strEventiPassati, strNoEventi
Dim strMesePre, strMeseNex, strAnnoPre, strAnnoNex, strAddEventi
Dim strNewEventi, strDelEventi, strModEventi, strCalendario, strOggi
Dim strFormError, strReqField, strRequired, strOptional, strEventDate
Dim strEventEndDate, strEventEditor, strEventTitle, strEventDetails, strEventExit
Dim strEventDelete, strYes, strNo, strEventRepeat, strEventActive
Dim strEventInactive, strEventUpcoming, strEndNote, strEventRange, strEventManager
Dim strAllEvents, strShowUp, strHideUp, strEventUp, strPageControl
Dim strPagep, strFirstpTitle, strPrevpTitle, strNextpTitle, strLastpTitle
Dim strOfp, strAll, strNorfp, strShowWK, strHideWK, strWK
Dim strEventEmail, strEventEmailDate

connOLE = "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False;Data Source="
If request.servervariables("HTTP_HOST") = "127.0.0.1" OR request.servervariables("HTTP_HOST") = "localhost" then dbpath = dblocalpath Else dbpath = dbremotepath End if
ConnCalendar = connOLE & dbpath & dbcalendar & ";"
sDSN = connCalendar
If NOT bProtect then Session("bLoginSuccessful") = True
sScriptPath = Request.ServerVariables("SCRIPT_NAME")
'----------------------------------------------------------------------
Sub W(Str)
Response.Write(Str & Vbcrlf)
End Sub
'----------------------------------------------------------------------
Sub re()
Response.End
End Sub
'--- ADO Constants ------------------------------------------------
'---- CursorTypeEnum Values ----
Const adOpenForwardOnly = 0
Const adOpenKeyset = 1
Const adOpenDynamic = 2
Const adOpenStatic = 3
'---- LockTypeEnum Values ----
Const adLockReadOnly = 1
Const adLockPessimistic = 2
Const adLockOptimistic = 3
Const adLockBatchOptimistic = 4
'---- CursorLocationEnum Values ----
Const adUseServer = 2
Const adUseClient = 3
'---- CommandTypeEnum Values ----
Const adCmdUnknown = &H0008
Const adCmdText = &H0001
Const adCmdTable = &H0002
Const adCmdStoredProc = &H0004
Const adCmdFile = &H0100
Const adCmdTableDirect = &H0200
'----------------------------------------------------------------------
%>
  Alıntı Yaparak Cevapla
Eski 12-01-11, 11:09   #2

Varsayılan C: calendar türkçe dil sorunu yardım


Evet arkadaş dil sorunu gerçekten zamanında benim içinde sorun oluyordu ama çözümü basit.
her dosyanın başına
<head> tagından sonra
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-9" />
kodlarını ekle. eğer bu durum hatayı çözmese kesin çözümünü söyleyeyim

sayfaları tek tek not defteri ile aç, farklı kaydet de, kaydederken alttan UTF8 biçiminde kaydet seçeneğini işaretle
ve her sayfanın içine <head> tagından sonra
<meta http-equiv="Content-Type" content="text/html; charset=UTF8" />
ekle.

Eğer bu işlemler sorununu çözerse +rep fazla görme
  Alıntı Yaparak Cevapla
Cevapla

Bu konunun kısa yolunu aşağıdaki sitelere ekleyebilirsiniz

Konu Araçları

Gönderme Kuralları
Yeni konu açamazsınız
Cevap yazamazsınız
Dosya gönderemezsiniz
Mesajlarınızı düzenleyemezsiniz

BB code is Açık
Smiley Açık
[IMG] kodu Açık
HTML kodu Kapalı
Trackbacks are Kapalı
Pingbacks are Kapalı
Refbacks are Kapalı



5651 sayılı yasaya göre forumumuzdaki mesajlardan doğabilecek her türlü sorumluluk yazan kullanıcılara aittir. Şikayet Mailimiz. İçerik, Yer Sağlayıcı Bilgilerimiz. Reklam Mailimiz. Gizlilik Politikası


Reklamı Kapat

Reklamı Kapat