Keresés: - Visual Basic - LOGOUT Hozzászólások

Legfrissebb anyagok

LOGOUT témák

PROHARDVER! témák

Mobilarena témák

IT café témák

GAMEPOD témák

Keresés

Hirdetés

!! SZERVERLEÁLLÁS, ADATVESZTÉS INFORMÁCIÓK !!
Talpon vagyunk, köszönjük a sok biztatást! Ha segíteni szeretnél, boldogan ajánljuk Előfizetéseinket!

Új hozzászólás Aktív témák

#1091 Jester01 veterán sbalint #1083

Új Válasz 2009-01-21 14:47:09 #1091
Új hozzászólás
Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra
Privát üzenet küldése

Jester01

veterán

válasz sbalint #1083 üzenetére

Set fso = CreateObject("Scripting.FileSystemObject") Set f = fso.GetFolder(path) d = f.DateCreated
#1060 Jester01 veterán sonar #1059

Új Válasz 2008-11-18 14:38:00 #1060
Új hozzászólás
Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra
Privát üzenet küldése

Jester01

veterán

válasz sonar #1059 üzenetére

Using the WinHttpRequest COM Object
#1058 Jester01 veterán VIC20 #1057

Új Válasz 2008-11-18 14:12:43 #1058
Új hozzászólás
Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra
Privát üzenet küldése

Jester01

veterán

válasz VIC20 #1057 üzenetére

Nem lehet, hogy 1-el kezdődik az indexelés? Vagyis a SortKey=1 beállítást próbáltad?
#1056 Jester01 veterán VIC20 #1054

Új Válasz 2008-11-18 02:14:06 #1056
Új hozzászólás
Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra
Privát üzenet küldése

Jester01

veterán

válasz VIC20 #1054 üzenetére

Már régen basiceztem, de nézd meg nem lehet-e az oszlop típusát számmá alakítani. Vagy ha nem nagyon ronda, akkor balról pótold ki nullákkal a számokat.
#1055 Jester01 veterán sonar #1053

Új Válasz 2008-11-18 02:11:17 #1055
Új hozzászólás
Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra
Privát üzenet küldése

Jester01

veterán

válasz sonar #1053 üzenetére

Ha nem muszáj böngészőben meg is mutatni az oldalt, akkor én eleve a visszaküldött választ generálnám kódból.
#802 Jester01 veterán [HUN]Zolee #800

Új Válasz 2007-02-17 18:16:33 #802
Új hozzászólás
Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra
Privát üzenet küldése

Jester01

veterán

válasz [HUN]Zolee #800 üzenetére

Rekurzív megoldás: egyszerûen kitörlöd a stringbõl.
Hatékonyabb megoldás: csinálsz egy boolean tömböt
#799 Jester01 veterán [HUN]Zolee #798

Új Válasz 2007-02-16 19:56:40 #799
Új hozzászólás
Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra
Privát üzenet küldése

Jester01

veterán

válasz [HUN]Zolee #798 üzenetére

Az sem sokkal bonyolultabb (viszont sokkal jobb) ha mindig csak akkora véletlenszámot generálsz ahány betű még van. Így pontosan n-1 darab véletlenszámra lesz szükséged.
#777 Jester01 veterán palerNEW #776

Új Válasz 2007-01-19 21:27:41 #777
Új hozzászólás
Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra
Privát üzenet küldése

Jester01

veterán

válasz palerNEW #776 üzenetére

Kiválóan. Egyszerűen nézd meg milyen dlleket használ.
#775 Jester01 veterán palerNEW #773

Új Válasz 2007-01-19 20:49:57 #775
Új hozzászólás
Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra
Privát üzenet küldése

Jester01

veterán

válasz palerNEW #773 üzenetére

A felsorolt 3at éppenséggel elég könnyű megkülönböztetni.
#769 Jester01 veterán Polyák #767

Új Válasz 2007-01-18 14:37:42 #769
Új hozzászólás
Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra
Privát üzenet küldése

Jester01

veterán

válasz Polyák #767 üzenetére

