FAQ


V této rubrice najdete odpovědi na své otázky, které můžete zasílat na adresu vbtipy@seznam.cz. Pokud nebudeme znát odpověď na nějakou otázku, objeví se v části Otázky bez odpovědi a budete-li znát odpověď vy, můžete nám ji pomocí výše uvedené adresy zaslat, rádi ji zveřejníme.

Otázky a odpovědi

Jak je to s prvkem Microsof Agent Control 2.0? Udělal jsem si program s tímto prvkem, ale nefunguje na jiném počítači. Co musí být nainstalováno na PC, aby se zaregistrovala knihovna (Agent Ctl.dll)?
S MS Agentem to není tak jednoduché. Záleží na tom, co všechno ve Vašem programu používáte a také na licenci. Není možné jen tak distribuovat MS Agenta se svým programem. Podívejte se na stránku www.microsoft.com/msagent/licensing.htm, kde najdete vše o licencování a na www.microsoft.com/msagent/devdownloads.htm pro různé konponenty MS Agenta.

Používám VB6 a chtěl bych z mého programu otevřít soubor PhotoPaintu. Kód vypadá následovně:

Dim xApp as PHOTOPAINT.CPntAutomate
xApp.FileOpen ("nazov suboru")

Bohužel to takto nefunguje. Co ještě musím zadat, aby se soubor otevřel?

Odpověď na dotaz nám poslal pan Ivo Kožušník:

Dim xApp as PHOTOPAINT.CPntAutomate
Set xApp = New PHOTOPAINT.CPntAutomate 'vytvoreni objektu PHOTOPAINT.CPntAutomate 
xApp.FileOpen ("nazov suboru")

Proč nefunguje tento kód:

Private Sub Form_Load()
  Dim a, b
  a = Command
  b = IIf(Right$ (a, 3) = "jpg","jpg","")
  MsgBox b
End Sub

Při přesunutí souboru s koncovkou jpg na zkompilovaný soubor se zobrazí zpráva, která bude prázdná. Ale když použiju CommonDialog, tak to funguje:

Private Sub Command1_Click()
  Dim a, b
  a = CommonDialog1.FileName
  b = IIf(Right$ (a, 3) = "jpg","jpg","")
  MsgBox b
End Sub

Když vyberu soubor jpg pomocí CommonDialogu, tak ve zprávě bude "jpg", ale když vyberu jiný soubor, tak bude zpráva prázdná.
V řetězci Command není text C:\soubor.jpg, ale "C:\soubor.jpg", tzn. že Right(a,3) vrátí pg" a ne jpg.


Otázky bez odpovědi

Jak se používají Nokia AT commands ve Visual Basicu 6.0?


Můžu nějakým způsobem získat jmenovku sekce na datovém CD (např.: sekce 1 se jmenovkou "ZALOHA", sekce 2 se jmenovkou "TEST"). Název jmenovky umím získat přes FileSystemObject, ale nevím jak je získat z vícesekvenčního CD.


Mám problémy s integrováním ActiveX vytvořeným ve VB 6.0 do webové stránky. Staré soubory, které mám, fungují bezchybně, ale nové se nechtějí vůbec načíst. Dával jsem je tam přes MS Front Page XP, ale když je pustím přes VB 6.0, tak taky fungují. Nevíte čím by to mohlo být?


Vytvořil jsem program, který pracuje se soubory vlastního formátu. Soubory mají vlastní příponu .dpw. Soubory jsou asociovány s mým programem. Mohu nějakým způsobem přidat do vlastností tohoto typu souboru (*.dpw) další záložku, která by obsahovala bližší informace o dokumentu, podobně jako je to u souboru .doc ve Wordu?


Znáte nějaký prvek ActiveX, který by zvýrazňoval syntaxi zdrojového kódu HTML a kódu Visual Basicu?


Neexistuje nějaký OCX, nebo DLL knihovna, která by umožňovala odesílání krátkých textových zpráv rovnou z PC přes modem?


Jak lze přijímat/posílat data na některý z portů ve Windows 2000?


Nevíte kde se dá sehnat (pokud existuje) prvek, který se chová jako textové pole ve Wordu?


Jak zjistit, kolik bajtů bylo staženo přes Internet v předem dané době? Jde mi o připojení přes lokální síť, ne přes modem.


Jak se dá ve Visual basicu ovládat USB port?


Ve Windows 98 jsem vytvořil program s ovládacím prvkem Timer. Program fungoval bez problémů, ale když jsem jej spustil na Windows 2000, prvek časoval asi 5x rychleji. Nevíte so s tím?


Potřebuji ve svém programu použít průhledný textbox nebo textbox, ve kterém by byl na pozadí mnou vybraný obrázek. Na Internetu jsem našel tři různé návody, ale ani jeden neposkytuje takové funkce jako původní textbox (ScrollBar, DataField atd.).