https://www.betaarchive.com/wiki/index.php?title=Microsoft_KB_Archive/100493&feed=atom&action=history
Microsoft KB Archive/100493 - Revision history
2024-03-29T14:05:05Z
Revision history for this page on the wiki
MediaWiki 1.39.3
https://www.betaarchive.com/wiki/index.php?title=Microsoft_KB_Archive/100493&diff=349096&oldid=prev
X010: Text replacement - "&" to "&"
2020-07-21T11:24:46Z
<p>Text replacement - "&" to "&"</p>
<table style="background-color: #fff; color: #202122;" data-mw="interface">
<col class="diff-marker" />
<col class="diff-content" />
<col class="diff-marker" />
<col class="diff-content" />
<tr class="diff-title" lang="en-GB">
<td colspan="2" style="background-color: #fff; color: #202122; text-align: center;">← Older revision</td>
<td colspan="2" style="background-color: #fff; color: #202122; text-align: center;">Revision as of 11:24, 21 July 2020</td>
</tr><tr><td colspan="2" class="diff-lineno" id="mw-diff-left-l179">Line 179:</td>
<td colspan="2" class="diff-lineno">Line 179:</td></tr>
<tr><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div>now assume that all SQL statements take the form of Access SQL (see the</div></td><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div>now assume that all SQL statements take the form of Access SQL (see the</div></td></tr>
<tr><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div>Access documentation). You can passthrough SQL to ODBC; as a second</div></td><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div>Access documentation). You can passthrough SQL to ODBC; as a second</div></td></tr>
<tr><td class="diff-marker" data-marker="−"></td><td style="color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #ffe49c; vertical-align: top; white-space: pre-wrap;"><div>parameter to the CreateDynaset method, you must specify &<del style="font-weight: bold; text-decoration: none;">amp;</del>H40 to indicate</div></td><td class="diff-marker" data-marker="+"></td><td style="color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #a3d3ff; vertical-align: top; white-space: pre-wrap;"><div>parameter to the CreateDynaset method, you must specify &H40 to indicate</div></td></tr>
<tr><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div>SQL passthrough. Note that if you used backend-specific SQL with</div></td><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div>SQL passthrough. Note that if you used backend-specific SQL with</div></td></tr>
<tr><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div>CreateDynaset, you must add this parameter.</div></td><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div>CreateDynaset, you must add this parameter.</div></td></tr>
<tr><td colspan="2" class="diff-lineno" id="mw-diff-left-l421">Line 421:</td>
<td colspan="2" class="diff-lineno">Line 421:</td></tr>
<tr><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><br/></td><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><br/></td></tr>
<tr><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div> The constant values shown are in hexidecimal and should be</div></td><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div> The constant values shown are in hexidecimal and should be</div></td></tr>
<tr><td class="diff-marker" data-marker="−"></td><td style="color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #ffe49c; vertical-align: top; white-space: pre-wrap;"><div> preceded with the &<del style="font-weight: bold; text-decoration: none;">amp;</del>H notation. For example,</div></td><td class="diff-marker" data-marker="+"></td><td style="color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #a3d3ff; vertical-align: top; white-space: pre-wrap;"><div> preceded with the &H notation. For example,</div></td></tr>
<tr><td class="diff-marker" data-marker="−"></td><td style="color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #ffe49c; vertical-align: top; white-space: pre-wrap;"><div> DB_SQLPASSTHROUGH = &<del style="font-weight: bold; text-decoration: none;">amp;</del>H40, not decimal 40. See online Help</div></td><td class="diff-marker" data-marker="+"></td><td style="color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #a3d3ff; vertical-align: top; white-space: pre-wrap;"><div> DB_SQLPASSTHROUGH = &H40, not decimal 40. See online Help</div></td></tr>
<tr><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div> (Options Property) or the file DATACONS.TXT for the correct</div></td><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div> (Options Property) or the file DATACONS.TXT for the correct</div></td></tr>
<tr><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div> values.</div></td><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div> values.</div></td></tr>
<tr><td colspan="2" class="diff-lineno" id="mw-diff-left-l609">Line 609:</td>
<td colspan="2" class="diff-lineno">Line 609:</td></tr>
<tr><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div>Dim Attr, FName, Msg ' Declare variables.</div></td><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div>Dim Attr, FName, Msg ' Declare variables.</div></td></tr>
<tr><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div>If Right(Dir1.Path, 1) = "\" Then ' See if root file.</div></td><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div>If Right(Dir1.Path, 1) = "\" Then ' See if root file.</div></td></tr>
<tr><td class="diff-marker" data-marker="−"></td><td style="color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #ffe49c; vertical-align: top; white-space: pre-wrap;"><div> FName = Dir1.Path &<del style="font-weight: bold; text-decoration: none;">amp; </del>File1.FileName ' Get file path.</div></td><td class="diff-marker" data-marker="+"></td><td style="color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #a3d3ff; vertical-align: top; white-space: pre-wrap;"><div> FName = Dir1.Path & File1.FileName ' Get file path.</div></td></tr>
<tr><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div>Else</div></td><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div>Else</div></td></tr>
<tr><td class="diff-marker" data-marker="−"></td><td style="color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #ffe49c; vertical-align: top; white-space: pre-wrap;"><div> FName = Dir1.Path &<del style="font-weight: bold; text-decoration: none;">amp; </del>"\" &<del style="font-weight: bold; text-decoration: none;">amp; </del>File1.FileName ' Get file path.</div></td><td class="diff-marker" data-marker="+"></td><td style="color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #a3d3ff; vertical-align: top; white-space: pre-wrap;"><div> FName = Dir1.Path & "\" & File1.FileName ' Get file path.</div></td></tr>
<tr><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div>End If</div></td><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div>End If</div></td></tr>
<tr><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div>Attr = GetAttr(FName) ' Get attributes.</div></td><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div>Attr = GetAttr(FName) ' Get attributes.</div></td></tr>
<tr><td colspan="2" class="diff-lineno" id="mw-diff-left-l626">Line 626:</td>
<td colspan="2" class="diff-lineno">Line 626:</td></tr>
<tr><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div> - + Msg = " Hidden, and System"</div></td><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div> - + Msg = " Hidden, and System"</div></td></tr>
<tr><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div>End Select</div></td><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div>End Select</div></td></tr>
<tr><td class="diff-marker" data-marker="−"></td><td style="color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #ffe49c; vertical-align: top; white-space: pre-wrap;"><div>MsgBox UCase(FName) &<del style="font-weight: bold; text-decoration: none;">amp; </del>" is a " &<del style="font-weight: bold; text-decoration: none;">amp; </del>Msg &<del style="font-weight: bold; text-decoration: none;">amp; </del>" file." ' Display message.</div></td><td class="diff-marker" data-marker="+"></td><td style="color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #a3d3ff; vertical-align: top; white-space: pre-wrap;"><div>MsgBox UCase(FName) & " is a " & Msg & " file." ' Display message.</div></td></tr>
<tr><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div>End Sub</div></td><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div>End Sub</div></td></tr>
<tr><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><br/></td><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><br/></td></tr>
</table>
X010
https://www.betaarchive.com/wiki/index.php?title=Microsoft_KB_Archive/100493&diff=263465&oldid=prev
X010: Text replacement - ">" to ">"
2020-07-20T09:04:05Z
<p>Text replacement - ">" to ">"</p>
<table style="background-color: #fff; color: #202122;" data-mw="interface">
<col class="diff-marker" />
<col class="diff-content" />
<col class="diff-marker" />
<col class="diff-content" />
<tr class="diff-title" lang="en-GB">
<td colspan="2" style="background-color: #fff; color: #202122; text-align: center;">← Older revision</td>
<td colspan="2" style="background-color: #fff; color: #202122; text-align: center;">Revision as of 09:04, 20 July 2020</td>
</tr><tr><td colspan="2" class="diff-lineno" id="mw-diff-left-l381">Line 381:</td>
<td colspan="2" class="diff-lineno">Line 381:</td></tr>
<tr><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div>Possible causes:</div></td><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div>Possible causes:</div></td></tr>
<tr><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><br/></td><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><br/></td></tr>
<tr><td class="diff-marker" data-marker="−"></td><td style="color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #ffe49c; vertical-align: top; white-space: pre-wrap;"><div>1. An entry in the [Installable ISAM] section in VB.INI or <APPNAME<del style="font-weight: bold; text-decoration: none;">&gt;</del>.INI is</div></td><td class="diff-marker" data-marker="+"></td><td style="color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #a3d3ff; vertical-align: top; white-space: pre-wrap;"><div>1. An entry in the [Installable ISAM] section in VB.INI or <APPNAME<ins style="font-weight: bold; text-decoration: none;">></ins>.INI is</div></td></tr>
<tr><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div> incorrect. For example, this error occurs if you're accessing a Paradox</div></td><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div> incorrect. For example, this error occurs if you're accessing a Paradox</div></td></tr>
<tr><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div> external table, and the Paradox entry of the .INI file points to a</div></td><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div> external table, and the Paradox entry of the .INI file points to a</div></td></tr>
<tr><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div> nonexistent directory. Exit Visual Basic, make necessary corrections in</div></td><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div> nonexistent directory. Exit Visual Basic, make necessary corrections in</div></td></tr>
<tr><td class="diff-marker" data-marker="−"></td><td style="color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #ffe49c; vertical-align: top; white-space: pre-wrap;"><div> VB.INI or <APPNAME<del style="font-weight: bold; text-decoration: none;">&gt;</del>.INI using Microsoft Windows Notepad or another text</div></td><td class="diff-marker" data-marker="+"></td><td style="color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #a3d3ff; vertical-align: top; white-space: pre-wrap;"><div> VB.INI or <APPNAME<ins style="font-weight: bold; text-decoration: none;">></ins>.INI using Microsoft Windows Notepad or another text</div></td></tr>
<tr><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div> editor, restart Visual Basic, and try the operation again.</div></td><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div> editor, restart Visual Basic, and try the operation again.</div></td></tr>
<tr><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><br/></td><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><br/></td></tr>
<tr><td colspan="2" class="diff-lineno" id="mw-diff-left-l614">Line 614:</td>
<td colspan="2" class="diff-lineno">Line 614:</td></tr>
<tr><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div>End If</div></td><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div>End If</div></td></tr>
<tr><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div>Attr = GetAttr(FName) ' Get attributes.</div></td><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div>Attr = GetAttr(FName) ' Get attributes.</div></td></tr>
<tr><td class="diff-marker" data-marker="−"></td><td style="color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #ffe49c; vertical-align: top; white-space: pre-wrap;"><div>If Attr <del style="font-weight: bold; text-decoration: none;">&gt; </del>7 Then Attr = Attr Xor ATTR_ARCHIVE ' Disregard Archive.</div></td><td class="diff-marker" data-marker="+"></td><td style="color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #a3d3ff; vertical-align: top; white-space: pre-wrap;"><div>If Attr <ins style="font-weight: bold; text-decoration: none;">> </ins>7 Then Attr = Attr Xor ATTR_ARCHIVE ' Disregard Archive.</div></td></tr>
<tr><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div>Select Case Attr ' Look up attributes.</div></td><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div>Select Case Attr ' Look up attributes.</div></td></tr>
<tr><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div> Case 0: Msg = "Normal"</div></td><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div> Case 0: Msg = "Normal"</div></td></tr>
</table>
X010
https://www.betaarchive.com/wiki/index.php?title=Microsoft_KB_Archive/100493&diff=263420&oldid=prev
X010: Text replacement - "<" to "<"
2020-07-20T09:03:00Z
<p>Text replacement - "<" to "<"</p>
<table style="background-color: #fff; color: #202122;" data-mw="interface">
<col class="diff-marker" />
<col class="diff-content" />
<col class="diff-marker" />
<col class="diff-content" />
<tr class="diff-title" lang="en-GB">
<td colspan="2" style="background-color: #fff; color: #202122; text-align: center;">← Older revision</td>
<td colspan="2" style="background-color: #fff; color: #202122; text-align: center;">Revision as of 09:03, 20 July 2020</td>
</tr><tr><td colspan="2" class="diff-lineno" id="mw-diff-left-l381">Line 381:</td>
<td colspan="2" class="diff-lineno">Line 381:</td></tr>
<tr><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div>Possible causes:</div></td><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div>Possible causes:</div></td></tr>
<tr><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><br/></td><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><br/></td></tr>
<tr><td class="diff-marker" data-marker="−"></td><td style="color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #ffe49c; vertical-align: top; white-space: pre-wrap;"><div>1. An entry in the [Installable ISAM] section in VB.INI or <del style="font-weight: bold; text-decoration: none;">&lt;</del>APPNAME&gt;.INI is</div></td><td class="diff-marker" data-marker="+"></td><td style="color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #a3d3ff; vertical-align: top; white-space: pre-wrap;"><div>1. An entry in the [Installable ISAM] section in VB.INI or <ins style="font-weight: bold; text-decoration: none;"><</ins>APPNAME&gt;.INI is</div></td></tr>
<tr><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div> incorrect. For example, this error occurs if you're accessing a Paradox</div></td><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div> incorrect. For example, this error occurs if you're accessing a Paradox</div></td></tr>
<tr><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div> external table, and the Paradox entry of the .INI file points to a</div></td><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div> external table, and the Paradox entry of the .INI file points to a</div></td></tr>
<tr><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div> nonexistent directory. Exit Visual Basic, make necessary corrections in</div></td><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div> nonexistent directory. Exit Visual Basic, make necessary corrections in</div></td></tr>
<tr><td class="diff-marker" data-marker="−"></td><td style="color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #ffe49c; vertical-align: top; white-space: pre-wrap;"><div> VB.INI or <del style="font-weight: bold; text-decoration: none;">&lt;</del>APPNAME&gt;.INI using Microsoft Windows Notepad or another text</div></td><td class="diff-marker" data-marker="+"></td><td style="color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #a3d3ff; vertical-align: top; white-space: pre-wrap;"><div> VB.INI or <ins style="font-weight: bold; text-decoration: none;"><</ins>APPNAME&gt;.INI using Microsoft Windows Notepad or another text</div></td></tr>
<tr><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div> editor, restart Visual Basic, and try the operation again.</div></td><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div> editor, restart Visual Basic, and try the operation again.</div></td></tr>
<tr><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><br/></td><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><br/></td></tr>
</table>
X010
https://www.betaarchive.com/wiki/index.php?title=Microsoft_KB_Archive/100493&diff=253225&oldid=prev
X010: Text replacement - """ to """
2020-07-19T12:36:21Z
<p>Text replacement - """ to """</p>
<a href="https://www.betaarchive.com/wiki/index.php?title=Microsoft_KB_Archive/100493&diff=253225&oldid=46012">Show changes</a>
X010
https://www.betaarchive.com/wiki/index.php?title=Microsoft_KB_Archive/100493&diff=46012&oldid=prev
3155ffGd: importing KB archive
2020-07-18T15:01:56Z
<p>importing KB archive</p>
<p><b>New page</b></p><div><div id="nsbanner"><br />
<br />
<div id="bannerrow1"><br />
<br />
{|<br />
| Knowledge Base<br />
|<br />
|}<br />
<br />
<br />
</div><br />
<div id="TitleRow"><br />
<br />
= <span id="KB100493"></span>README.TXT for Professional Edition of VB 3.0 for Windows =<br />
<br />
<br />
</div><br />
<br />
</div><br />
<div id="nstext" valign="BOTTOM"><br />
<br />
Article ID: 100493<br />
<br />
Article Last Modified on 2/11/2005<br />
<br />
<br />
-----<br />
<br />
APPLIES TO<br /><br />
<br /><br />
<br />
* Microsoft Visual Basic 3.0 Professional Edition<br />
<br />
<br />
-----<br />
<br />
<div class="notice_section"><br />
<br />
This article was previously published under Q100493<br />
<br />
</div><br />
<div class="summary_section"><br />
<br />
== SUMMARY ==<br />
<br />
The following article contains the complete contents of the README.TXT file distributed with the Professional Edition of Microsoft Visual Basic version 3.0 for Windows.<br />
<br />
</div><br />
<div class="moreinformation_section"><br />
<br />
== MORE INFORMATION ==<br />
<br />
<pre class="fixed_text">README.TXT<br />
<br />
Release Notes for Microsoft (R) Visual Basic (R) Professional Edition<br />
Version 3.00. (C) Copyright Microsoft Corporation, 1993<br />
<br />
This document contains release notes for Microsoft Visual Basic<br />
Professional Edition version 3.0 for Windows. Information in this document<br />
is more current than that in the manuals or online Help.<br />
<br />
------------------------<br />
How to Use This Document<br />
------------------------<br />
<br />
To view README.TXT on screen in Windows Notepad, maximize the Notepad<br />
window.<br />
<br />
To print README.TXT, open it in Windows Write, Microsoft Word, or another<br />
word processor. Then select the entire document and format the text in<br />
10-point Courier before printing.<br />
<br />
*******************************************************************<br />
Read Part 1 - Software Installation Information - before installing.<br />
*******************************************************************<br />
<br />
========<br />
Contents<br />
========<br />
<br />
Part Description<br />
----------------------------------------------------------<br />
1 Software Installation Information<br />
2 Notes and Tips<br />
3 Notes for &quot;Learning Microsoft Visual Basic&quot; Tutorial<br />
4 Notes for Microsoft Visual Basic Online Help<br />
5 Notes for Microsoft Visual Basic &quot;Programmer's Guide&quot;<br />
6 Notes for Microsoft Visual Basic &quot;Language Reference&quot;<br />
7 Notes for Microsoft Visual Basic &quot;Custom Control Reference&quot;<br />
8 Notes for Microsoft Visual Basic &quot;Data Access Guide&quot;<br />
<br />
=========================================<br />
Part 1: Software Installation Information<br />
=========================================<br />
<br />
To install Visual Basic, use the Program Manager or File Manager to start<br />
SETUP.EXE as you would any other Windows-based application. For example,<br />
if you are installing from drive A:<br />
<br />
- From the Program Manager File menu, choose Run.<br />
- In the Run dialog box, type A:SETUP and choose OK.<br />
<br />
-or-<br />
<br />
- From the File Manager, double-click the SETUP.EXE file icon<br />
on drive A.<br />
<br />
------------------------------------<br />
File Sharing for OLE and Data Access<br />
------------------------------------<br />
<br />
You will need SHARE.EXE to enforce file and byte range locking if the<br />
following programs are running simultaneously:<br />
<br />
- Two Visual Basic applications that perform data access<br />
- Two instances of one Visual Basic application that performs data access<br />
- Microsoft Access and a Visual Basic application that performs data<br />
access<br />
<br />
If you are running Microsoft Windows 3.0 or Windows 3.1 (i.e. not<br />
Windows for Workgroups), you will need to change your AUTOEXEC.BAT<br />
as follows:<br />
<br />
SHARE /L:500 /F:5100<br />
<br />
If the /L or the /F setting to SHARE has a larger value than listed here,<br />
leave the setting as it is rather than reducing it.<br />
<br />
Please make this change as soon as possible in your system.<br />
<br />
NOTE: If you ship .EXE files to users that use OLE or data access, they<br />
must add this setting to their AUTOEXEC.BAT file as well.<br />
<br />
-----------------------<br />
Visual C++ and GRID.VBX<br />
-----------------------<br />
<br />
If you plan to install Microsoft Visual C++(TM) Development System for<br />
Windows on your system, you may overwrite the grid control in your Windows<br />
\SYSTEM directory. Before installing Visual C++, make a backup of GRID.VBX.<br />
If you have already installed Visual C++, you can re-install GRID.VBX by<br />
running Setup again, choosing the Custom Installation button, and then<br />
selecting the Microsoft Visual Basic option.<br />
<br />
-----------------------------------------------------<br />
Using Visual Basic 3.0 with SQL Server and Access 1.0<br />
-----------------------------------------------------<br />
<br />
If you choose to install the SQL Server ODBC driver, you will find the file<br />
INSTCAT.SQL in the \VB\ODBC directory. This is a stored procedure file that<br />
the SQL Server administrator must run on the server to prepare the server<br />
to accept Visual Basic as a client. However, this version of INSTCAT.SQL is<br />
incompatible with Microsoft Access 1.0. If you are also using Access 1.0<br />
as a client for that SQL Server, you should use the INSTCAT.SQL that was<br />
included with Access 1.0. Visual Basic 3.0 will work correctly with<br />
INSTCAT.SQL from Access 1.0 except that it will be unable to delete indexes<br />
from tables.<br />
<br />
----------------------<br />
Setup and LZEXPAND.DLL<br />
----------------------<br />
<br />
Visual Basic's Setup program uses LZEXPAND to install ODBC. If you<br />
encounter a system error while Visual Basic is calculating free disk space,<br />
check for this file in your Windows \SYSTEM directory. If an older version<br />
of LZEXPAND.DLL exists along your path, remove the file and continue with<br />
Setup.<br />
<br />
======================<br />
Part 2: Notes and Tips<br />
======================<br />
<br />
----------------------------------------------------<br />
Data Access Compatibility - Visual Basic 2.0 and 3.0<br />
----------------------------------------------------<br />
<br />
The new functionality of the Microsoft Access engine in Visual Basic 3.0<br />
will affect the behavior of your VB 2.0 code. Visual Basic 3.0 will<br />
now assume that all SQL statements take the form of Access SQL (see the<br />
Access documentation). You can passthrough SQL to ODBC; as a second<br />
parameter to the CreateDynaset method, you must specify &amp;H40 to indicate<br />
SQL passthrough. Note that if you used backend-specific SQL with<br />
CreateDynaset, you must add this parameter.<br />
<br />
----------<br />
ATI Driver<br />
----------<br />
<br />
If you have an ATI Wonder card, moving the data control around at design<br />
time may cause a GP fault. Contact ATI for more information.<br />
<br />
------------------------------------------------------<br />
BackColor Displayed Incorrectly with 256-Color Bitmaps<br />
------------------------------------------------------<br />
<br />
If you have a 256-color bitmap in any control (or the form) that has a<br />
BackColor property, it is possible that the background color of that object<br />
will not display correctly if no color in the bitmap's palette matches the<br />
background color.<br />
<br />
----------------------------------<br />
&quot;Communication Link Failure&quot; Error<br />
----------------------------------<br />
<br />
If you receive a &quot;Communication Link Failure&quot; error when executing queries<br />
against a Microsoft or Sybase SQL Server, you can retry the operation with<br />
asynchronous execution disabled. To do this, add the following entry to<br />
your VB.INI file:<br />
<br />
[Debug]<br />
RmtTrace=16<br />
<br />
Visual Basic will continue to run synchronously until this line is removed<br />
from VB.INI.<br />
<br />
---------------<br />
OLE Class Names<br />
---------------<br />
<br />
To get a reference to a currently running OLE application by using its<br />
class name, you must use:<br />
<br />
GetObject(, &quot;classname&quot;)<br />
<br />
that is, GetObject has to have an empty file name. A file name of &quot;&quot; will<br />
create a new instance of the server for class name. This is contradictory<br />
to what is documented.<br />
<br />
--------------------------------<br />
OLE Control: In-Place Activation<br />
--------------------------------<br />
<br />
The Visual Basic OLE 2.0 control supports &quot;Inside-Out Activation,&quot; which<br />
corresponds to &quot;activation on GetFocus.&quot; If a server designates this<br />
capability and you specify AutoActivate = GETFOCUS, then:<br />
<br />
- The object is initially deactivated the first time the control gets the<br />
focus.<br />
- The object is not fully deactivated when the control loses focus.<br />
Instead, the object is directed to tear down any floating user interface<br />
it may have, such as tool pallettes.<br />
<br />
Note that AutoActivate = GETFOCUS is only supported if the server claims to<br />
be &quot;inside-out-capable,&quot; further reducing the possibility of looping<br />
re-activation when a non-insitu server closes and gives focus back to the<br />
control.<br />
<br />
-----------------------------------------------<br />
OLE Control: Pasting Objects from the Clipboard<br />
-----------------------------------------------<br />
<br />
Applications that provide objects behave differently when an object is<br />
deleted. When you delete an OLE object (set Action = 10), the object's<br />
application may or not close. If the application does close, any objects<br />
on the Clipboard associated with that application may also be closed.<br />
Because of this, you may not be able to cut an object (copy, then delete),<br />
since deleting the object may also cause the data on the Clipboard to be<br />
deleted.<br />
<br />
Another instance of this behavior is when you try to copy an object, then<br />
paste the object back onto itself. This action may cause an error, because<br />
in order to paste over an existing object, the existing object is first<br />
deleted. If the application associated with the object closes, and<br />
subsequently deletes any objects it has on the Clipboard, the Clipboard no<br />
longer contains an object to paste.<br />
<br />
---------------------------------<br />
OLE Control: The PasteOK Property<br />
---------------------------------<br />
<br />
The following applies to objects on the Clipboard that come from an OLE<br />
object:<br />
<br />
- When PasteOK returns True, there is no guarantee that the Paste<br />
operation will succeed. For example, PasteOK returns True and the Paste<br />
fails when there is a linked object on the Clipboard and you are pasting<br />
into an object whose OleTypeAllowed property is set to 1 (Embedded).<br />
- PasteOK returns False when there is a linked object on the Clipboard and<br />
you are pasting into an object whose OleTypeAllowed property is set to<br />
0 (Linked).<br />
<br />
------------------------<br />
OLE Control: Link Target<br />
------------------------<br />
<br />
You cannot activate a linked object as hidden (set Verb = -3). You can,<br />
however, activate an embedded object as hidden.<br />
<br />
-----------------------------<br />
OLE Constants in CONSTANT.TXT<br />
-----------------------------<br />
<br />
OLE has also defined two new standard verbs relating to the two states that<br />
an in-place-active object can have. The following corresponding constants<br />
have been added to CONSTANT.TXT:<br />
<br />
Constant Description<br />
----------------------------------------------------------------------<br />
VERB_INPLACEUIACTIVATE Object is fully in-place active, including<br />
floating UI. Only one at a time per top-level<br />
form can be in this state.<br />
<br />
VERB_INPLACEACTIVATE Object is semi-active; it is running and ready to<br />
respond to user input like clicking within the<br />
object or changing the mouse pointer as the user<br />
moves the mouse over different parts of the<br />
object. Any number of objects can be in this<br />
state at a time.<br />
<br />
So, if you have a number of inside-out-capable objects on a form, where the<br />
user has specified AutoActivate = ONGETFOCUS, the objects take turns at<br />
being in-place-UI-Active. The new verbs allow the Visual Basic programmer<br />
to cause these objects to be in the in-place-active state. For example, if<br />
you want to create a form with several of these objects, and you want the<br />
form to be as responsive as possible to user input, you would put the<br />
following code for each control into your Form_Load event handler:<br />
<br />
OLEControl.Verb = VERB_INPLACEACTIVATE<br />
OLEControl.Action = OLE_ACTIVATE<br />
<br />
See the file CONSTANT.TXT for more information.<br />
<br />
------------------------------------<br />
Windows 3.0 and the PopupMenu Method<br />
------------------------------------<br />
<br />
Under Windows 3.0, pop-up menus invoked during a MouseDown event in some<br />
cases do not recognize menu selections made with the mouse. If that occurs,<br />
you can still make a selection using the arrow keys and the Enter key.<br />
<br />
------------------------------------------<br />
Saving ASCII Forms in Source Code Managers<br />
------------------------------------------<br />
<br />
When using source code managers, you need to change the read-only bit on<br />
the binary file (.FRX) as well as the form file (.FRM) to save the form.<br />
<br />
--------------------------------<br />
Crystal Reports for Visual Basic<br />
--------------------------------<br />
<br />
All prices in the Crystal Reports for Visual Basic editor, CRW.EXE, are<br />
listed in US dollars.<br />
<br />
If you are calling Crystal Services from outside the United States for<br />
support or more information, please contact your local international<br />
long distance carrier if you need assistance.<br />
<br />
============================================================<br />
Part 3: Notes for &quot;Learning Microsoft Visual Basic&quot; Tutorial<br />
============================================================<br />
<br />
-----------------------<br />
Save Project Before Run<br />
-----------------------<br />
<br />
The Save Project Before Run Environment Option (under the Options menu)<br />
should be set to &quot;No&quot; when running the &quot;Learning Visual Basic&quot; tutorial.<br />
Some of the lessons may be impaired if this option is set to &quot;Yes.&quot; By<br />
default, this setting is &quot;No.&quot;<br />
<br />
====================================================<br />
Part 4: Notes for Microsoft Visual Basic Online Help<br />
====================================================<br />
<br />
------------------<br />
Error Message Help<br />
------------------<br />
<br />
Online Help is not available for dialogs or error messages that occur at<br />
design time. For ISAM errors, use the Search dialog in Help.<br />
<br />
--------------------------------<br />
&quot;Couldn't find installable ISAM&quot;<br />
--------------------------------<br />
<br />
An external file dynamic link library (DLL) file couldn't be found. This<br />
file is required for operations such as attaching or accessing external<br />
tables.<br />
<br />
Possible causes:<br />
<br />
1. An entry in the [Installable ISAM] section in VB.INI or &lt;APPNAME&gt;.INI is<br />
incorrect. For example, this error occurs if you're accessing a Paradox<br />
external table, and the Paradox entry of the .INI file points to a<br />
nonexistent directory. Exit Visual Basic, make necessary corrections in<br />
VB.INI or &lt;APPNAME&gt;.INI using Microsoft Windows Notepad or another text<br />
editor, restart Visual Basic, and try the operation again.<br />
<br />
2. One of the entries in the [Installable ISAM] section in VB.INI points to<br />
a network drive, and that drive isn't connected. Check to make sure the<br />
network is available and the proper drive letter is established, and try<br />
the operation again.<br />
<br />
=============================================================<br />
Part 5: Notes for Microsoft Visual Basic &quot;Programmer's Guide&quot;<br />
=============================================================<br />
<br />
Page Section/Note<br />
-------------------------------------------------------------<br />
188 The New Keyword<br />
<br />
In the example at the top of the page, the local form<br />
variable F is declared with the New keyword using the<br />
Dim statement. To make the form variable and the<br />
loaded form instance persist, use a Static or Global<br />
variable instead.<br />
<br />
194 Determining the Type of an Object Variable<br />
<br />
You can use the If...TypeOf statement to determine the<br />
control type of a custom control:<br />
<br />
If TypeOf object Is objecttype<br />
<br />
The identifier you use for 'object' is the class name of<br />
the custom control. See the section &quot;Specific Control<br />
Object Types&quot; (p. 186) for more information.<br />
<br />
461 The Options Property<br />
<br />
The constant values shown are in hexidecimal and should be<br />
preceded with the &amp;H notation. For example,<br />
DB_SQLPASSTHROUGH = &amp;H40, not decimal 40. See online Help<br />
(Options Property) or the file DATACONS.TXT for the correct<br />
values.<br />
<br />
462 The RecordSource Property<br />
<br />
The following text and example should be changed:<br />
<br />
For example, the following SQL query returns all of the columns<br />
in the bibliography for authors who live in New York:<br />
<br />
Data1.DatabaseName = &quot;BIBLIO.MDB&quot;<br />
Data1.RecordSource = &quot;Select * from Titles where state = 'NY'&quot;<br />
Data1.Refresh<br />
<br />
The above should read:<br />
<br />
For example, the following SQL query returns all of the columns<br />
in the bibliography for publishers based in New York:<br />
<br />
Data1.DatabaseName = &quot;BIBLIO.MDB&quot;<br />
Data1.RecordSource = &quot;Select * from Publishers where state = 'NY'&quot;<br />
Data1.Refresh<br />
<br />
465 Adding a New Record<br />
<br />
In the second paragraph in this section, the last sentence<br />
should read, &quot;Notice that using the buttons on the data<br />
control or one of the Move methods to move to another record<br />
will automatically save your added record.&quot;<br />
<br />
530 Determining How an Object Is Displayed<br />
<br />
In the first paragraph, the second sentence should read,<br />
&quot;the Icon check box,&quot; not &quot;th eIcon check box.&quot;<br />
<br />
550 Creating Invisible Objects<br />
<br />
In the sample code, the following line has incorrect syntax:<br />
<br />
MyWord = ObjVar.SuggestWord MyWord<br />
<br />
The code should look like this:<br />
<br />
MyWord = ObjVar.SuggestWord (MyWord)<br />
<br />
552 Limitations in Visual Basic<br />
</pre><br />
<pre class="fixed_text"> Under the discussion &quot;Arrays and User-Defined Types,&quot; the third<br />
bulleted item should read: &quot;You cannot...Assign the return value<br />
of a property or method to an array variable or a variable of a<br />
user-defined type.&quot;<br />
<br />
554 Closing an Object<br />
<br />
In the paragraph after the sample code, second sentence: It is<br />
not true that invoking a Close method on an object sets variables<br />
that refer to the object to Nothing.<br />
<br />
582 Determining the Files You Need to Distribute<br />
<br />
The following additional files are required for distributing<br />
your Visual Basic applications:<br />
<br />
DLL Name Required by (Professional Edition Only)<br />
------------------------------------------------------<br />
PDIRJET.DLL Crystal Reports for Visual Basic<br />
PDBJET.DLL Crystal Reports for Visual Basic<br />
MSAJT110.DLL Crystal Reports for Visual Basic<br />
MSAES110.DLL Crystal Reports for Visual Basic<br />
PDSODBC.DLL ODBC and Crystal Reports for Visual Basic<br />
<br />
=============================================================<br />
Part 6: Notes for Microsoft Visual Basic &quot;Language Reference&quot;<br />
=============================================================<br />
<br />
Page Section/Note<br />
-------------------------------------------------------------<br />
21-22 Action Property (OLE)<br />
<br />
In the Settings table, in Setting 5, the reference to None in the<br />
second sentence of the third paragraph should read as follows:<br />
&quot;If the Paste was not successful, the OleType property will be set<br />
to 3 (None).&quot; In Setting 12, the constant should be<br />
OLE_READ_FROM_FILE, not ReadFromFile. In Setting 14, the constant<br />
should be OLE_INSERT_OBJ_DLG.<br />
<br />
41 AutoActivate Property<br />
<br />
In the Note, replace the words &quot;the double-click event&quot; with<br />
&quot;a DblClick event.&quot;<br />
<br />
53 BorderStyle Property<br />
<br />
The OLE control cannot have a setting of 2. Remove the setting and<br />
description for Setting 2 in the OLE control table.<br />
<br />
65 Check Box Control<br />
<br />
Add DataField and DataSource to the Properties list.<br />
<br />
82 Color Property<br />
<br />
The &quot;Applies To&quot; line should read &quot;Common dialog (Color dialog).&quot;<br />
<br />
89 Common Dialog Control<br />
<br />
Add &quot;FilterIndex&quot; and &quot;MaxFileSize&quot; to the Properties (File dialogs)<br />
list.<br />
<br />
93 Connect Property<br />
<br />
In the Note, change &quot;SourceTable&quot; to &quot;SourceTableName.&quot;<br />
<br />
97 Copies Property<br />
<br />
The &quot;Applies To&quot; line should read &quot;Common dialog (Print dialog).&quot;<br />
<br />
100 CreateDatabase Function<br />
<br />
In the code example, replace &quot;False&quot; with &quot;DBVERSION10.&quot; Also, in<br />
the table above the code example, replace &quot;DB_COMPACT_ENCRYPT&quot; with<br />
&quot;DB_ENCRYPT.&quot;<br />
<br />
111 Data Control<br />
<br />
Add UpdateControls and UpdateRecord to the Methods list.<br />
<br />
112 Database Object<br />
<br />
In the Properties list, the QueryTimeout Property should be<br />
identified as being available only in the Professional Edition.<br />
<br />
117 DataText Property<br />
<br />
In the code example, change the two instances of &quot;MSDRAW&quot; to<br />
&quot;MSGRAPH.&quot;<br />
<br />
134 DefaultExt Property<br />
<br />
The &quot;Applies To&quot; line should read &quot;Common dialog (File dialogs).&quot;<br />
<br />
185 Field Object<br />
<br />
The Properties list should refer to SourceField and SourceTable, not<br />
SourceFieldName and SourceTableName.<br />
<br />
195 FileTitle Property<br />
<br />
The &quot;Applies To&quot; line should read &quot;Common dialog (File dialogs).&quot;<br />
Add the following to the Remarks section:<br />
<br />
Note: If the OFN_NOVALIDATE flag is set, the FileTitle property will<br />
not return a value.<br />
<br />
198 Filter Property (Common Dialog)<br />
<br />
At the beginning of the topic, add &quot;Applies To...Common dialog (File<br />
dialogs).&quot; In the Remarks section, after the third paragraph, add<br />
this text:<br />
<br />
Here is an example of a Filter in which the user can choose text<br />
files or picture files that include bitmaps and icons:<br />
<br />
Text(*.txt)|*.txt|Pictures(*.bmp;*.ico)|*.bmp;*.ico<br />
<br />
199 FilterIndex Property<br />
<br />
The &quot;Applies To&quot; line should read &quot;Common dialog (File dialogs).&quot;<br />
<br />
229 Frame Control<br />
<br />
Add the Name Property to the Properties list.<br />
<br />
231 FromPage, ToPage Properties<br />
<br />
The &quot;Applies To&quot; line should read &quot;Common dialog (Print dialog).&quot;<br />
<br />
240 GetAttr Function<br />
<br />
The final Sub...End Sub block in code should read as follows:<br />
<br />
Sub File1_Click ()<br />
Const ATTR_READONLY = 1, ATTR_HIDDEN = 2 ' Declare constants.<br />
Const ATTR_SYSTEM = 4, ATTR_ARCHIVE = 32<br />
Dim Attr, FName, Msg ' Declare variables.<br />
If Right(Dir1.Path, 1) = &quot;\&quot; Then ' See if root file.<br />
FName = Dir1.Path &amp; File1.FileName ' Get file path.<br />
Else<br />
FName = Dir1.Path &amp; &quot;\&quot; &amp; File1.FileName ' Get file path.<br />
End If<br />
Attr = GetAttr(FName) ' Get attributes.<br />
If Attr &gt; 7 Then Attr = Attr Xor ATTR_ARCHIVE ' Disregard Archive.<br />
Select Case Attr ' Look up attributes.<br />
Case 0: Msg = &quot;Normal&quot;<br />
Case ATTR_READONLY: Msg = &quot;Read-Only&quot;<br />
Case ATTR_HIDDEN: Msg = &quot;Hidden&quot;<br />
Case ATTR_HIDDEN + ATTR_READONLY: Msg = &quot;Hidden and Read-Only&quot;<br />
Case ATTR_SYSTEM: Msg = &quot;System&quot;<br />
Case ATTR_READONLY + ATTR_SYSTEM: Msg = &quot;Read-Only and System&quot;<br />
Case ATTR_HIDDEN + ATTR_SYSTEM: Msg = &quot;Hidden and System&quot;<br />
Case ATTR_READONLY + ATTR_HIDDEN + ATTR_SYSTEM: Msg = &quot;Read-Only,&quot;<br />
- + Msg = &quot; Hidden, and System&quot;<br />
End Select<br />
MsgBox UCase(FName) &amp; &quot; is a &quot; &amp; Msg &amp; &quot; file.&quot; ' Display message.<br />
End Sub<br />
<br />
256 hDC Property<br />
<br />
The Usage line should read:<br />
<br />
{[form.] [commondialog. | picturebox.] | Printer.}hDC<br />
<br />
Also, the second paragraph of the Remarks should read, &quot;With a<br />
common dialog control, this property returns a device context for<br />
the printer selected in the Print dialog box when the...&quot; (the rest<br />
of the text remains the same).<br />
<br />
258 Height, Width Properties<br />
<br />
The See Also line should refer to the &quot;Width # Statement,&quot; not the<br />
&quot;Width Statement.&quot;<br />
<br />
274 Image Control<br />
<br />
Add DataField and DataSource to the Properties list.<br />
<br />
280 InitDir Property<br />
<br />
The &quot;Applies To&quot; line should read &quot;Common dialog (File dialogs).&quot;<br />
<br />
297 KeyDown, KeyUp Events<br />
<br />
The See Also should refer to the SendKeys Statement, not the<br />
SendKeys Method.<br />
<br />
299 KeyPress Events<br />
<br />
The See Also should refer to the SendKeys Statement, not the<br />
SendKeys Method.<br />
<br />
303 Label Control<br />
<br />
Add the DataField, DataSource, and Parent properties to the<br />
Properties list.<br />
<br />
336- ListFields Method<br />
338<br />
In the second table, the fifth and sixth entries in the Field column<br />
should be SourceTable and SourceField, not SourceTableName and<br />
SourceFieldName. The code example and the headings of the table<br />
below it should also refer to SourceTable and SourceField.<br />
<br />
345 ListTables Method<br />
<br />
In Remarks, the first paragraph under the TableType field table<br />
should read: &quot;When you use the ListTables method to create a<br />
Snapshot, you can evaluate the contents of the Attributes field in<br />
the Snapshot by referring to the TableDef property settings table in<br />
the Attributes property topic.<br />
<br />
361 Max, Min Properties (Common Dialog)<br />
<br />
At the beginning of the topic, add &quot;Applies To...Common dialog<br />
(Font, Print dialogs).&quot;<br />
<br />
363 MaxFileSize Property<br />
<br />
The &quot;Applies To&quot; line should read &quot;Common dialog (File dialogs).&quot;<br />
<br />
390 Name Property<br />
<br />
The &quot;Applies To&quot; line should include the Database object.<br />
<br />
432 Partition Function<br />
<br />
In the code in Example 3, the second five lines of code duplicate<br />
the first five lines and should be deleted.<br />
<br />
439 Picture Box Control<br />
<br />
Add DataField and DataSource to the Properties list.<br />
<br />
444 PopupMenu Method<br />
<br />
In the Syntax line, add a comma immediately before the y.<br />
<br />
455 PrinterDefault Property<br />
<br />
The &quot;Applies To&quot; line should read &quot;Common dialog (Print dialog).&quot;<br />
<br />
536- SourceFieldName, SourceTableName Properties<br />
537<br />
All references to SourceFieldName and SourceTableName in this topic<br />
should refer to &quot;SourceField&quot; and &quot;SourceTable&quot; instead.<br />
<br />
538 SourceTableName Property<br />
<br />
There should be a full entry for the &quot;SourceTableName&quot; topic. See<br />
online Help for the text of this topic.<br />
<br />
565 Text Box Control<br />
<br />
The second piece of art is incorrect. It should show a text box<br />
on a form but instead shows a menu title and menu items on a form.<br />
Also, add DataField and DataSource to the Properties list.<br />
<br />
595 Validate Event<br />
<br />
In the third paragraph following the Constants table, change &quot;edit<br />
buffer&quot; to &quot;copy buffer.&quot;<br />
<br />
619 Trappable Errors<br />
<br />
In Appendix B, the odd header is wrong. It should read &quot;Trappable<br />
Errors,&quot; not &quot;Trappable Error Messages.&quot;<br />
<br />
634 Trappable Error Messages<br />
<br />
In Table B.6 (&quot;Data Access Trappable Error Messages&quot;), Error #3137<br />
should be deleted.<br />
<br />
===================================================================<br />
Part 7: Notes for Microsoft Visual Basic &quot;Custom Control Reference&quot;<br />
===================================================================<br />
<br />
Page Section/Note<br />
--------------------------------------------------------------------<br />
xxii Visual Basic Executable (.EXE) Files<br />
<br />
The Visual Basic run-time file is listed incorrectly. The first<br />
bulleted item should read VBRUN300.DLL, not VBRUN200.DLL.<br />
<br />
147 Graph Control<br />
<br />
In Example 1, the following line contains two &quot;=&quot; characters:<br />
<br />
Graph1.LabelText = &quot;Data point&quot; = Str$(i%)<br />
<br />
The line should read:<br />
<br />
Graph1.LabelText = &quot;Data point&quot; + Str$(i%)<br />
<br />
148 Graph Control<br />
<br />
In Example 2, the following line contains two &quot;=&quot; characters:<br />
<br />
Graph1.LabelText = &quot;Label&quot; = Str$(i%)<br />
<br />
The line should read:<br />
<br />
Graph1.LabelText = &quot;Label&quot; + Str$(i%)<br />
<br />
176 Key Status Control<br />
<br />
The table for the Value property incorrectly states that False is<br />
the default value. The default value is determined by the state<br />
of the keyboard.<br />
<br />
180 MAPI Session Control<br />
<br />
There should be no footnotes, since the MAPI controls are<br />
only available in Visual Basic.<br />
<br />
186 MAPI Messages Control<br />
<br />
There should be no footnotes, since the MAPI controls are<br />
only available in Visual Basic.<br />
<br />
============================================================<br />
Part 8: Notes for Microsoft Visual Basic &quot;Data Access Guide&quot;<br />
============================================================<br />
<br />
Page Section/Note<br />
------------------------------------------------------------<br />
23 Creating New Table Definitions<br />
<br />
Delete the following line of code from the example:<br />
<br />
On Error Resume Next<br />
</pre><br />
<br />
</div><br />
<br /><br />
<br />
Additional query words: 3.00 docerr<br />
<br />
Keywords: KB100493<br />
<br />
<div class="footer"><br />
<br />
<br /><br />
<br />
<br />
-----<br />
<br />
[mailto:TECHNET@MICROSOFT.COM Send feedback to Microsoft]<br />
<br />
<span>© Microsoft Corporation. All rights reserved.</span><br />
<br />
<br />
</div><br />
<br />
</div></div>
3155ffGd