FYI,
Semoga bermanfaat untuk programmer Visual Basic & VB .NET (untuk
.NET bisa browse ke bagian Selected KB articles
Salam,
Masim "Vavai" Sugianto
-----Original Message-----
From: Rod Stephens <[EMAIL PROTECTED]>
To: [EMAIL PROTECTED]
Date: Mon, 25 Jul 2005 23:02:02 +0000
Subject: VB6 Helper Newsletter
I'm in the middle of checking pages for my next book so I'll be very
busy for a while and I may need to skip next week's newsletter. If next
week's newsletter doesn't arrive, don't worry. It'll be back.
Have a great week and thanks for subscribing!
Rod
[EMAIL PROTECTED]
==========
VB6 Contents:
1. New HowTo: Display the program's current directory
2. New HowTo: Shell a program with a specific startup directory
3. New HowTo: Draw a butterfly curve
4. New HowTo: Draw a chrysanthemum curve
Both Contents:
5. New Links
6. Karen Watterson's Weekly Destinations and Diversions (D & D)
==========
++++++++++
<VB6>
++++++++++
==========
1. New HowTo: Display the program's current directory
http://www.vb-helper.com/howto_show_cur_dir.html
http://www.vb-helper.com/HowTo/howto_show_cur_dir.zip
This application uses CurDir to display its directory when it starts.
Private Sub Form_Load()
txtCurDir.Text = CurDir
End Sub
Compile this program into an executable. Then make a shortcut to it,
right-click the shortcut, select Properties, and change the program's
"Start in" directory. You can use this to test the following example.
This example is mostly for use with the following HowTo rather than as a
spectacularly interesting example by itself.
==========
2. New HowTo: Shell a program with a specific startup directory
http://www.vb-helper.com/howto_shell_in_dir.html
http://www.vb-helper.com/HowTo/howto_shell_in_dir.zip
When a program uses Shell to start another program, the new program
starts in the shelling program's currect directory, even if the shelled
program is a shortcut that specifies its own startup path.
This program shells another application in a specific startup directory.
It saves its current directory, uses ChDir to go to desired start
directory, shells the otehr program, and then restores its original
directory.
Private Sub cmdGo_Click()
Dim prev_dir As String
' Save the current directory.
prev_dir = CurDir
' Go to the desired startup directory.
ChDir txtStartupPath.Text
' Shell the application.
Shell txtApplication.Text
' Restore the saved directory.
ChDir prev_dir
MsgBox CurDir
End Sub
For an example that you can Shell with this program, see the previous
HowTo.
==========
3. New HowTo: Draw a butterfly curve
http://www.vb-helper.com/howto_butterfly_curve.html
http://www.vb-helper.com/HowTo/howto_butterfly_curve.zip
This program uses the following equations to draw the butterfly curve:
x = Cos(t) * Exp(Cos(t)) - 2 * Cos(4 * t) - Sin(t / 12) ^ 5
y = Sin(t) * Exp(Cos(t)) - 2 * Cos(4 * t) - Sin(t / 12) ^ 5
Subroutine DrawCurve loops variable t through the values 0 to 24 * Pi to
generate and connect the curve's points.
Private Sub DrawCurve()
Const PI As Double = 3.14159265
Const NUM_LINES As Long = 5000
Const NUM_COLORS As Integer = 6
Dim i As Long
Dim t As Double
Dim expr As Double
Dim x As Double
Dim y As Double
Dim colors(0 To NUM_COLORS - 1) As OLE_COLOR
' Initialize colors.
i = 0
colors(i) = RGB(255, 0, 0): i = i + 1
colors(i) = RGB(0, 255, 0): i = i + 1
colors(i) = RGB(0, 0, 255): i = i + 1
colors(i) = RGB(255, 255, 0): i = i + 1
colors(i) = RGB(0, 255, 255): i = i + 1
colors(i) = RGB(255, 0, 255): i = i + 1
' Get the first point.
t = 0
expr = Exp(Cos(t)) - 2 * Cos(4 * t) - Sin(t / 12) ^ 5
x = Cos(t) * expr
y = Sin(t) * expr
' I switch these for vertical symmetry.
Me.CurrentX = y
Me.CurrentY = -x
Me.DrawWidth = 2
For i = 1 To NUM_LINES - 1
t = i * 24# * PI / NUM_LINES
expr = Exp(Cos(t)) - 2 * Cos(4 * t) - Sin(t / 12) ^ 5
x = Cos(t) * expr
y = Sin(t) * expr
'Line -(y, -x),vbblue
Line -(y, -x), colors((i * 24 / NUM_LINES) Mod NUM_COLORS)
Next i
End Sub
For more information on graphics programming in Visual Basic 6, see my
book "Ready-to-Run Visual Basic Graphics Programming"
(http://www.vb-helper.com/vbgp.htm).
==========
4. New HowTo: Draw a chrysanthemum curve
http://www.vb-helper.com/howto_chrysanthemum_curve.html
http://www.vb-helper.com/HowTo/howto_chrysanthemum_curve.zip
This program uses the following equations to draw the chrysanthemum
curve:
r = 5 * (1 + Sin(11 * t / 5)) -
4 * Sin(17 * t / 3) ^ 4 * Sin(2 * Cos(3 * t) - 28 * t) ^ 8
x = r * Cos(t)
y = r * Sin(t)
Subroutine DrawCurve loops variable t through the values 0 to 21 * Pi to
generate and connect the curve's points.
Private Sub DrawCurve()
Const PI As Double = 3.14159265
Const NUM_LINES As Long = 5000
Const NUM_COLORS As Integer = 6
Dim i As Long
Dim t As Double
Dim expr As Double
Dim r As Double
Dim x As Double
Dim y As Double
Dim colors(0 To NUM_COLORS - 1) As OLE_COLOR
' Initialize colors.
i = 0
colors(i) = RGB(255, 0, 0): i = i + 1
colors(i) = RGB(0, 255, 0): i = i + 1
colors(i) = RGB(0, 0, 255): i = i + 1
colors(i) = RGB(255, 255, 0): i = i + 1
colors(i) = RGB(0, 255, 255): i = i + 1
colors(i) = RGB(255, 0, 255): i = i + 1
' Get the first point.
t = 0
r = 5 * (1 + Sin(11 * t / 5)) - 4 * Sin(17 * t / 3) ^ 4 * Sin(2 *
Cos(3 * t) - 28 * t) ^ 8
x = r * Cos(t)
y = r * Sin(t)
' I switch these for vertical symmetry.
Me.CurrentX = y
Me.CurrentY = -x
Me.DrawWidth = 2
For i = 1 To NUM_LINES - 1
t = i * 21# * PI / NUM_LINES
r = 5 * (1 + Sin(11 * t / 5)) - 4 * Sin(17 * t / 3) ^ 4 * Sin(2
* Cos(3 * t) - 28 * t) ^ 8
x = r * Cos(t)
y = r * Sin(t)
'Line -(y, -x),vbblue
Line -(y, -x), colors((i * 21 / NUM_LINES) Mod NUM_COLORS)
Next i
End Sub
For more information on graphics programming in Visual Basic 6, see my
book "Ready-to-Run Visual Basic Graphics Programming"
(http://www.vb-helper.com/vbgp.htm).
==========
++++++++++
<Both>
++++++++++
==========
5. New Links
http://www.vb-helper.com/links.html
Vlasishost.com | Programming Basic
http://www.vlasishost.com/news/programming-basic.html
Mostly information about HTML and php, but also a decent collection of
Visual Basic links.
==========
6. 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/>.
- The August issue of MSDN Magazine
<http://msdn.microsoft.com/msdnmag>. Related: Sept issue preview article
on personalizing a portal with user controls and custom Web parts
<http://msdn.microsoft.com/msdnmag/issues/05/09/WebParts/default.aspx>.
- Interview with FreeBSD guru (and PhD) Colin Percival on the
security risks of hyperthreading
<http://www.onlamp.com/pub/a/bsd/2005/07/21/Big_Scary_Daemons.html>.
- Joe Farrell's article on deriving projection matrices
<http://www.codeguru.com/Cpp/misc/misc/math/print.php/c10123/>.
- Raymond Lewallen's thoughtful July 18 post on refactoring
<http://codebetter.com/blogs/raymond.lewallen/archive/2005/07.aspx>.
- Stephen Swoyer's editorial suggesting that Microsoft's
Virtualization Moves Still Lag
<http://www.esj.com/news/article.aspx?EditorialsID=1450>. Excerpt: Two
years on, Microsoft's flagship offering still can't hold a candle to
VMWare."
- MSDN TV episode on writing secure code with VS 2005
<http://www.microsoft.com/downloads/details.aspx?FamilyID=BED43DD9-A02B-4
6AD-93BE-84B5B1A8DC27&displaylang=en>.
Selected KB articles
- 811401 How to print the content of a RichTextBox with Microsoft
VB.NET.
<http://support.microsoft.com/default.aspx?scid=kb%3ben-us%3b811401>
- 314201 How to send e-mail programmatically with System.Web.Mail
and VB.NET.
<http://support.microsoft.com/default.aspx?scid=kb%3ben-us%3b314201>
- 897298 You receive an "unhandled exception of type
'System.Runtime.InteropServices.SEHException'" error message when you
call the Application.EnableVisualStyles method in VB.NET 2003 and in VB
2002.
<http://support.microsoft.com/default.aspx?scid=kb%3ben-us%3b897298>
- 899580 The Full Text resource fails when you install a new
clustered instance after you apply SQL Server 2000 SP4 to an existing
clustered instance.
<http://support.microsoft.com/default.aspx?scid=kb%3ben-us%3b899580>
- 306590 INFO: ASP.NET Security Overview.
<http://support.microsoft.com/default.aspx?scid=kb%3ben-us%3b306590>
- 326340 How to authenticate against the Active Directory by using
forms authentication and VB.NET.
<http://support.microsoft.com/default.aspx?scid=kb%3ben-us%3b326340>
- 815155 HOW TO: Configure URLScan to Protect ASP.NET Web apps.
<http://support.microsoft.com/default.aspx?scid=kb%3ben-us%3b815155>
- 307901 INFO: Permissions to Connect to a Remote Access Database
from ASP.NET.
<http://support.microsoft.com/default.aspx?scid=kb%3ben-us%3b307901>
- 818014 HOW TO: Secure Applications That Are Built on the .NET
Framework.
<http://support.microsoft.com/default.aspx?scid=kb%3ben-us%3b818014>
- 891984 Implications of removing the xp_cmdshell stored procedure
from SQL Server 2000.
<http://support.microsoft.com/default.aspx?scid=kb%3ben-us%3b891984>
Downloadable
- Niels Berglund's SQLClr Project project type for VS2005
op.com/nielsb/PermaLink.aspx?guid=edefd0db-88ef-42cb-8935-ce8744388203>.
Related: his blog <http://sqljunkies.com/weblog/nielsb/>.
- Lutz Roeder's Reflector class browser
<http://www.aisto.com/roeder/dotnet>. Related: wincv - Windows forms
class viewer (located in "C:\Program Files\Microsoft Visual Studio .NET
2003\SDK\v1.1\Bin").
- 30-day full eval version of a startup's Web Vulnerability Scanner
<http://www.acunetix.com/websitesecurity/web-site-security.htm>.
- SQL Server 2005 JDBC Driver Beta 1
<http://www.microsoft.com/sql/downloads/2005/jdbc.mspx> (it's a Type 4
driver.)
- Samples for Microsoft's "Developing a License Provider Service for
Windows" (DRM - digital rights management)
<http://www.microsoft.com/downloads/details.aspx?FamilyID=5DD88A88-F587-4
0C1-93F5-F81BAB36455E&displaylang=en>.
Browsable
- Microsoft Acrylic (beta) site
<http://www.microsoft.com/products/_expression_/>. (Based on Creature
House _expression_ 3).
- Sample hacks from Mapping Hacks
<http://www.oreilly.com/catalog/mappinghks/>.
- O'Reilly's CodeZoo <http://www.codezoo.net>.
- Jon Udell's Google Maps walking tour of Keene NH
<http://weblog.infoworld.com/udell/2005/02/25.html>. Related:
GoogleEarth.
- Do It Yourself Network <http://www.diynetwork.com/>. Companion
site for TV channel.
- Federalist Society <http://www.fed-soc.org/>. The Federalist
Society for Law and Public Policy Studies is a group of conservatives
and libertarians interested in the current state of the legal order.
- Ensuring Compatibility for Obfuscated Assemblies
<http://www.preemptive.com/support/dotfuscator/convert.html>.
- 90-page Web Services Security Policy spec
<http://specs.xmlsoap.org/ws/2005/07/securitypolicy/ws-securitypolicy.pdf
>.
- 2005 IBM Fellows
<http://press.arrivenet.com/tec/article.php/643379.html>. (Since 1963,
185 IBM Fellows have been appointed. Of these, 54 are active employees.
The IBM Technical Community numbers about 195,000 people, including 339
Distinguished Engineers)
Travelable
- 25th Steinbeck Festival <http://www.steinbeck.org/MainFrame.html>
Aug 4-7 in Salinas, CA.
- BASTA! <http://www.basta.net/2005/>> (I think of it as Germany's
equivalent of VSLive!) Sept 19-22 in Mainz.
Heads Up
- Free 90-day eLearning classes on SQL Server 2005
<https://www.microsoftelearning.com/sqlserver2005/>.
Jargon Alert
- GRIN (genetics, robotics, information, nano), technologies that
are impacting us biologically. See Washington Post reporter Joel
Garreau's 7/17/05 LA Times article, You're not good enough
<http://www.latimes.com/news/printedition/opinion/la-op-garreau17jul17,1,
5297286.story>.
- Microformats
ledge.wharton.upenn.edu/index.cfm?fa=viewArticle&id=1247&specialId=38>>.
Extensions to HTML/XHTML tags.
- PHEV
gazine/la-tm-500mpg29jul17,1,7773745.story?coll=la-headlines-magazine>>.
Plug-in hybrid electric vehicle.
- Bash script. A file containing a list of commands to be executed
by the bash shell. See L.M . MacEwan's class notes
<http://floppix.ccai.com/scripts1.html> and Mendel Cooper's Advanced
Bash-Scripting Guide <http://www.tldp.org/LDP/abs/html/> for more.
Download the Bash shell here
<http://www.gnu.org/software/bash/bash.html>>.
- Vista <http://www.microsoft.com/windowsvista/default.mspx>>. New
name for Longhorn. Vista ("bringing clarity to your world") presumably
sends an, ahem, clearer message than Longhorn (methane-emitting cattle).
- WAKA <http://www.worldkickball.com/>> - World Adult Kickball
Association.
- PEAS <http://www.charture.org/>> - America's Places of Ecological
and Aesthetic Significance according to the Charture Institute.
- WFO
<http://blog.tmcnet.com/the-birth-of-workforce-optimization.asp>> -
workforce optimization.
- MoonROx
//www.nasa.gov/home/hqnews/2005/may/HQ_05128_Centennial_Challenge.html>>
- Moon Regolith Oxygen. New NASA-sponsored Centennial Challenge ends
6/1/08.
- PLA <http://www.privatelabelmag.com/>> - private label
manufacturers.
Thought Question of the Week
- Should individual pharmacists and/or pharmacies be allowed to
refuse to fill valid prescriptions for medications they don't approve of
such as the "morning after" pill - or, presumably, lifestyle drugs like
Viagra?
Misc
- John Balzar's article, A<
tm-constitution30jul24,1,3465716.story?coll=la-headlines-magazine">Words
on Paper about different nations' constitutions.
- Washington Post evaluation of Microsoft Student 2006
hingtonpost.com/wp-dyn/content/article/2005/07/23/AR2005072300053.html>.
(Installation requires Office XP or 2003). Related: Microsoft Student
2006 home page
<http://www.microsoft.com/student/ProductDetails.aspx?pid=001>.
- Crime mapping in the UK
<http://www.jdi.ucl.ac.uk/crime_mapping/crime_mapping_guide/index.php>.
- Big Brother is watching many of us. Use of surveillance cameras is
on the rise, and satellites can probably report how many roses are
blooming in your yard. But I'd forgotten all about the "black boxes"
that ship with new vehicles these days. Read Salley Shannon's LA Times
Magazine article on them
gazine/la-tm-blackbox29jul17,1,5672131.story?coll=la-headlines-magazine>
and find out which vehicles include them
<http://vetronix.com/diagnostics/cdr/vehicle_list.html>.
- Journalism.org's annual State of the News Media
<http://www.stateofthenewsmedia.org/2005/index.asp> for 2005 makes
excellent reading.
- Virtual Field Herbarium <http://herbarium.literal.si/>.
- Craig Larman, Philippe Kruchten, and Kurt Bittner's 14-page paper
on common pitfalls to avoid in the RUP
rg/articles/articles/How_to_Fail_with_the_RUP_-_Kruchten_and_Larman.pdf>
(Rational Unified Process).
- Sudoku puzzles <http://www.sudoku.org.uk/> now stand shoulder to
shoulder with crossword puzzles in the LA Times. Even "adult only"
sudoku puzzle books are reportedly in the pipeline. Hard to imagine
they'll provide much competition to the X-rated (okay, I exaggerate,
adults only 18+) Grand Theft Auto: San Andreas.
- Compliance & Learning <http://www.learning2005.com/university/>.
12-minute audio stream or PodCast by Elliott Masie.
- Reactions to Wade Rousch's excellent August 2005 feature in
Technology Review on Social Machines
<http://wade.trblogs.com/archives/2005/07/social_machines_2.html>. The
original
ttp://www.technologyreview.com/articles/05/08/issue/feature_social.asp>.
Related: Brain Alvey and Jason Calacanis' (commercial venture) Weblogs
Inc. blog <http://socialsoftware.weblogsinc.com/> on social software.
- Good books: John Stilgoe's "Outside Lies Magic: Regaining History
and Awareness in Everyday Places
<<http://www.people.fas.harvard.edu/~stilgoe/01frame_greetings.html>.
- Statistics I've noted with interest recently. 1) According to
revised statistical methodology promoted by NCES <http://nces.ed.gov>>
(and presumably promoters of No Child Left Behind), California's high
school graduation rate is an impressive 89 percent
www.dailybulletin.com/Stories/0,1413,203%257E21481%257E2966026,00.html>.
2) Germany and Spain are the top two wind-power nations
p://www.technologyreview.com/articles/05/08/issue/forward_wind.asp?p=1>,
3) The number of pornographic websites
<http://www.technologyreview.com/articles/05/08/issue/datamine.asp?p=1>
(about two million) has increased 30-fold in the last seven years with
about 400 million pages online.
- Japan's Juki Net
<http://www.ebusinessforum.com/index.asp?layout=rich_story&doc_id=5903>
raises privacy concerns.
- Economist article on the future of US weapons labs
<http://www.economist.com/science/displayStory.cfm?story_id=4149455>.
- Higgs field and Higgs physics
<http://www.sciam.com/article.cfm?chanID=sa006&colID=1&articleID=000005FC
-2927-12B3-A92783414B7F0000>.
==========
Archives:
http://www.topica.com/lists/VBHelper
http://www.topica.com/lists/VB6Helper
http://www.topica.com/lists/VBNetHelper
-----Original Message-----
From: Rod Stephens <[EMAIL PROTECTED]>
To: [EMAIL PROTECTED]
Date: Mon, 25 Jul 2005 23:02:02 +0000
Subject: VB6 Helper Newsletter
I'm in the middle of checking pages for my next book so I'll be very
busy for a while and I may need to skip next week's newsletter. If next
week's newsletter doesn't arrive, don't worry. It'll be back.
Have a great week and thanks for subscribing!
Rod
[EMAIL PROTECTED]
==========
VB6 Contents:
1. New HowTo: Display the program's current directory
2. New HowTo: Shell a program with a specific startup directory
3. New HowTo: Draw a butterfly curve
4. New HowTo: Draw a chrysanthemum curve
Both Contents:
5. New Links
6. Karen Watterson's Weekly Destinations and Diversions (D & D)
==========
++++++++++
<VB6>
++++++++++
==========
1. New HowTo: Display the program's current directory
http://www.vb-helper.com/howto_show_cur_dir.html
http://www.vb-helper.com/HowTo/howto_show_cur_dir.zip
This application uses CurDir to display its directory when it starts.
Private Sub Form_Load()
txtCurDir.Text = CurDir
End Sub
Compile this program into an executable. Then make a shortcut to it,
right-click the shortcut, select Properties, and change the program's
"Start in" directory. You can use this to test the following example.
This example is mostly for use with the following HowTo rather than as a
spectacularly interesting example by itself.
==========
2. New HowTo: Shell a program with a specific startup directory
http://www.vb-helper.com/howto_shell_in_dir.html
http://www.vb-helper.com/HowTo/howto_shell_in_dir.zip
When a program uses Shell to start another program, the new program
starts in the shelling program's currect directory, even if the shelled
program is a shortcut that specifies its own startup path.
This program shells another application in a specific startup directory.
It saves its current directory, uses ChDir to go to desired start
directory, shells the otehr program, and then restores its original
directory.
Private Sub cmdGo_Click()
Dim prev_dir As String
' Save the current directory.
prev_dir = CurDir
' Go to the desired startup directory.
ChDir txtStartupPath.Text
' Shell the application.
Shell txtApplication.Text
' Restore the saved directory.
ChDir prev_dir
MsgBox CurDir
End Sub
For an example that you can Shell with this program, see the previous
HowTo.
==========
3. New HowTo: Draw a butterfly curve
http://www.vb-helper.com/howto_butterfly_curve.html
http://www.vb-helper.com/HowTo/howto_butterfly_curve.zip
This program uses the following equations to draw the butterfly curve:
x = Cos(t) * Exp(Cos(t)) - 2 * Cos(4 * t) - Sin(t / 12) ^ 5
y = Sin(t) * Exp(Cos(t)) - 2 * Cos(4 * t) - Sin(t / 12) ^ 5
Subroutine DrawCurve loops variable t through the values 0 to 24 * Pi to
generate and connect the curve's points.
Private Sub DrawCurve()
Const PI As Double = 3.14159265
Const NUM_LINES As Long = 5000
Const NUM_COLORS As Integer = 6
Dim i As Long
Dim t As Double
Dim expr As Double
Dim x As Double
Dim y As Double
Dim colors(0 To NUM_COLORS - 1) As OLE_COLOR
' Initialize colors.
i = 0
colors(i) = RGB(255, 0, 0): i = i + 1
colors(i) = RGB(0, 255, 0): i = i + 1
colors(i) = RGB(0, 0, 255): i = i + 1
colors(i) = RGB(255, 255, 0): i = i + 1
colors(i) = RGB(0, 255, 255): i = i + 1
colors(i) = RGB(255, 0, 255): i = i + 1
' Get the first point.
t = 0
expr = Exp(Cos(t)) - 2 * Cos(4 * t) - Sin(t / 12) ^ 5
x = Cos(t) * expr
y = Sin(t) * expr
' I switch these for vertical symmetry.
Me.CurrentX = y
Me.CurrentY = -x
Me.DrawWidth = 2
For i = 1 To NUM_LINES - 1
t = i * 24# * PI / NUM_LINES
expr = Exp(Cos(t)) - 2 * Cos(4 * t) - Sin(t / 12) ^ 5
x = Cos(t) * expr
y = Sin(t) * expr
'Line -(y, -x),vbblue
Line -(y, -x), colors((i * 24 / NUM_LINES) Mod NUM_COLORS)
Next i
End Sub
For more information on graphics programming in Visual Basic 6, see my
book "Ready-to-Run Visual Basic Graphics Programming"
(http://www.vb-helper.com/vbgp.htm).
==========
4. New HowTo: Draw a chrysanthemum curve
http://www.vb-helper.com/howto_chrysanthemum_curve.html
http://www.vb-helper.com/HowTo/howto_chrysanthemum_curve.zip
This program uses the following equations to draw the chrysanthemum
curve:
r = 5 * (1 + Sin(11 * t / 5)) -
4 * Sin(17 * t / 3) ^ 4 * Sin(2 * Cos(3 * t) - 28 * t) ^ 8
x = r * Cos(t)
y = r * Sin(t)
Subroutine DrawCurve loops variable t through the values 0 to 21 * Pi to
generate and connect the curve's points.
Private Sub DrawCurve()
Const PI As Double = 3.14159265
Const NUM_LINES As Long = 5000
Const NUM_COLORS As Integer = 6
Dim i As Long
Dim t As Double
Dim expr As Double
Dim r As Double
Dim x As Double
Dim y As Double
Dim colors(0 To NUM_COLORS - 1) As OLE_COLOR
' Initialize colors.
i = 0
colors(i) = RGB(255, 0, 0): i = i + 1
colors(i) = RGB(0, 255, 0): i = i + 1
colors(i) = RGB(0, 0, 255): i = i + 1
colors(i) = RGB(255, 255, 0): i = i + 1
colors(i) = RGB(0, 255, 255): i = i + 1
colors(i) = RGB(255, 0, 255): i = i + 1
' Get the first point.
t = 0
r = 5 * (1 + Sin(11 * t / 5)) - 4 * Sin(17 * t / 3) ^ 4 * Sin(2 *
Cos(3 * t) - 28 * t) ^ 8
x = r * Cos(t)
y = r * Sin(t)
' I switch these for vertical symmetry.
Me.CurrentX = y
Me.CurrentY = -x
Me.DrawWidth = 2
For i = 1 To NUM_LINES - 1
t = i * 21# * PI / NUM_LINES
r = 5 * (1 + Sin(11 * t / 5)) - 4 * Sin(17 * t / 3) ^ 4 * Sin(2
* Cos(3 * t) - 28 * t) ^ 8
x = r * Cos(t)
y = r * Sin(t)
'Line -(y, -x),vbblue
Line -(y, -x), colors((i * 21 / NUM_LINES) Mod NUM_COLORS)
Next i
End Sub
For more information on graphics programming in Visual Basic 6, see my
book "Ready-to-Run Visual Basic Graphics Programming"
(http://www.vb-helper.com/vbgp.htm).
==========
++++++++++
<Both>
++++++++++
==========
5. New Links
http://www.vb-helper.com/links.html
Vlasishost.com | Programming Basic
http://www.vlasishost.com/news/programming-basic.html
Mostly information about HTML and php, but also a decent collection of
Visual Basic links.
==========
6. 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/>.
- The August issue of MSDN Magazine
<http://msdn.microsoft.com/msdnmag>. Related: Sept issue preview article
on personalizing a portal with user controls and custom Web parts
<http://msdn.microsoft.com/msdnmag/issues/05/09/WebParts/default.aspx>.
- Interview with FreeBSD guru (and PhD) Colin Percival on the
security risks of hyperthreading
<http://www.onlamp.com/pub/a/bsd/2005/07/21/Big_Scary_Daemons.html>.
- Joe Farrell's article on deriving projection matrices
<http://www.codeguru.com/Cpp/misc/misc/math/print.php/c10123/>.
- Raymond Lewallen's thoughtful July 18 post on refactoring
<http://codebetter.com/blogs/raymond.lewallen/archive/2005/07.aspx>.
- Stephen Swoyer's editorial suggesting that Microsoft's
Virtualization Moves Still Lag
<http://www.esj.com/news/article.aspx?EditorialsID=1450>. Excerpt: Two
years on, Microsoft's flagship offering still can't hold a candle to
VMWare."
- MSDN TV episode on writing secure code with VS 2005
<http://www.microsoft.com/downloads/details.aspx?FamilyID=BED43DD9-A02B-4
6AD-93BE-84B5B1A8DC27&displaylang=en>.
Selected KB articles
- 811401 How to print the content of a RichTextBox with Microsoft
VB.NET.
<http://support.microsoft.com/default.aspx?scid=kb%3ben-us%3b811401>
- 314201 How to send e-mail programmatically with System.Web.Mail
and VB.NET.
<http://support.microsoft.com/default.aspx?scid=kb%3ben-us%3b314201>
- 897298 You receive an "unhandled exception of type
'System.Runtime.InteropServices.SEHException'" error message when you
call the Application.EnableVisualStyles method in VB.NET 2003 and in VB
2002.
<http://support.microsoft.com/default.aspx?scid=kb%3ben-us%3b897298>
- 899580 The Full Text resource fails when you install a new
clustered instance after you apply SQL Server 2000 SP4 to an existing
clustered instance.
<http://support.microsoft.com/default.aspx?scid=kb%3ben-us%3b899580>
- 306590 INFO: ASP.NET Security Overview.
<http://support.microsoft.com/default.aspx?scid=kb%3ben-us%3b306590>
- 326340 How to authenticate against the Active Directory by using
forms authentication and VB.NET.
<http://support.microsoft.com/default.aspx?scid=kb%3ben-us%3b326340>
- 815155 HOW TO: Configure URLScan to Protect ASP.NET Web apps.
<http://support.microsoft.com/default.aspx?scid=kb%3ben-us%3b815155>
- 307901 INFO: Permissions to Connect to a Remote Access Database
from ASP.NET.
<http://support.microsoft.com/default.aspx?scid=kb%3ben-us%3b307901>
- 818014 HOW TO: Secure Applications That Are Built on the .NET
Framework.
<http://support.microsoft.com/default.aspx?scid=kb%3ben-us%3b818014>
- 891984 Implications of removing the xp_cmdshell stored procedure
from SQL Server 2000.
<http://support.microsoft.com/default.aspx?scid=kb%3ben-us%3b891984>
Downloadable
- Niels Berglund's SQLClr Project project type for VS2005
op.com/nielsb/PermaLink.aspx?guid=edefd0db-88ef-42cb-8935-ce8744388203>.
Related: his blog <http://sqljunkies.com/weblog/nielsb/>.
- Lutz Roeder's Reflector class browser
<http://www.aisto.com/roeder/dotnet>. Related: wincv - Windows forms
class viewer (located in "C:\Program Files\Microsoft Visual Studio .NET
2003\SDK\v1.1\Bin").
- 30-day full eval version of a startup's Web Vulnerability Scanner
<http://www.acunetix.com/websitesecurity/web-site-security.htm>.
- SQL Server 2005 JDBC Driver Beta 1
<http://www.microsoft.com/sql/downloads/2005/jdbc.mspx> (it's a Type 4
driver.)
- Samples for Microsoft's "Developing a License Provider Service for
Windows" (DRM - digital rights management)
<http://www.microsoft.com/downloads/details.aspx?FamilyID=5DD88A88-F587-4
0C1-93F5-F81BAB36455E&displaylang=en>.
Browsable
- Microsoft Acrylic (beta) site
<http://www.microsoft.com/products/_expression_/>. (Based on Creature
House _expression_ 3).
- Sample hacks from Mapping Hacks
<http://www.oreilly.com/catalog/mappinghks/>.
- O'Reilly's CodeZoo <http://www.codezoo.net>.
- Jon Udell's Google Maps walking tour of Keene NH
<http://weblog.infoworld.com/udell/2005/02/25.html>. Related:
GoogleEarth.
- Do It Yourself Network <http://www.diynetwork.com/>. Companion
site for TV channel.
- Federalist Society <http://www.fed-soc.org/>. The Federalist
Society for Law and Public Policy Studies is a group of conservatives
and libertarians interested in the current state of the legal order.
- Ensuring Compatibility for Obfuscated Assemblies
<http://www.preemptive.com/support/dotfuscator/convert.html>.
- 90-page Web Services Security Policy spec
<http://specs.xmlsoap.org/ws/2005/07/securitypolicy/ws-securitypolicy.pdf
>.
- 2005 IBM Fellows
<http://press.arrivenet.com/tec/article.php/643379.html>. (Since 1963,
185 IBM Fellows have been appointed. Of these, 54 are active employees.
The IBM Technical Community numbers about 195,000 people, including 339
Distinguished Engineers)
Travelable
- 25th Steinbeck Festival <http://www.steinbeck.org/MainFrame.html>
Aug 4-7 in Salinas, CA.
- BASTA! <http://www.basta.net/2005/>> (I think of it as Germany's
equivalent of VSLive!) Sept 19-22 in Mainz.
Heads Up
- Free 90-day eLearning classes on SQL Server 2005
<https://www.microsoftelearning.com/sqlserver2005/>.
Jargon Alert
- GRIN (genetics, robotics, information, nano), technologies that
are impacting us biologically. See Washington Post reporter Joel
Garreau's 7/17/05 LA Times article, You're not good enough
<http://www.latimes.com/news/printedition/opinion/la-op-garreau17jul17,1,
5297286.story>.
- Microformats
ledge.wharton.upenn.edu/index.cfm?fa=viewArticle&id=1247&specialId=38>>.
Extensions to HTML/XHTML tags.
- PHEV
gazine/la-tm-500mpg29jul17,1,7773745.story?coll=la-headlines-magazine>>.
Plug-in hybrid electric vehicle.
- Bash script. A file containing a list of commands to be executed
by the bash shell. See L.M . MacEwan's class notes
<http://floppix.ccai.com/scripts1.html> and Mendel Cooper's Advanced
Bash-Scripting Guide <http://www.tldp.org/LDP/abs/html/> for more.
Download the Bash shell here
<http://www.gnu.org/software/bash/bash.html>>.
- Vista <http://www.microsoft.com/windowsvista/default.mspx>>. New
name for Longhorn. Vista ("bringing clarity to your world") presumably
sends an, ahem, clearer message than Longhorn (methane-emitting cattle).
- WAKA <http://www.worldkickball.com/>> - World Adult Kickball
Association.
- PEAS <http://www.charture.org/>> - America's Places of Ecological
and Aesthetic Significance according to the Charture Institute.
- WFO
<http://blog.tmcnet.com/the-birth-of-workforce-optimization.asp>> -
workforce optimization.
- MoonROx
//www.nasa.gov/home/hqnews/2005/may/HQ_05128_Centennial_Challenge.html>>
- Moon Regolith Oxygen. New NASA-sponsored Centennial Challenge ends
6/1/08.
- PLA <http://www.privatelabelmag.com/>> - private label
manufacturers.
Thought Question of the Week
- Should individual pharmacists and/or pharmacies be allowed to
refuse to fill valid prescriptions for medications they don't approve of
such as the "morning after" pill - or, presumably, lifestyle drugs like
Viagra?
Misc
- John Balzar's article, A<
tm-constitution30jul24,1,3465716.story?coll=la-headlines-magazine">Words
on Paper about different nations' constitutions.
- Washington Post evaluation of Microsoft Student 2006
hingtonpost.com/wp-dyn/content/article/2005/07/23/AR2005072300053.html>.
(Installation requires Office XP or 2003). Related: Microsoft Student
2006 home page
<http://www.microsoft.com/student/ProductDetails.aspx?pid=001>.
- Crime mapping in the UK
<http://www.jdi.ucl.ac.uk/crime_mapping/crime_mapping_guide/index.php>.
- Big Brother is watching many of us. Use of surveillance cameras is
on the rise, and satellites can probably report how many roses are
blooming in your yard. But I'd forgotten all about the "black boxes"
that ship with new vehicles these days. Read Salley Shannon's LA Times
Magazine article on them
gazine/la-tm-blackbox29jul17,1,5672131.story?coll=la-headlines-magazine>
and find out which vehicles include them
<http://vetronix.com/diagnostics/cdr/vehicle_list.html>.
- Journalism.org's annual State of the News Media
<http://www.stateofthenewsmedia.org/2005/index.asp> for 2005 makes
excellent reading.
- Virtual Field Herbarium <http://herbarium.literal.si/>.
- Craig Larman, Philippe Kruchten, and Kurt Bittner's 14-page paper
on common pitfalls to avoid in the RUP
rg/articles/articles/How_to_Fail_with_the_RUP_-_Kruchten_and_Larman.pdf>
(Rational Unified Process).
- Sudoku puzzles <http://www.sudoku.org.uk/> now stand shoulder to
shoulder with crossword puzzles in the LA Times. Even "adult only"
sudoku puzzle books are reportedly in the pipeline. Hard to imagine
they'll provide much competition to the X-rated (okay, I exaggerate,
adults only 18+) Grand Theft Auto: San Andreas.
- Compliance & Learning <http://www.learning2005.com/university/>.
12-minute audio stream or PodCast by Elliott Masie.
- Reactions to Wade Rousch's excellent August 2005 feature in
Technology Review on Social Machines
<http://wade.trblogs.com/archives/2005/07/social_machines_2.html>. The
original
ttp://www.technologyreview.com/articles/05/08/issue/feature_social.asp>.
Related: Brain Alvey and Jason Calacanis' (commercial venture) Weblogs
Inc. blog <http://socialsoftware.weblogsinc.com/> on social software.
- Good books: John Stilgoe's "Outside Lies Magic: Regaining History
and Awareness in Everyday Places
<<http://www.people.fas.harvard.edu/~stilgoe/01frame_greetings.html>.
- Statistics I've noted with interest recently. 1) According to
revised statistical methodology promoted by NCES <http://nces.ed.gov>>
(and presumably promoters of No Child Left Behind), California's high
school graduation rate is an impressive 89 percent
www.dailybulletin.com/Stories/0,1413,203%257E21481%257E2966026,00.html>.
2) Germany and Spain are the top two wind-power nations
p://www.technologyreview.com/articles/05/08/issue/forward_wind.asp?p=1>,
3) The number of pornographic websites
<http://www.technologyreview.com/articles/05/08/issue/datamine.asp?p=1>
(about two million) has increased 30-fold in the last seven years with
about 400 million pages online.
- Japan's Juki Net
<http://www.ebusinessforum.com/index.asp?layout=rich_story&doc_id=5903>
raises privacy concerns.
- Economist article on the future of US weapons labs
<http://www.economist.com/science/displayStory.cfm?story_id=4149455>.
- Higgs field and Higgs physics
<http://www.sciam.com/article.cfm?chanID=sa006&colID=1&articleID=000005FC
-2927-12B3-A92783414B7F0000>.
==========
Archives:
http://www.topica.com/lists/VBHelper
http://www.topica.com/lists/VB6Helper
http://www.topica.com/lists/VBNetHelper
Untuk keluar dari millis ini, kirim email kosong ke:
[EMAIL PROTECTED]
YAHOO! GROUPS LINKS
- Visit your group "Programmer-VB" on the web.
- To unsubscribe from this group, send an email to:
[EMAIL PROTECTED]
- Your use of Yahoo! Groups is subject to the Yahoo! Terms of Service.
