Перейти до змісту

Clipper


fedor

Рекомендовані повідомлення

Опубліковано

Люди добрыя, помогитя

надыть в Clipperе сделать изменения в базе.

буквально в одном поле вместо пробельчикофф - звёздочки.

буду пиводарен :bayan1:

стучите 165491061

Опубліковано

select <имя базы>

go top

do while !eof()

a1=<имя ячейки>

line=''

for i=1 to len(a1)

if substr(a1,i,1)=' '

line=line+'*'

else

line=line+substr(a1,i,1)

endIf

endfor

replace <имя ячейки> with line

skip

enddo

мля

вся красота отформатировалась :bayan1:

Опубліковано
select <имя базы>

go top

do while !eof()

a1=<имя ячейки>

line=''

for i=1 to len(a1)

if substr(a1,i,1)=' '

line=line+'*'

else

line=line+substr(a1,i,1)

endIf

endfor

replace <имя ячейки> with line

skip

enddo

мда....

select <имя базы>

replace <имя поля> with strtran(<имя поля>,' ','*') all

і все

Опубліковано
replace <имя поля> with strtran(<имя поля>,' ','*') all

і все

ну, я не помню функцию strtran() , да и посмотреть негде было.

писалось навскидку по памяти

Заархівовано

Ця тема знаходиться в архіві та закрита для подальших відповідей.



×
×
  • Створити...