A paramétereket keresd meg msdn-ben ha pontosat akarsz tudni
Az lID azt hiszem az ikon sorszáma.
Az sTip az a tooltip szövege.
A hIcon pedig az ikon handle. Be kell tölteni az ikont és annak valami handle propertyje.
#766 Jester01 veterán Polyák #765

Új Válasz 2007-01-17 22:39:42 #766
Új hozzászólás
Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra
Privát üzenet küldése

Jester01

veterán

válasz Polyák #765 üzenetére

Ezt egy kb. 4 éves projektbõl bányásztam elõ, azóta szerencsére nem láttam VBt

A TrayInitialize után meg kell hívni a TrayAddIcon-t, attól lesz ikon. Kilépés elõtt ezt törölni kell.
#763 Jester01 veterán Polyák #762

Új Válasz 2007-01-17 17:45:14 #763
Új hozzászólás
Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra
Privát üzenet küldése

Jester01

veterán

válasz Polyák #762 üzenetére

VB6-hoz nekem van egy régi modulom: [link]

MOD: jobbgombos dolgot nem csinál, csak duplaklikkre előhozza az ablakot.

[Szerkesztve]
#757 Jester01 veterán sonar #755

Új Válasz 2007-01-11 15:19:49 #757
Új hozzászólás
Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra
Privát üzenet küldése

Jester01

veterán

válasz sonar #755 üzenetére

Ha a GotFocus eseményt elkapod és beállítod a kijelölést az nem jó?

A másik kérdésedre pedig valószínűleg a regionális beállításokban rejlik a válasz. Ha magyar, akkor tizedesvessző van.
#751 Jester01 veterán sonar #750

Új Válasz 2007-01-07 18:24:02 #751
Új hozzászólás
Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra
Privát üzenet küldése

Jester01

veterán

válasz sonar #750 üzenetére

Gyakorlatilag korlátlan mélységig (amíg a verem bírja).
#722 Jester01 veterán Polyák #721

Új Válasz 2006-12-17 16:26:56 #722
Új hozzászólás
Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra
Privát üzenet küldése

Jester01

veterán

válasz Polyák #721 üzenetére

Ha jól emlékszem ezekre nincs speciális függvény, az exp és a log megfelelõ használatával lehet õket számolni.
#670 Jester01 veterán sonar #669

Új Válasz 2006-10-24 14:27:25 #670
Új hozzászólás
Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra
Privát üzenet küldése

Jester01

veterán

válasz sonar #669 üzenetére

Pedig működik. Nekem régi vb6os kódban van ilyen bit tesztelés:

If (RS.Fields(3) And (2 ^ TableSet)) = 0 Then
#658 Jester01 veterán Maza75 #657

Új Válasz 2006-10-03 00:00:04 #658
Új hozzászólás
Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra
Privát üzenet küldése

Jester01

veterán

válasz Maza75 #657 üzenetére

Az adatbázis oszlop nem string típusú szerintem. Magyarul ezt próbáld ki:
Set rs = CurrentDb.OpenRecordset(''select * from Termék where Azonosító = '' + CStr(azon), dbOpenDynaset)
#656 Jester01 veterán Maza75 #654

Új Válasz 2006-10-02 14:30:51 #656
Új hozzászólás
Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra
Privát üzenet küldése

Jester01

veterán

válasz Maza75 #654 üzenetére

Ha autoincrement akkor szerintem nem string.
#640 Jester01 veterán Goose-T #639

Új Válasz 2006-09-15 19:54:49 #640
Új hozzászólás
Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra
Privát üzenet küldése

Jester01

veterán

válasz Goose-T #639 üzenetére

Csak neki nem kell ezt pollozni. És a kérdező sem oprendszert akar írni feltételezem
#638 Jester01 veterán Goose-T #637

Új Válasz 2006-09-15 17:59:41 #638
Új hozzászólás
Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra
Privát üzenet küldése

Jester01

veterán

válasz Goose-T #637 üzenetére

Megvalósítás: az oprendszer megfelelő szolgáltatásának igénybevétele.
Nem többszálú pollozás, mert az erőforráspazarlás.
#636 Jester01 veterán Goose-T #635

