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

• #1736 #90999040 törölt tag Oly #1734

  Új Válasz 2012-04-14 08:58:48 #1736

  Ú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

  

  #90999040

  törölt tag

  válasz Oly #1734 üzenetére

  Van rá lehetőség, winapi mouse_event(), vagy SendInput() függvényével.

  A mouse_event() használata egyszerűbb, de a MS már új fejlesztésekhez nem ajánlja. A SendInput() bonyolultabb, de ezzel pl. billentyűlenyomást is lehet generálni, és a MS ezt ajánlja inkább...

• #1735 martonx veterán Oly #1734

  Új Válasz 2012-04-12 13:24:00 #1735

  Ú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

  

  martonx

  veterán

  válasz Oly #1734 üzenetére

  Ilyen automatizációkra a legjobb az AutoIt nevű programnyelv. VB-szerű könnyű szintaxisa van, és erre van specializálva.

• #1724 ArchElf addikt Oly #1723

  Új Válasz 2012-04-06 09:38:10 #1724

  Ú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

  

  ArchElf

  addikt

  válasz Oly #1723 üzenetére

  Úgy rémlik, hogy az automata üzenetküldö férgek letöréséért a nem Office-ból meghívott Outlook objektumok nem tudnak automatikusan levelt küldeni. Van valami registry beállítás (vagy group/local policy elem), amin keresztül ezt lehet engedélyezni. De nagyon rég volt már amikor ezzel szmbekerültem (6-7 éve), szóval egy kis googlizásba belekerül, mire megtalálom...

  Esetleg próbáld meg C# (.NET) alkalmazással...

  AE

• #1722 ArchElf addikt Oly #1721

  Új Válasz 2012-04-06 07:29:54 #1722

  Ú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

  

  ArchElf

  addikt

  válasz Oly #1721 üzenetére

  A VBS (VB Script), a VBA (VB for Applications) és a VB6 szintaktikailag (és a használt metódusok, osztályok alapján is) nagyon hasonló - de nem teljes mértékben átjárható. Ha teszel fel példát, talán megtaláljuk, miért nem megy.

  AE

• #1720 martonx veterán Oly #1719

  Új Válasz 2012-04-05 21:14:15 #1720

  Ú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

  

  martonx

  veterán

  válasz Oly #1719 üzenetére

  Mit értesz futtatható EXE alatt? VBS-t? .hta-t?
  Ugyan makró, makró, de sajnos nem 100% az átjárhatóság közöttük.

• #1686 Oly őstag Oly #1684

  Új Válasz 2012-03-05 12:39:07 #1686

  Ú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

  

  Oly

  őstag

  válasz Oly #1684 üzenetére

  Az otthoni gépemen már működött a lenti script, de melóban nem megy.
  Win7 + Outlook 2007 és Server 2003 + Outlook 2010 esetén sem ment.
  Azt mondta, hogy:
  ActiveX component can't create object: 'Outlook.Application'

• #1685 ArchElf addikt Oly #1682

  Új Válasz 2012-03-05 10:05:33 #1685

  Ú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

  

  ArchElf

  addikt

  válasz Oly #1682 üzenetére

  document.getElementById("orszagok").value
  RadioButton esetén is működik, ha van ID property-je... Nálad nem volt.

  Amúgy meg RadioButtonra ott a
  document.getElementsByName("szin")
  Ezen egy foreach-el végignyomulsz, és megnézed melyik value melett igaz a checked property...

  AE

• #1683 martonx veterán Oly #1682

  Új Válasz 2012-03-05 06:06:19 #1683

  Ú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

  

  martonx

  veterán

  válasz Oly #1682 üzenetére

  radio button-nak is ugyanígy lekérdezhető az értéke. Viszont minden egyes gombot külön objektumként kell ellenőrizni, hogy melyiknek igaz a .checked tulajdonsága.
  Javascriptes példáktól hemzseg az internet.

• #1443 ArchElf addikt Oly #1440

  Új Válasz 2011-09-19 16:05:07 #1443

  Ú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

  

  ArchElf

  addikt

  válasz Oly #1440 üzenetére

  Asszem megvan:
  Excelben a celláknak van Value propery-je, de a form elemeknek (pl textbox) nincs, csak Caption vagy Text (text a szerkeszthető elemeknek pl TextBox, caption a nem szerkeszthetőknek pl. Form, Label, Button). Ezt problémázza szerintem a script futtató...

  AE

• #1438 ArchElf addikt Oly #1434

  Új Válasz 2011-09-19 11:11:53 #1438

  Ú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

  

  ArchElf

  addikt

  válasz Oly #1434 üzenetére

  Hol van ez futtatva (access, ha jól rémlik?)

  Hirtelen ezeket találtam:
  - Mi az a Bontás Pending?
  - GOTO értelmetlen, használj Exit Sub-ot
  - probalkozasok hol kap értéket, nincs átadva a Sub-nak, ez valami globális objektum?
  - user() implementálva van?
  - Ezeket mire használod?
  Kiertesito1, Kiertesites1, Kiertesito2, Kiertesites2, Kiertesito3, Kiertesites3
  - indentálásra figyelj:
  If akármi Then
  'művelet 1
  'művelet 2
  Else
  'művelet 3
  'művelet 4
  End If
  így legalább olvasható lesz a kód
  - használj Option Explicit-et (minden változót kötelező deklarálnod Dim akármi-vel, de legalább véd az elgépelés és a túlzott mértékű változó használat ellen)

  AE

