Otßzky a odpov∞di 


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 

Na formulß°i mßm prvek DBList napojen² na prvek Data. P°i spuÜt∞nφ programu se data v DBListu se°adφ tak, jak byla do databßze vlo₧ena (nikoli od A do Z). Pot°eboval bych aby se po stisknutφ tlaΦφtka vÜechny polo₧ky v DBListu se°adily od A do Z.

NejjednoduÜÜφ je pou₧φt vlastnost Sort objektu Recordset:

Private Sub Command1_Click()
  Data1.Recordset.Sort = "name" 'nazev sloupce podle ktereho se bude tridit
  Set Data1.Recordset = Data1.Recordset.OpenRecordset(dbOpenDynaset)
  Data1.UpdateControls
End Sub


K Φemu slou₧φ prvek DataRepeater?
Prvek DataRepeater slou₧φ k vytvß°enφ tzv. nekoneΦn²ch formulß°∙. Umφ se navßzat na data a zobrazuje ne pouze jeden, ale n∞kolik zßznam∙ za sebou jako grid. Narozdφl od prvk∙ typu grid (FlexGrid, DBGrid atd.) nezobrazuje data tak primitivn∞, ale tak jak si sami navrhnete. Vy sami Nejd°φve vytvo°φte ActiveX prvek, kter² se navß₧e na jeden zßznam z databßze. A tento potom umφstφte na DataRepeater, kter² je zobrazuje za sebou tak, jak zφskal data z databßze.


Pot°ebuji z databßze smazat tabulku. Pomocφ DAO to nebyl problΘm, ADO vÜak ₧ßdnou kolekci TableDefs jako DAO nemß. Jak tedy tabulku sma₧u?

S objekty ADO tabulku sma₧ete pouze pomocφ SQL p°φkaz∙, tzn. zavolat metodu Execute s SQL p°φkazem pro v²maz tabulky.

Connection.Execute "DROP TABLE Nazev_tabulky"

Nebo m∙₧ete pou₧φt objekty ADOX.

Dim cl As New ADOX.Catalog
cl.ActiveConnection = "vas_connection_string"
cl.Tables.Delete "nazev_tabulky"


Otßzky bez odpov∞di

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?


Jak²m zp∙sobem mohu ulo₧it do resource souboru MP3 soubor a jak ho odtud zφskat?


Pot°eboval bych pomocφ funkce API vyvolat dialog "Najφt". SlyÜel jsem, ₧e je to p°esn∞ funkce Findtext. Jejφ deklaraci jsem si naÜel v programu API Text Viewer vΦetn∞ typu FINDREPLACE.


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?


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?


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.).