Új Válasz 2006-09-15 17:21:00 #636
Új hozzászólás
Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra
Privát üzenet küldése

Jester01

veterán

válasz Goose-T #635 üzenetére

Nem kell. .NET esetén a FileSystemWatcher osztályt lehet erre használni.
#628 Jester01 veterán Polyák #627

Új Válasz 2006-09-08 19:37:43 #628
Új hozzászólás
Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra
Privát üzenet küldése

Jester01

veterán

válasz Polyák #627 üzenetére

1. mert a \ után következő kartaktertől akarod visszakapni a stringet
2. oda a hossz kerül, csak kihasználta, hogy a string hosszánál nagyobb számot is oda lehet írni
3. a rev az hátulról keres

Amúgy ilyesmire a Scripting.FileSystemObject és társai valók. Pl:

set fso = CreateObject(''Scripting.FileSystemObject'')
set f = fso.GetFile(filename);

és utána az f tulajdonságait (Drive, Path, Name) tetszés szerint használhatod.
#581 Jester01 veterán sonar #578

Új Válasz 2006-07-18 14:05:05 #581
Új hozzászólás
Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra
Privát üzenet küldése

Jester01

veterán

válasz sonar #578 üzenetére

command()
#437 Jester01 veterán matekmatika #436

Új Válasz 2006-05-12 16:47:30 #437
Új hozzászólás
Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra
Privát üzenet küldése

Jester01

veterán

válasz matekmatika #436 üzenetére

Kevered az excel munkalap függvényeket a vb függvényekkel. Mindazonáltal az IsNumeric-nek elvileg mennie kellene
#415 Jester01 veterán tkazmer #414

Új Válasz 2006-04-24 19:44:25 #415
Új hozzászólás
Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra
Privát üzenet küldése

Jester01

veterán

válasz tkazmer #414 üzenetére

Igen, VB6, de szerintem ennek pont ugyanígy VB.NET alatt is mennie kellene.
Ugye az említett dllt felraktad és beregisztráltad?
Mit jelent, hogy ''nem ment''
#412 Jester01 veterán sekli #411

Új Válasz 2006-04-22 15:21:22 #412
Új hozzászólás
Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra
Privát üzenet küldése

Jester01

veterán

válasz sekli #411 üzenetére

Mondom, hogy ott a tesztprogi, miért nem azt nézed? Idemásolom neked, parancsolj:

Dim KeyLeds as Object
Set KeyLeds = CreateObject(''Key.Leds'')
KeyLeds.LedOn(''NUMLED'')
#410 Jester01 veterán sekli #408

Új Válasz 2006-04-22 15:05:26 #410
Új hozzászólás
Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra
Privát üzenet küldése

Jester01

veterán

válasz sekli #408 üzenetére

Ott van a tesztprogi mellette, nézd meg. Elõször is létre kell hozni egy példányt és annak a metódusát kell meghívni.
#401 Jester01 veterán lapa #400

Új Válasz 2006-04-07 20:44:38 #401
Új hozzászólás
Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra
Privát üzenet küldése

Jester01

veterán

válasz lapa #400 üzenetére

Én aztán nem értek hozzá, de az oldalon amit fentebb linkeltem többek között ezt írják:
The Range object's CurrentRegion property is not the best either because non-contiguous or incomplete records can cause an inaccurate reading of the number of used rows.
#398 Jester01 veterán MartinIsti #397

Új Válasz 2006-04-06 16:39:34 #398
Új hozzászólás
Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra
Privát üzenet küldése

Jester01

veterán

válasz MartinIsti #397 üzenetére

Itt a link ha esetleg még mindig nem találnád: Excel makró készítése [link]
#396 Jester01 veterán MartinIsti #395

Új Válasz 2006-04-06 15:27:46 #396
Új hozzászólás
Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra
Privát üzenet küldése

Jester01

veterán

válasz MartinIsti #395 üzenetére

Szerintem ilyen kérdésekkel ballagj át az excel makró topikba ott vannak hozzáértõk.
Amúgy én ezt találtam: [link]
#378 Jester01 veterán [HUN]Zolee #377

