version="1.0" encoding="UTF-8" ?>
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
Mita verkkomaha naa on
koirat.
353499
0Äänestä
Muut lukivat myös
Odottaa vastausta
Näihin keskusteluihin ei ole vielä vastattu. Ole ensimmäinen.
Vastaukset 35
Vanhimmat
Etta silla KRP tutkiajllakin menee varmaan viikkoja kun saa kaikki tutkittua taalta loytyy kuvia sun muuta,setelien kuvia yms.koodeja.
Otin winkkarista powerpointin tai vastaavasn alustustiedoston, ja postasit sen tänne.
No niin. Kiitoksia! Olemme nyt nähneet sen.
Mitä muuta XML-roinaa tai konfiguraatiotiedostoja ajattelit seuraavaksi postata iloksemme?
Miten muuten ajattelit yhdistää postauksesi palstan aiheeseen? Nimittäin verkostomarkkinointiin?
keskusrikospoliisin ja siella ne on ja tuota roinaa on kuulkaa paljon nakyy olevan tehty suurin osa 2005 vuonna 2008 ja se kuuluu verkostomarkkinointiin.
Cluso227 koittaa hämätä ihmisiä, jotka eivät tunne tietotekniikkaa. Tällä "roinalla" (kuten Cluso sanoo) ei ole mitään tekemistä wincapitan, valuuttakaupan, tai minkään muunkaan kanssa.
Cluso377 koittaa nyt vaan jotain hämäystä, ehkä herättääkseen keskustelua?!?!
Clusolla taitaa olla lapio ojassa ;-)
Sinne lahetin taalta asti CD-rompun ja taman vannon kaikkivaltiaan Jumalan nimeen.
joten AdaFlink jos luet taan niin tuo kaikki on totta en valehtele tassa asiassa jos valehtelelisin tassa asiassa mua saa silloin julkisesti haukkua,vaikka miksi haluaa.
-T Cluso627,Antti Suhonen.
hel***in ilmaisilla office asennustiedoilla? eix kooärpeel oo omast takaa laskentaohjelmii?
Tassa mita mina olen saanut koodattua auki kun kaikki on koodi kielta1.1.Forexiin liittyvaa on on tehty vuosina 2005-2008 nain tekijoitten nimia,kuvia ovat tuossa yhessakin kuvassa viisi miesta Thaimaassa juhlivat jotain,on kuvia Kiinasta hienoja hotelleja Panamasta ja sielta muutamia yrityksen logoja.Matkustelua kuvia yhden tumma hiuksinen naisen kuva kyllakin kaunis voi sanoa.
sitten naen WinCapitan Mp3 soittimen kuvia ja rahaa kuvina yms ja sitten HIRMUSESTI koodikielta jota en osaa purkaa no kylla varmaan KRP;ssa osaa yksi henkilo.En voi sanoa nimea enka lahettaa mitaan kirjeiden vaihtoa,koska diili on,etta en laheta enka nayta kenellekkaan mita postia saan enka sano nimia.
nuo laittamasi tiedot liittyy vain ilmaiseen officen asennukseen
lähetit handen puolesta todisteet kytille siit et on treidattu.hyvä veto!!!!!
CFS-TIEDOSTOJA,OPENDOCUMENT,BITTIKARTTA,SOVELLUSJAAJENNUS,DTD-TIEDOSTOJA,DAT-TIEDOSTOJA,FMT.TIEDOSTOJA,DBT TIEDOSTOJA,JAR FILE,CONFIG TIEDOSTOJA,PL TIEDOSTOJA,XLB,XLC,TIEDOSTOJA,XLB TIEDOSTOJA,ASP TIEDOSTOJA,RES TIEDOSTOJA YMS.
tiedostoist nii voisin uskoo.
-
-
OpenOffice.org/1.9.104.1$Linux OpenOffice.org_project/680m104s1$Build-8914
Elegantný
Elegantný obchodný list v štýle sheriff.
Peter Thielmann
2000-01-04T11:52:02
2005-06-05T16:22:43
sk-SK
52
PT8H33M7S
:font-face style:name="StarSymbol2" svg:font-family="StarSymbol" style:font-adornments="Normal" style:font-pitch="variable" style:font-charset="x-symbol" />
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
forexiin eikä capitaan ainakaan
Eika KRP kerro mulle mita naissa on tiedan sen.
Odota taalla on niin paljon tavaraa.
odotan.
hei koska en tieda miten tallaiset aukaistaan ja naita on tosi paljon tossakin on joku MANIFEST.MF TIEDOSTO sita en saa auki,Antaa KRP tutkia en ymmrra naita.
Option Explicit
'Todo: Controlling Scrollbar via Keyboard
Public Const SBMAXFIELDINDEX = 14
Public DlgUserFields as Object
Public oDocument as Object
Public UserFieldDataType(SBMAXFIELDINDEX,1) as String
Public ScrollBarValue as Integer
Public UserFieldFamily(0, SBMAXfIELDINDEX) as String
Public Const SBTBCOUNT = 9
Public oUserDataAccess as Object
Public CurFieldIndex as Integer
Public FilePath as String
Sub StartChangesUserfields
Dim SystemPath as String
BasicLibraries.LoadLibrary("Tools")
UserFieldDatatype(0,0) = "COMPANY"
UserFieldDatatype(0,1) = "o"
UserFieldDatatype(1,0) = "FIRSTNAME"
UserFieldDatatype(1,1) = "givenname"
UserFieldDatatype(2,0) = "LASTNAME"
UserFieldDatatype(2,1) = "sn"
UserFieldDatatype(3,0) = "INITIALS"
UserFieldDatatype(3,1) = "initials"
UserFieldDatatype(4,0) = "STREET"
UserFieldDatatype(4,1) = "street"
UserFieldDatatype(5,0) = "COUNTRY"
UserFieldDatatype(5,1) = "c"
UserFieldDatatype(6,0) = "ZIP"
UserFieldDatatype(6,1) = "postalcode"
UserFieldDatatype(7,0) = "CITY"
UserFieldDatatype(7,1) = "l"
UserFieldDatatype(8,0) = "TITLE"
UserFieldDatatype(8,1) = "title"
UserFieldDatatype(9,0) = "POSITION"
UserFieldDatatype(9,1) = "position"
UserFieldDatatype(10,0) = "PHONE_HOME"
UserFieldDatatype(10,1) = "homephone"
UserFieldDatatype(11,0) = "PHONE_WORK"
UserFieldDatatype(11,1) = "telephonenumber"
UserFieldDatatype(12,0) = "FAX"
UserFieldDatatype(12,1) = "facsimiletelephonenumber"
UserFieldDatatype(13,0) = "E-MAIL"
UserFieldDatatype(13,1) = "mail"
UserFieldDatatype(14,0) = "STATE"
UserFieldDatatype(14,1) = "st"
FilePath = GetPathSettings("Config", False) & "/" & "UserData.dat"
DlgUserFields = LoadDialog("Gimmicks","UserfieldDlg")
SystemPath = ConvertFromUrl(FilePath)
DlgUserFields.Model.Label10.Label = ReplaceString(DlgUserFields.Model.Label10.Label, "'" & SystemPath & "'", "")
DlgUserFields.Model.Label10.Label = ReplaceString(DlgUserFields.Model.Label10.Label, GetProductName(), "")
DlgUserFields.Model.cmdSelect.HelpText = ReplaceString(DlgUserFields.Model.cmdSelect.HelpText, GetProductName(), "")
ScrollBarValue = 0
oUserDataAccess = GetRegistryKeyContent("org.openoffice.UserProfile/Data", True)
InitializeUserFamily()
FillDialog()
DlgUserFields.Execute
DlgUserFields.Dispose()
End Sub
Sub FillDialog()
Dim a as Integer
With DlgUserFields
For a = 1 To SBTBCount
.GetControl("Label" & a).Model.Label = UserFieldDataType(a-1,0)
.GetControl("TextField" & a).Model.Text = UserFieldFamily(CurFieldIndex, a-1)
Next a
.Model.ScrollBar1.ScrollValueMax = (SBMAXFIELDINDEX 1) - SBTBCOUNT
.Model.ScrollBar1.BlockIncrement = SBTBCOUNT
.Model.ScrollBar1.LineIncrement = 1
.Model.ScrollBar1.ScrollValue = ScrollBarValue
End With
End Sub
Sub ScrollControls()
ScrollTextFieldInfo(ScrollBarValue)
ScrollBarValue = DlgUserFields.Model.ScrollBar1.ScrollValue
If (ScrollBarValue SBTBCOUNT) >= SBMAXFIELDINDEX 1 Then
ScrollBarValue = (SBMAXFIELDINDEX 1) - SBTBCOUNT
End If
FillupTextFields()
End Sub
Sub ScrollTextFieldInfo(ByVal iScrollValue as Integer)
Dim a as Integer
Dim CurIndex as Integer
For a = 1 To SBTBCOUNT
CurIndex = (a-1) iScrollValue
UserFieldFamily(CurFieldIndex,CurIndex) = DlgUserFields.GetControl("TextField" & a).Model.Text
Next a
End Sub
Sub StopMacro()
DlgUserFields.EndExecute
End Sub
Sub SaveSettings()
Dim n as Integer
Dim m as Integer
Dim MaxIndex as Integer
ScrollTextFieldInfo(DlgUserFields.Model.ScrollBar1.ScrollValue)
MaxIndex = Ubound(UserFieldFamily(), 1)
Dim FileStrings(MaxIndex) as String
For n = 0 To MaxIndex
FileStrings(n) = ""
For m = 0 To SBMAXFIELDINDEX
FileStrings(n) = FileStrings(n) & UserFieldFamily(n,m) & ";"
Next m
Next n
SaveDataToFile(FilePath, FileStrings(), True)
End Sub
Sub ToggleButtons(ByVal Index as Integer)
Dim i as Integer
CurFieldIndex = Index
DlgUserFields.Model.cmdNextUser.Enabled = CurFieldIndex Ubound(UserFieldFamily(), 1)
DlgUserFields.Model.cmdPrevUser.Enabled = CurFieldIndex 0
End Sub
Sub InitializeUserFamily()
Dim FirstIndex as Integer
Dim UserFieldstrings() as String
Dim LocStrings() as String
Dim bFileExists as Boolean
Dim n as Integer
Dim m as Integer
bFileExists = LoadDataFromFile(GetPathSettings("Config", False) & "/" & "UserData.dat", UserFieldStrings())
If bFileExists Then
FirstIndex = Ubound(UserFieldStrings())
ReDim Preserve UserFieldFamily(FirstIndex, SBMAXFIELDINDEX) as String
For n = 0 To FirstIndex
LocStrings() = ArrayOutofString(UserFieldStrings(n), ";")
For m = 0 To SBMAXFIELDINDEX
UserFieldFamily(n,m) = LocStrings(m)
Next m
Next n
Else
ReDim Preserve UserFieldFamily(0,SBMAXFIELDINDEX) as String
For m = 0 To SBMAXFIELDINDEX
UserFieldFamily(0,m) = oUserDataAccess.GetByName(UserFieldDataType(m,1))
Next m
End If
ToggleButtons(0)
End Sub
Sub AddRecord()
Dim i as Integer
Dim MaxIndex as Integer
For i = 1 To SBTBCount
DlgUserFields.GetControl("TextField" & i).Model.Text = ""
Next i
MaxIndex = Ubound(UserFieldFamily(),1)
ReDim Preserve UserFieldFamily(MaxIndex 1, SBMAXFIELDINDEX) as String
ToggleButtons(MaxIndex 1, 1)
End Sub
Sub FillupTextFields()
Dim a as Integer
Dim CurIndex as Integer
For a = 1 To SBTBCOUNT
CurIndex = (a-1) ScrollBarValue
DlgUserFields.GetControl("Label" & a).Model.Label = UserFieldDataType(CurIndex,0)
DlgUserFields.GetControl("TextField" & a).Model.Text = UserFieldFamily(CurFieldIndex, CurIndex)
Next a
End Sub
Sub StepToRecord(aEvent as Object)
Dim iStep as Integer
iStep = CInt(aEvent.Source.Model.Tag)
ScrollTextFieldInfo(ScrollBarValue)
ToggleButtons(CurFieldIndex iStep)
FillUpTextFields()
End Sub
Sub SelectCurrentFields()
Dim MaxIndex as Integer
Dim i as Integer
ScrollTextFieldInfo(ScrollBarValue)
MaxIndex = Ubound(UserFieldFamily(),2)
For i = 0 To MaxIndex
oUserDataAccess.ReplaceByName(UserFieldDataType(i,1), UserFieldFamily(CurFieldIndex, i))
Next i
oUserDataAccess.commitChanges()
End Sub
Sub DeleteCurrentSettings()
Dim n as Integer
Dim m as Integer
Dim MaxIndex as Integer
MaxIndex = Ubound(UserFieldFamily(),1)
If CurFieldIndex < MaxIndex Then
For n = CurFieldIndex To MaxIndex - 1
For m = 0 To SBMAXFIELDINDEX
UserFieldFamily(n,m) = UserFieldFamily(n 1,m)
Next m
Next n
Else
CurFieldIndex = MaxIndex - 1
End If
ReDim Preserve UserFieldFamily(MaxIndex-1, SBMAXfIELDINDEX) as String
FillupTextFields()
ToggleButtons(CurFieldIndex)
End Sub
vain office tietoja.
Ja vielä joku väittää uskovansa
Tossa ylempana on niin pirun paljon ja kylla voin sanoa,etta yksi liittyy forex-juttuihin,mutta en tajua nuita koodien purkamisia ja niihin pitas olla joku ohjelma.No antaa KRP tarkistaa kun halusivat jos ei ole mitaan niin sitten ei on taalla asiakirjojakin mutta en saa niita auki.No tuskipa saan koskaan tietaa mita naa oli.Ei ne kerro mulle,koska en ole viranomainen...
kätevä pieni scripti jolla saadaan aikaiseksi pieni henkilötietojen kysely & tallennetaan tiedot.
Ei mitään turhia kavereita ole ollut näitä ohjelmoimassa. Tässä ainakin yksi saksalainen joka ollut mukana.
http://www.peter-thielmann.de/lebenslauf.html
koodissa mitään valuuttakauppaan viittaavaa
(ei auta, että officen asennukseen ym. käytettävää)
------------
Lahtisen arvion mukaan kyse on siitä, että liian isoksi paisunut Wincapita halutaan nujertaa ajojahdilla ja mustamaalauskampanjalla ja estämällä sen tietokoneiden palvelinten toiminta.
Kailajärven tilanne kuitenkin kävi liian kuumaksi poliisin päästyä Wincapitan kintereille. Alun perinkin mahdoton pyramidibisneskupla puhkesi ja pääpukarit katosivat rahojen kanssa.
"Alun perinkin mahdoton pyramidibisneskupla"
Lahtinen...
Ei Lahtinen noin sanonut, vaan toimittaja.
Verrataan tietoja: mitä sun mielestä Cluson koodeissa sanotaan suomeksi? Mikä tuo saksalaisen ohjelmoitsijan rooli on asiassa?
"Tämä makron avulla voit helposti hallita useita käyttäjäprofiileja. Käyttäjän tiedot useiden käyttäjien voidaan tallentaa yhteen tiedostoon luokkahakemistoon . Sieltä voit valita tietty käyttäjä, jonka tiedot ovat sitten nykyisen käyttäjän tiedot vuonna . " DLG: Multiline = "true" />
CD minka lahetin KRP paamajalle se oli taynna 4.7 GB eli tiedostoja on aika paljon..
Oli siella muitakin tekijoiden nimia ja yhteiskuva heista.Sun muuta.
Saa mitaan selvaa nuista mie kohta kusen taan tietokoneen tukkoon!Olen yllaolevaan kirjoittanut minkalaisia tiedostoja on mita ne on?Ja miksi hitossa GIF-image tiedostoja on niin paljon?Ne kylla aukeaa niista nyt nakee jotain.Tyhjaa teistakin hekutetaan etta murot teki sita ja tata
mita te oletta tehnyt ei lasta eika paskaa!
pari kaverii jotka taitaa tollaset asiat
minunko naa pitas sitten tajuta.?No antaaa PALAA WinCapita takavarikko rahoja kun KRP tutkii naita
siinahan ne palaa tutkijoiden palkat on hyvia mun puolesta sais menna kaikki takavaroidut rahat.
Se lukikin jossain,etta ne ottaa rahaa sielta luulitteko capittaalit,etta poliisin noin 100 miljoonan euron budjektiin vuosittaiseen silla rahoitettais teidan sotkut ei ei ne menee takavarikoiduista rahoista.ANTAA PALAA!"!!KYLLA TE OOTTA PRKLE SOTKUJA TEHNEET.Jouni Laiho nimittelinkin muinoin ihan oikein TEITA!
mikä liittyy forexiin.kaikki mitä oot nyt tänne laittanu niin on vaa office asennus tietoi ja officen koodaust
antaa poliisin tarkastaa nuo antaa yhteiskunnan maksaa.Niin sita te capitaatit olette tehneet saatte syyttaa siita ihan itseanne!Sen sanon,etta kylla monella tulee ripupaska viela housuun:)
Oot aika sekaisin, tiedät varmaankin sen?
Noi tiedostot mitä lähetti on OpenOffice tiedostoja jotka saat auki ilmaisella netistä ladattavavalla office-tyyppisellä sovelluksella.
Noissakaan ei ollut mitään valuuttakauppaan liittyvään vaan eikä noita XML-pohjaisia tiedostoja ole kukaan käsin kirjoittanut.
Ainoa koodi mitä niissä on VBA-pohjainen formi johon voidaan kirjoittaa nimi & osoite tietoja jotka tallentuvat yhteen tiedostoon.
Ihan täyttä p*skaa tännekkin postataan.
Muro reppana siina iniset painu siita Sampan kikkelin paahan muroihin takas palsta joka on taysi paska ja puolueellinen.Kylla mina tiedan mita nuissa tiedostoissa on te pidatte itseanne muka jonain asiantuntijoina niinhan ne kaikki muropojat tekee ne on hirmu atk-asiantuntijoita,mutta reppanoita eika toisekseen teilla olis tallaissiin hommiin mita mina olen tehnyt munaa oleenkaan vielako pelottaa hillomies voi kun sai sitakin nauraa silloin kun oli se juttu ootte te reppanoita kaytteko te etes armeijaa?
saaliittavia tollaiset anonyymiset kirjoittelijat
Sita saa vielakin nauraa kun muka paljastitte hillomies-juttua niin joku marisi poliisi tv_;ssa,etta alko pelottaa kun minulle soitti henkilo joka on istunut linnassa:))
töissä tuolla Star Divisionilla. Heidän tuotteensa on StarOffice. jolla noi cluson dokumentit on luotu.
:
STAR DIVISION GmbH
Sun Microsystems, Inc.
Sachsenfeld 4
http://www.peter-thielmann.de/lebenslauf.html
Star Office on läheistä sukua OpenOfficelle.
CD-levy tämä vekkuli polykarbonaatista valettu, ja alumiinillä sekä lakalla päällystetty ystävämme voi sisältää dataa nykyisellä tekniikalla korkeintaan 900 megatavua (Mt, englanniksi MB). Yleisimmät markkinoilta saatavat levyt ovat kooltaan 650Mt ja 700Mt.
DVD-levy CD:n isoveli kykenee tallentamaan SI-järjestelmällä ilmoitettuna kyseisen 4,71 GB, mutta koska tietokoneet käyttävät binäärijärjestelmää niin käytännössä kyseiselle levylle mahtuu noin 4,37 - 4,38 GiB (huomaa ero merkinnässä).