Страница 1 из 1
С русского на английский и обратно ...
Добавлено: 29 июн 2004, 19:27
Паренек_с_гитарой
Поскажите плиз как сделать что б .... заменял не все символы введенные а после первой запетой ... тип "DEN,ghbdtn dctv" делал он в такой вид "DEN,привет всем"
<script language="VBscript">
<!--
Sub mybutton_onclick
a=document.chatinput.chat_message.value
for i=1 to len(a)
status=i&" из"&len(a)
s=mid(a,i,1)
if s="q" then s="й"
newtext=newtext+s
next
document.chatinput.chat_message.value = newtext
end sub
-->
</script>
я делал так ... но оно не устраиват

Добавлено: 29 июн 2004, 19:39
Oscar
String text
pos=strpos(text,","); // определить позицию запятой
text=substr(0,pos,text)+convert(substr(pos,length,text)); //заменить текст на первую часть без изменений + вторую часть конвертированную
//substr(b,e,t) - ф-ция, возвращающая подстроку с b до e из строки t
Не подумайте, это не VB :-) Это просто псевдокод
Добавлено: 29 июн 2004, 20:12
Паренек_с_гитарой
Т.е. в чат ет ни как не подгрузить

... а на Vb ...не знаешь как?
Добавлено: 29 июн 2004, 21:01
Oscar
на Vb это так же само, только названия другие
Добавлено: 30 июн 2004, 08:00
Паренек_с_гитарой
а не мог бы ты приписать к тому скриптику с верьху а то я VB фигова совсем знаю ....
Добавлено: 01 июл 2004, 02:26
Oscar
Паренек_с_гитарой, а я VB вообще не знаю ;-)
Но ты не расстраивайся, может тебе кто и поможет .. ))
Добавлено: 17 июл 2004, 11:48
Паренек_с_гитарой
только вот чет не поможает

Re: С русского на английский и обратно ...
Добавлено: 21 июл 2004, 13:27
Fktrc
примерно так
<script language="VBscript">
<!--
Sub mybutton_onclick
a=document.chatinput.chat_message.value
z=False
for i=1 to len(a)
status=i&" из"&len(a)
s=mid(a,i,1)
if s="," then
z=True
endif
if z then
if s="q" then s="й"
endif
newtext=newtext+s
next
document.chatinput.chat_message.value = newtext
end sub
-->
</script>