Új Válasz 2006-03-27 21:53:12 #378
Új hozzászólás
Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra
Privát üzenet küldése

Jester01

veterán

válasz [HUN]Zolee #377 üzenetére

ChrW(CLng(''&h'' & x))
Ahol x a hexa kód string formában. Stringre karakterenként ciklusban.
#376 Jester01 veterán sonar #374

Új Válasz 2006-03-26 18:12:19 #376
Új hozzászólás
Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra
Privát üzenet küldése

Jester01

veterán

válasz sonar #374 üzenetére

Ez eszembe sem jutott
tkazmer: Tehát a textboxba írt url-t akarod megjeleníteni?
Ehhez nézd meg van-e valami NavigateTo() vagy hasonló metódusa a webbrowsernek és azt hívd meg.

[Szerkesztve]
#372 Jester01 veterán tkazmer #371

Új Válasz 2006-03-24 14:46:52 #372
Új hozzászólás
Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra
Privát üzenet küldése

Jester01

veterán

válasz tkazmer #371 üzenetére

Az a gyanúm, hogy WebBrowser1.Url nothing-ot ad vissza. Ellenõrizd le.
#368 Jester01 veterán tkazmer #367

Új Válasz 2006-03-23 19:09:14 #368
Új hozzászólás
Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra
Privát üzenet küldése

Jester01

veterán

válasz tkazmer #367 üzenetére

TextBox1.Text= WebBrowser1.Url.AbsoluteUri
Esetleg ToString

[Szerkesztve]
#366 Jester01 veterán tkazmer #365

Új Válasz 2006-03-22 18:44:15 #366
Új hozzászólás
Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra
Privát üzenet küldése

Jester01

veterán

válasz tkazmer #365 üzenetére

a fordító nem fogadta el

Na és mégis mire panaszkodik?
#330 Jester01 veterán lapa #329

Új Válasz 2005-12-01 18:15:40 #330
Új hozzászólás
Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra
Privát üzenet küldése

Jester01

veterán

válasz lapa #329 üzenetére

Igen.
#328 Jester01 veterán lapa #327

Új Válasz 2005-12-01 18:07:22 #328
Új hozzászólás
Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra
Privát üzenet küldése
Jester01

veterán
válasz lapa #327 üzenetére
Dim CmdLine As String
CmdLine = Command()
Dim Args As String()
Args = CmdLine.Split('' '')

Innetől kezdve az Args tömbben szóközzel határolt argumentumok vannak.
Ha szóköz is lehet az argumentumban, akkor kénytelen leszel magadnak értelmezni a parancssort.
#324 Jester01 veterán [HUN]Zolee #323

Új Válasz 2005-11-30 23:20:29 #324
Új hozzászólás
Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra
Privát üzenet küldése

Jester01

veterán

válasz [HUN]Zolee #323 üzenetére

Mi még dolgozunk, éppen most rendeltünk kaját nehogy elhalálozzunk közben
#322 Jester01 veterán [HUN]Zolee #321

Új Válasz 2005-11-30 23:15:05 #322
Új hozzászólás
Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra
Privát üzenet küldése

Jester01

veterán

válasz [HUN]Zolee #321 üzenetére

Ne már! A középpontot bármilyen, sugár hosszúságú vektorral eltolva a körívre eső pontot kapsz. A (sugár, 0) vektor pedig triviálisan ilyen.
A #315-ben pont azt mondtad, hogy az alappont a 0 fokos pozíció és a rajzodon is ez van.
#320 Jester01 veterán [HUN]Zolee #319

Új Válasz 2005-11-30 22:53:08 #320
Új hozzászólás
Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra
Privát üzenet küldése

Jester01

veterán

válasz [HUN]Zolee #319 üzenetére

#316 (op(i).X + sugar, op(i).Y)

Skalárokat adtam össze
Vagy ha úgy tetszik akkor a (sugar, 0) vektorral eltoltam az op(i) pontot.
VBben:
alappont.X = op(i).X
alappont.Y = op(i).Y + sugar
#318 Jester01 veterán [HUN]Zolee #317

