Forum
Aktif konular
Üyeler
Kurallar
Arama
Farklı Sorgularda Aynı Sonucu Veren ASP Hatası Farklı Sorgularda Aynı Sonucu Veren ASP Hatası
-
<%
Select Case request.querystring("liang")
Case "tr"
Function cevir(metin)
metin = Replace(metin,"Otomobiller ve Ticari Araclar", "asd")
cevir = metin
End Function
ax="Otomobiller ve Ticari Araclar"
Response.Write cevir(ax)
set ax=nothing
Case "e"
Function cevir(metinx)
metinx = Replace(metinx,"Otomobiller ve Ticari Araclar", "asdeng")
cevir = metinx
End Function
a="Otomobiller ve Ticari Araclar"
Response.Write cevir(a)
set a=nothing
End Select
%>
<a href="?liang=tr">tr</a> | <a href="?liang=e">eng</a>şöle bişey var. bunu önce if else ile yaptım ondada aynı sorun çıktı. 7 saattir pc başında olduğumdan belki beynim sulanmış olup görememişte olabilirim sorunu ama
2 sorgudada (tr, e)
asdeng
bu çıkıyor. tr de asd çıkması lazımken asdeng çıkıyor :|
-
fonksiyonların adını değiştir abü. aynı isimde oldukları için sorun çıkarıyo. 7 saat bilg başında durulur mu la beynin akacak :)
-
bu kadar uğraşmana ne gerek var olm ?
xml le yapsana,
mesela şimdi iki dil kullancan sanırım.
tr.xml ve ing.xml diye 2 tane ayrı ayrı xml aç..
bi tane dilchange.asp dosyası açarsın adamım.. o sayfa üstünden mesela ingilizce seçtiginde o sayfa üzerinden seçilip default.asp ye çevrilir ya da türkçe seçildiginde de ingilizce için yaptıgımız işlemleri onun üstünden yaptırırsn..
sallamasyon başlyorum sen ona göre şettir,
tr.xml
xml version="1.0"?>
ana sayfa
hakkında
falan filan
ing.xml
xml version="1.0"?>
home page
about
never mind
default.asp ye
<%=d1%>
<%=d2%>
Türkçe
English geç
dilchange.asp
<%
dil=request.querystring("dil")
if dil="" then
session("dil")="tr"
elseif dil="en" then
session("dil")="ing"
else
session("dil")="tr"
end if
response.redirect "default.asp"
%>
dil.asp
<%
if session("dil")="tr" or session("dil")="" then
dosya = "tr.xml"
else session("dil")="en"
dosya = "eng.xml"
end if
Set xmlDoc = createObject("Msxml.DOMDocument" )
xmlDoc.async = false
xmlDoc.setProperty "ServerHTTPRequest" , true
xmlDoc.load(dosya)
If (xmlDoc.parseError.errorCode <> 0) Then
Response.Write "XML error: " & xmlDoc.parseError.reason
Else
Set channelNodes = xmlDoc.selectNodes("//lang/*" )
For Each entry in channelNodes
If entry.tagName = "d1" Then
d1 = entry.text
else
entry.tagName="d2"
d2=entry.text
End If
Next
End If
%>
falan filan işte -
tmm gencolar sorun çözüldü :)
tek fonksiyon içinde if else kontrolü ile hallettim :)
sağolun varolun :))
Kısayol
Şikayet
Özel Mesaj
Alıntı yap
Cevapla