antp.be forum

Do tytus1976: A nie opłaca Ci się napisać prostego skryptu, który w rekordach znajdzie dany tekst i zamieni na jaki chcesz. Oczywiście wiąże się to z wpisaniem wszystkich gatunków (ale to nie jest problem). Metoda trochę łopatologiczna ale u mnie zadziałała w sytuacjach, w których musiałem zmienić k...

Dopiszcie sobie do skryptu poniższe wpisy: Value := StringReplace(Value, '„', '"'); Value := StringReplace(Value, '”', '"'); Value := StringReplace(Value, 'è', 'e'); Value := StringReplace(Value, 'ç', 'ç'); Value := StringReplace(Value, 'î', 'î'); Value := StringReplace(Value, '–', '-'); V...

Jest już ok.
Wcześniej sprawdzałem w piątek po południu i w sobotę - wtedy nie działało wyszukiwanie.

Pozdrawiam
szyjka

Gry-online (skrypt v1.1): przestało działać wyszukiwanie - dokładniej mówiąc niezależnie od podanego tytułu zawsze w wyniku otrzymujemy pustą listę.

Pozdrawiam
szyjka

Namieszali w: - przy sciaganiu opisow filmu - pobierane sa wszystkie tabulatory, spacje, złamania linii - trzeba recznie poprawiac - widac to w okienku przy wyborze opisow danego filmu - zauwazylem problem z "ó" w polu "Tytul polski" - znowu krzaczki - krzaczki w polach: rezyseri...

Rozwiązanie prowizoryczne ale działa. 1. Utworzyc poniższy skrypt o nazwie np. !_Zamiana.ifs --------------- program FindReplace; const WholeWord = False; Search = 'ó'; Replace = 'ó'; Field = fieldDescription; var s: string; begin s := GetField(Field); if WholeWord then begin if s = Search then SetF...

1. Skrypt się zapętla w sytuacji, w której na filmweb przy danym filmie nie występuje pole "opis filmu" - i to niezależnie czy w skrypcie mamy zaznaczone pole pobieraj "opis filmu" czy nie pobieraj. Błąd ten występował także w poprzedniej wersji skryptu (sprawdziłem to dodajac ok...

Witam

Czy jest możliwość dorobienia do tego skryptu następujących opcji:
- do wyboru pole "Producent" lub "Scenariusz"
- do wyboru sposób zapisu adresu URL w postaci "http://3.10.do.yumy.filmweb.pl/" lub "http://www.filmweb.pl/Film?id=200546"

Ja w poprzednich skryptach w przypadku problemów z kodowaniem PL liter miałem jeszcze takie wpisy:

Value:=StringReplace(Value, 'Ä…', 'ą'); // Zamiana z Unicode (UTF-8) na Windows
Value:=StringReplace(Value, 'ć', 'ć');
Value:=StringReplace(Value, 'Ä™', 'ę');
Value:=StringReplace(Value, 'Ĺ‚', 'ł');
Value:=StringReplace(Value, 'Ĺ„', 'ń');
Value:=StringReplace(Value, 'Ăł', 'ó');
Value:=StringReplace(Value, 'Ĺ›', 'ś');
Value:=StringReplace(Value, 'Ĺş', 'ź');
Value:=StringReplace(Value, 'ĹĽ', 'ż');
Value:=StringReplace(Value, 'Ä„', 'Ą');
Value:=StringReplace(Value, 'Ć', 'Ć');
Value:=StringReplace(Value, 'Ę', 'Ę');
Value:=StringReplace(Value, 'Ĺ￾', 'Ł');
Value:=StringReplace(Value, 'Ĺƒ', 'Ń');
Value:=StringReplace(Value, 'Ă“', 'Ó');
Value:=StringReplace(Value, 'Ĺš', 'Ś');
Value:=StringReplace(Value, 'Ĺą', 'Ź');
Value:=StringReplace(Value, 'Ĺ»', 'Ż');
Value:=StringReplace(Value, 'Ă©', 'é');
Value:=StringReplace(Value, 'Ă´', 'ô');
Value:=StringReplace(Value, 'ç', 'ç');
Value:=StringReplace(Value, 'á', 'á');
Value:=StringReplace(Value, 'Ă"', 'ë');
Value:=StringReplace(Value, 'â', 'â');
Value:=StringReplace(Value, 'É', 'É');
Value:=StringReplace(Value, 'è', 'e');
Value:=StringReplace(Value, 'ï', 'i');
Value:=StringReplace(Value, 'ĂŻ', 'i');
Value:=StringReplace(Value, 'Ă­', 'í');
Value:=StringReplace(Value, 'Ă￾', 'Á');
Value:=StringReplace(Value, 'è', 'e');
Value:=StringReplace(Value, 'Ă«', 'ë');
Value:=StringReplace(Value, '„', '"');
Value:=StringReplace(Value, '”', '"');
Value:=StringReplace(Value, '…', '...');
Value:=StringReplace(Value, '’', '’');
Value:=StringReplace(Value, '“', '"');
Value:=StringReplace(Value, '–', '-');
Value:=StringReplace(Value, 'ö', 'ö');
Value:=StringReplace(Value, 'č', 'e');
Value:=StringReplace(Value, 'ÄŤ', 'č');
Value:=StringReplace(Value, 'Ă®', 'i');
Value:=StringReplace(Value, 'ä', 'ä');
Value:=StringReplace(Value, 'ĂĽ', 'ü');
Value:=StringReplace(Value, 'Ăş', 'ú');
Value:=StringReplace(Value, 'Ăź', 'ß');
Value:=StringReplace(Value, 'Ĺľ', 'ž');
Value:=StringReplace(Value, 'š', 'š');
Value:=StringReplace(Value, 'Ĺ ', 'Š');
Value:=StringReplace(Value, 'Ĺ™', 'ř');
Value:=StringReplace(Value, 'Ă˝', 'ý');

Pozdrawiam
szyjka