Új Válasz 2005-11-30 22:36:18 #318
Új hozzászólás
Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra
Privát üzenet küldése

Jester01

veterán

válasz [HUN]Zolee #317 üzenetére

a sugar nem szakasz, hanem a hossza. Te írtad
sugar = Int(Math.Sqrt((fixp.X - op(i).X) ^ 2 + (fixp.Y - op(i).Y) ^ 2))
Szóval össze lehet adni

ezt meg nemértem hogy jött ki neked

Szétbontottam két törtre:
(2 * sugar^2 - atlo^2) / (2*sugar^2) =
= (2 * sugar^2) / (2 * sugar^2) - (atlo^2) / (2 * sugar^2)
= 1 - (atlo^2) / (2 * sugar^2)

Szerinted nem jó
#316 Jester01 veterán [HUN]Zolee #315

Új Válasz 2005-11-30 22:12:50 #316
Új hozzászólás
Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra
Privát üzenet küldése

Jester01

veterán

válasz [HUN]Zolee #315 üzenetére

Akkor az alappont koordinátái helyesen (op(i).X + sugar, op(i).Y), nemde?
x pedig a^2+b^2-c^2/2ab = (2 * sugar^2 - atlo^2) / (2*sugar^2) =
= 1 - (atlo ^ 2) / (2 * sugar ^ 2)

MOD: a középpont az op(i) ...

[Szerkesztve]
#314 Jester01 veterán [HUN]Zolee #313

Új Válasz 2005-11-30 21:46:55 #314
Új hozzászólás
Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra
Privát üzenet küldése

Jester01

veterán

válasz [HUN]Zolee #313 üzenetére

Köszi az ábrát
Szóval akkor a = b = sugár és c = átló.
Gondolom op(i) a középpont, fixP pedig az egyik pont a köríven.
Alappont lenne akkor a másik pont a köríven, csak nem értem a számítási módját. Felvilágosítanál?

Ez egyébként direkt van?
i = kpont(fixp.X, fixp.X)
#312 Jester01 veterán [HUN]Zolee #311

Új Válasz 2005-11-30 21:24:29 #312
Új hozzászólás
Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra
Privát üzenet küldése

Jester01

veterán

válasz [HUN]Zolee #311 üzenetére

Eddig jó. Na most akkor mi micsoda?
Ebben a képletben ugye szerepel a háromszög 3 oldala.
Neked meg van átló és sugár, amit eleve nem értek, de ráadásul kevés is (2 vs 3 darab).
Szóval első körben szerintem nevezd el érthetőbben a változóidat, az arccos függvényből pedig csinálj tényleg külön függvényt, így jobban átlátható lesz.
#310 Jester01 veterán [HUN]Zolee #309

Új Válasz 2005-11-30 20:04:35 #310
Új hozzászólás
Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra
Privát üzenet küldése

Jester01

veterán

válasz [HUN]Zolee #309 üzenetére

Hát ha ez arccos, akkor a bemenetnek illene a [-1,1] intervallumba esni.
Szóval a hiba az x kiszámításában lesz.
Mellékes jótanács: ha mindenütt csak egy mennyiség négyzetére hivatkozol, akkor fölösleges gyököt vonni (lásd pl. atlo)
#308 Jester01 veterán [HUN]Zolee #307

Új Válasz 2005-11-30 19:49:44 #308
Új hozzászólás
Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra
Privát üzenet küldése
Jester01

veterán
válasz [HUN]Zolee #307 üzenetére
Ha ide-ből futtatod, akkor megáll a hibánál: Form1.vb 91. sor.
alf = ((Math.Atan(-x / (Math.Sqrt(-x * x + 1))) + 2 * Math.Atan(1)) * 180 / Math.PI)

Sajnos nem tudtam kibogozni mit is akarsz csinálni, de nekem az x most éppen kb 165, vagyis a gyök alatt negatív szám van.

[Szerkesztve]

Új hozzászólás Aktív témák

Aktív témák

Új fizetett hirdetések

Üzleti előfizetők hirdetései

Állásajánlatok

Cloud Support Specialist / Account Manager

Cég: FOTC

Város: Budapest

Részletek