• #1436 ArchElf addikt Oly #1434

  Új Válasz 2011-09-19 10:33:48 #1436

  Ú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

  

  ArchElf

  addikt

  válasz Oly #1434 üzenetére

  Hol hal el?

  írj be az elejére egy
  On Error Resume Next-et

  A végére meg ezt:
  If Err Then
  MsgBox(Err.Number & vbCrLf & Err.Description)
  Err.Clear()
  End If
  On Error Goto 0

  Ez majd kiírja, mi a hiba, akkor lehet majd egy kicsit pontosabban ráközelíteni a problémára...

  AE

• #1434 Oly őstag Oly #1431

  Új Válasz 2011-09-19 10:27:39 #1434

  Ú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

  

  Oly

  őstag

  válasz Oly #1431 üzenetére

  Most addig eljutottam, hogy néhány helyen már futnak a scriptek, de még mindig nem mind.
  pl ez sem:

  Private Sub Command34_Click()
  Dim proba As Long
  'Dim sortores As String
  'sortores = ""
  hivas = MsgBox("Hívtad a kontaktot?", vbQuestion + vbYesNo, "Megerősítés")
  If hivas = vbNo Then
  GoTo Vege
  End If
  If probalkozasok.Value > 0 Then
  sortores = vbCrLf
  End If
  probalkozasok.Value = probalkozasok.Value + 1
  
  nvf = MsgBox("Sikerült elérni az ügyflelet?", vbQuestion + vbYesNo, "Kérdés")
  If nvf = vbYes Then
  hozzafuz = InputBox("Eredmény", "Kérlek add meg, hogy mire jutottál")
  lezarass = MsgBox("Lezáruk a jegyet sikeres kiértesítéssel?", vbQuestion + vbYesNo, "Lezárás")
  If lezarass = vbYes Then
  Lezarva = 2
  MyFile = "BP.txt"
  fnum = FreeFile()
  Open MyFile For Append As fnum
  Write #fnum, Now(), user(), "M", ID, Lezarva
  Close #fnum
  End If
  Else
  hozzafuz = "Nem vette fel"
  End If
  Kiertesites_eredmenye = Kiertesites_eredmenye & sortores & probalkozasok & ". kiértesítés: " & hozzafuz
  If probalkozasok.Value = 1 Then
  Kiertesito1 = user()
  Kiertesites1 = Now()
  End If
  If probalkozasok.Value = 2 Then
  Kiertesito2 = user()
  Kiertesites2 = Now()
  End If
  If probalkozasok.Value = 3 Then
  Kiertesito3 = user()
  Kiertesites3 = Now()
  lezaras = MsgBox("Ez volt a harmadik próbálkozás! Lezáruk a jegyet sikertelen kiértesítéssel?", vbQuestion + vbYesNo, "Lezárás")
  If lezaras = vbYes Then
  Lezarva = 3
  MyFile = "BP.txt"
  fnum = FreeFile()
  Open MyFile For Append As fnum
  Write #fnum, Now(), user(), "M", ID, Lezarva
  Close #fnum
  End If
  End If
  Vege:
  End Sub

• #1428 ArchElf addikt Oly #1425

  Új Válasz 2011-09-19 09:08:07 #1428

  Ú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

  

  ArchElf

  addikt

  válasz Oly #1425 üzenetére

  Script elején GetLocale()-al le tudod kérdezni az aktuális terület beállítást, utána
  SetLocale(id)-val beállítod a kívántat, majd a script végén visszaállítod az eredetit...

  AE

• #1427 martonx veterán Oly #1425

  Új Válasz 2011-09-19 08:52:14 #1427

  Ú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

  

  martonx

  veterán

  válasz Oly #1425 üzenetére

  én a helyedben megpróbálnám makróban lekezelni a területi beállításokból fakadó eltéréseket. Egyáltalán makróban lehet megnézni, hogy pontosan mi és miért nem megy. Ha pedig ez megvan, akkor már kb. meg is oldottad a problémát.

• #1425 Oly őstag Oly #1410

  Új Válasz 2011-09-19 08:41:13 #1425

  Ú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

  

  Oly

  őstag

  válasz Oly #1410 üzenetére

  Sziasztok.

  Mivel nem tudjuk a területi beállításokat állítani minden gépen, ezért valami más megoldásra lenne szükségem.

  Próbálkoztam, hogy az én gépemen is átállítom angolra, de nem történt semmi, majd mikor visszaállítottam magyarra, akkor az én gépemen sem ment már a dolog.
  Sőt!
  Ami eddig ment (másik adatbázisban), az sem megy most már.

  Van valami alternatív lehetőség, ami területi beállítástól független?
  Sajnos ez az alkalmazás több 100 gépen (PC, Terminal, Laptop) fog futni, és nem tudjuk máshogy megoldani.

  Ha kell, újra építem az egészet, csak mondjátok el hogy mire figyeljek...
  Milyen karaktereket ne használjak, vagy mi miatt akadnak ezek össze?

  ELőre is köszönöm.

• #1416 martonx veterán Oly #1415

  Új Válasz 2011-09-15 08:32:49 #1416

  Ú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

  

  martonx

  veterán

  válasz Oly #1415 üzenetére

  területi beállítások mindkettőn legyen magyar.

• #1411 ArchElf addikt Oly #1410

  Új Válasz 2011-09-14 15:37:24 #1411

  Ú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

  

  ArchElf

  addikt

  válasz Oly #1410 üzenetére

  Angol/Magyar Acces esetleg (egyiken ez, másikon az)?

  AE

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