Semoga berguna...
Vavai
-----Original Message-----
From: Rod Stephens <[EMAIL PROTECTED]>
To: [EMAIL PROTECTED]
Date: Sun, 26 Jun 2005 21:28:27 +0000
Subject: VB6 Helper Newsletter
Have a great week and thanks for subscribing!
Rod
[EMAIL PROTECTED]
==========
VB6 Contents:
1. Updated Bug: ItemData stores only integers
2. Updated HowTo: Write an InStrRev function for VB 5
Both Contents:
3. New Links
4. Karen Watterson's Weekly Destinations and Diversions (D & D)
==========
++++++++++
<VB6>
++++++++++
==========
1. Updated Bug: ItemData stores only integers
http://www.vb-helper.com/bug_itemdata.html
Someone asked me why their dollars and cents values stored using the
ItemData property was returned in only dollars. The reason is ItemData
has data type Long. If you a Single value in it, it will be rounded off.
If you know the order of the items in the ComboBox or ListBox, just keep
them in synch with the array so ComboBox1.Item(i) corresponds to
DataValue(i).
This won't work if you set the control's Sorted property to True because
then the control reorders the items in the list as you add them. In that
case, store the real data in an array or collection. Then save the new
item's index in the array/collection in the ItemData property. The data
corresponding to item ComboBox1.Item(i) will be
the_data(ComboBox1.ItemData(i)).
Michael Heie gives this tip for working with sorted controls. After you
add a new item to a ListBox or ComboBox, use the NewIndex property to
get the newly added item's index in the control and store the data in
corresponding ItemData entry.
Box.AddItem Data
Box.ItemData(Box.NewIndex) = ItemData
==========
2. Updated HowTo: Write an InStrRev function for VB 5
http://www.vb-helper.com/howto_vb5_instrrev.html
Thanks to Christopher McGrath ([EMAIL PROTECTED]).
Thanks also to Roger Gilchrist ([EMAIL PROTECTED]) for noticing
that my original example called VB 6's InStrRev function instead of
vb5InstrRev (my fault, not Christopher's). It was a pretty silly example
written that way!
The vb5InstrRev function starts at the end of the string and works its
way backwards to see if it can find the target string.
Public Function vb5InstrRev(ByVal StringCheck As String, _
StringMatch As String, Optional Start As Long = -1, _
Optional Compare As VbCompareMethod = vbBinaryCompare) _
As Long
Dim lStartPoint As Long
Dim lEndPoint As Long
Dim lSearchLength As Long
Dim lCtr As Long
Dim sWkg As String
vb5InstrRev = 0
If Len(StringMatch) > Len(StringCheck) Then Exit _
Function
If Start < -1 Or Start = 0 Or Start > Len(StringCheck) _
Then Exit Function
lSearchLength = Len(StringMatch)
lStartPoint = IIf(Start = -1, Len(StringCheck), Start)
lEndPoint = 1
For lCtr = lStartPoint To lEndPoint Step -1
sWkg = Mid(StringCheck, lCtr, lSearchLength)
If StrComp(sWkg, StringMatch, Compare) = 0 Then
vb5InstrRev = lCtr
Exit Function
End If
Next lCtr
End Function
See also:
- Iteratively find the last occurrance of a substring without using
InStrRev <http://www.vb-helper.com/howto_instrrev_iterative.html>
- Recursively find the last occurrance of a substring without using
InStrRev <http://www.vb-helper.com/howto_instrrev_recursive.html>
==========
++++++++++
<Both>
++++++++++
==========
3. New Links
http://www.vb-helper.com/links.html
anti-trojan.org
http://www.anti-trojan.org
A large non-profit site containing information about "trojan horse"
programs, removal tools, and advisories.
Dunstan Thomas Consulting
http://consulting.dthomas.co.uk
Software Architecture Consulting Services OOAD development process
consulting.
==========
4. Karen Watterson's Weekly Destinations and Diversions (D & D)
http://www.vb-helper.com/karens_weekly_diversions.html
Readable/Watchable
- As always, start here
<http://msdn.microsoft.com/recent/default.aspx>. Then check out
gotdotnet.com's user samples
<http://www.gotdotnet.com/Community/UserSamples/>.
- Two *free* online books on VB 2005! Upgrading
/msdn.microsoft.com/vbrun/staythepath/additionalresources/upgradingvb6/>
and programming <http://msdn.microsoft.com/vbasic/whidbey/introto2005/>.
- Microsoft's planning guide/white paper on securing smart cards
<http://www.microsoft.com/technet/security/topics/networksecurity/secures
martcards/default.mspx>.
- Microsoft's Administrator Accounts Security Planning Guide
<http://www.microsoft.com/technet/security/topics/serversecurity/administ
ratoraccounts/default.mspx>.
- Duncan Mackenzie has written a good article for the July issue of
MSDN Magazine on creating and implementing a breadcrumb control
<http://msdn.microsoft.com/msdnmag/issues/05/07/AdvancedBasics/>. Here's
a link to his other MSDN Magazine articles
crosoft.com/msdnmag/find/default.aspx?type=Au&phrase=Duncan%20Mackenzie>
and his personal Website <http://www.duncanmackenzie.net/>.
- Interesting article by Michael David, Can SQL be saved from XML?
<http://www.dmreview.com/editorial/newsletter_article.cfm?articleId=10307
61>
- Eric Lawrence's two-part series on Microsoft's new Fiddler (HTTP
debugger) Power Toy. Part 1
m/ie/default.aspx?pull=/library/en-us/dnwebgen/html/ie_introfiddler.asp>
and Part 2
<http://msdn.microsoft.com/ie/default.aspx?pull=/library/en-us/dnwebgen/h
tml/ie_introfiddler2.asp>.
- Joe Binder's article on customizing VB 2005's My namespace
<http://msdn.microsoft.com/msdnmag/issues/05/07/My/default.aspx>.
- Frank Rice's 19-pager on creating XML mappings in Excel 2003
<http://msdn.microsoft.com/office/default.aspx?pull=/library/en-us/odc_xl
2003_ta/html/OfficeExcelXMLMappingScenarios.asp>.
- Brad McCabe's article on threading in VS 2005
<http://msdn.microsoft.com/library/default.asp?url=/library/en-us/dnvs05/
html/threadinginvb2005.asp>.
- Article on Microsoft's Component Installer SDK
<http://msdn.microsoft.com/netframework/default.aspx?pull=/library/en-us/
dnnetdep/html/mcisdk.asp>.
- MSDN TV episode on using VS 2005 in a 64-bit environment
<http://www.microsoft.com/downloads/details.aspx?FamilyID=312AA3BA-CBE8-4
D7F-AF09-285B13D068CD&displaylang=en>.
- Creating your own symbol sets for Office 2003 international
characters
<http://msdn.microsoft.com/office/default.aspx?pull=/library/en-us/dno2k3
ta/html/Office2003InternationalCharSet.asp>.
Selected KB articles
- 893803 Windows Installer 3.1 (v2) is available
<http://support.microsoft.com/default.aspx?scid=kb%3ben-us%3b893803>
- 306158 How to implement impersonation in an ASP.NET app.
<http://support.microsoft.com/default.aspx?scid=kb%3ben-us%3b306158>
- 308157 How To Implement Forms-Based Authentication in Your ASP.NET
Application with VB.NET.
<http://support.microsoft.com/default.aspx?scid=kb%3ben-us%3b308157>
- 313091 How to create keys by using VB.NET for use in Forms
authentication.
<http://support.microsoft.com/default.aspx?scid=kb%3ben-us%3b313091>
- 306238 How To Implement Role-Based Security with Forms-Based
Authentication in Your ASP.NET Application with VB.NET.
<http://support.microsoft.com/default.aspx?scid=kb%3ben-us%3b306238>
- 301237 How To Create a VB Project Template For Creating IIS
Components.
<http://support.microsoft.com/default.aspx?scid=kb%3ben-us%3b301237>
- 307292 How To: Dismiss a Dialog Box Displayed by an Office
Application with VB.NET.
<http://support.microsoft.com/default.aspx?scid=kb%3ben-us%3b307292>
- 306666 How To Recursively Search Directories by Using VB.NET.
<http://support.microsoft.com/default.aspx?scid=kb%3ben-us%3b306666>
- 319591 HOW TO: Save a .gif File with a New Color Table with
VB.NET.
<http://support.microsoft.com/default.aspx?scid=kb%3ben-us%3b319591>
- 308470 "Differences Between Visual Basic .NET and Visual C# .NET"
white paper is available.
<http://support.microsoft.com/default.aspx?scid=kb%3ben-us%3b308470>
Downloadable
- WSE 3.0 June CTP
<http://www.microsoft.com/downloads/details.aspx?FamilyId=7591DFD2-E1B7-4
624-9D5B-29C211D149FE&displaylang=en>.
- Fiddler 0.9.9 <http://www.fiddlertool.com/fiddler/version.asp>.
- Microsoft Component Installer SDK
<http://www.microsoft.com/downloads/details.aspx?FamilyID=cd11be5a-c735-4
8d9-9cdd-a6d211c2e1c1&DisplayLang=en>.
- Hotfix for SQL Server 2000 Reporting Services SP2
<http://www.microsoft.com/downloads/details.aspx?FamilyID=7FFE50D4-AFF8-4
C1E-9609-6798190C2D58&displaylang=en>.
- MSF for Agile Software Development beta
<http://www.microsoft.com/downloads/details.aspx?FamilyID=F9FD355E-98C2-4
B51-86AB-4D4A6B34AAFC&displaylang=en>.
Travelable
- Information Quality (IQ) Conference 2005
<http://www.infoimpact.com/body/IQConf_2005_Houston/conf2005.html>, Sep
19-23 in Houston.
Jargon Alert
- WiX - Windows Installer XML Toolset
.com/library/default.asp?url=/library/en-us/dnwingen/html/wixsetup.asp>.
Read Rob Mensching's March 2005 white paper on how to use it at
- Crimson - error reporting feature expected to ship with Longhorn
(circa 2007).
- Blackcomb - Longhorn's successor (circa 2010)
- SAC - no, not Strategic Air Command, but SQL Server 2005's new
Surface Area Configuration tools (GUI and command line).
Misc
- European Union Directive on Data Protection
<http://www.cdt.org/privacy/eudirective/>.
- Cash, credit, or cell?
<http://www.businessweek.com/magazine/content/05_26/b3939071_mz011.htm>
- Vanity Fair article on Deep Throat
<http://www.vanityfair.com/commentary/content/printables/050530roco02?pri
nt=true>.
- Ken Silverstein's feature in the July issue of Harper's Magazine
on pork barrels <http://www.harpers.org/Feature.html>. (not online yet)
- Douglas Brinkley's story on "The Last Buccaneer" about 82-year old
Norman Mailer. In the June 29-July 14 issue of Rolling Stone.
- Good article, A Guide to the Python Universe for ESRI Users
<http://www.esri.com/news/arcuser/0405/spring2005.html>. (Be sure to
read the poem by Tim Peters on "The Zen of Python" - "Beautiful is
better than ugly./Explicit is better than implicit..."
- Several good articles in the July issue of SD Magazine
<http://www.sdmagazine.com> including on the first annual Stan
Kelly-Bootle Eclectech Award and another with takeaways from SD West
(held in March).
==========
Archives:
http://www.topica.com/lists/VBHelper
http://www.topica.com/lists/VB6Helper
http://www.topica.com/lists/VBNetHelper
http://www.vb-helper.com/cgi-bin/mojo/mojo.cgi?flavor=archive&list=VB_Hel
per_Newsletter
Post questions at:
http://www.topica.com/lists/VBHelperQA
--^----------------------------------------------------------------
Untuk keluar dari millis ini, kirim email kosong ke:
[EMAIL PROTECTED]
Yahoo! Groups Links
<*> To visit your group on the web, go to:
http://groups.yahoo.com/group/Programmer-VB/
<*> To unsubscribe from this group, send an email to:
[EMAIL PROTECTED]
<*> Your use of Yahoo! Groups is subject to:
http://docs.yahoo.com/info/terms/
