https://www.betaarchive.com/wiki/index.php?title=Microsoft_KB_Archive/253435&feed=atom&action=history
Microsoft KB Archive/253435 - Revision history
2024-03-29T06:49:26Z
Revision history for this page on the wiki
MediaWiki 1.39.3
https://www.betaarchive.com/wiki/index.php?title=Microsoft_KB_Archive/253435&diff=377957&oldid=prev
X010: Text replacement - """ to """
2020-07-21T12:53:13Z
<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 12:53, 21 July 2020</td>
</tr><tr><td colspan="2" class="diff-lineno" id="mw-diff-left-l97">Line 97:</td>
<td colspan="2" class="diff-lineno">Line 97:</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> </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> </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> 'Create Objects</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> 'Create Objects</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> Set sql = CreateObject(<del style="font-weight: bold; text-decoration: none;">&quot;</del>SQLDMO.SQLServer<del style="font-weight: bold; text-decoration: none;">&quot;</del>)</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> Set sql = CreateObject(<ins style="font-weight: bold; text-decoration: none;">"</ins>SQLDMO.SQLServer<ins style="font-weight: bold; text-decoration: none;">"</ins>)</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> Set db = CreateObject(<del style="font-weight: bold; text-decoration: none;">&quot;</del>SQLDMO.Database<del style="font-weight: bold; text-decoration: none;">&quot;</del>)</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> Set db = CreateObject(<ins style="font-weight: bold; text-decoration: none;">"</ins>SQLDMO.Database<ins style="font-weight: bold; text-decoration: none;">"</ins>)</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> </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> </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> 'Connect to the server</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> 'Connect to the server</div></td></tr>
<tr><td colspan="2" class="diff-lineno" id="mw-diff-left-l104">Line 104:</td>
<td colspan="2" class="diff-lineno">Line 104:</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> </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> </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> 'Set the database object</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> 'Set the database object</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> Set db = sql.Databases(strDatabase, <del style="font-weight: bold; text-decoration: none;">&quot;</del>dbo<del style="font-weight: bold; text-decoration: none;">&quot;</del>)</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> Set db = sql.Databases(strDatabase, <ins style="font-weight: bold; text-decoration: none;">"</ins>dbo<ins style="font-weight: bold; text-decoration: none;">"</ins>)</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> </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> </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> 'Determine the location of database files, primary and log</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> 'Determine the location of database files, primary and log</div></td></tr>
<tr><td colspan="2" class="diff-lineno" id="mw-diff-left-l119">Line 119:</td>
<td colspan="2" class="diff-lineno">Line 119:</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> 'Copy database files to new names</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> 'Copy database files to new names</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> FileCopy strMDFfileName, strMDFfilePath & strNewName & <del style="font-weight: bold; text-decoration: none;">&quot;</del>.mdf<del style="font-weight: bold; text-decoration: none;">&quot;</del></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> FileCopy strMDFfileName, strMDFfilePath & strNewName & <ins style="font-weight: bold; text-decoration: none;">"</ins>.mdf<ins style="font-weight: bold; text-decoration: none;">"</ins></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> FileCopy strLOGfile, strMDFfilePath & strNewName & <del style="font-weight: bold; text-decoration: none;">&quot;</del>_log.ldf<del style="font-weight: bold; text-decoration: none;">&quot;</del></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> FileCopy strLOGfile, strMDFfilePath & strNewName & <ins style="font-weight: bold; text-decoration: none;">"</ins>_log.ldf<ins style="font-weight: bold; text-decoration: none;">"</ins></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> </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> </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> 'Re-attach original database</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> 'Re-attach original database</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> sql.AttachDB strDatabase, strMDFfileName & <del style="font-weight: bold; text-decoration: none;">&quot;</del>,<del style="font-weight: bold; text-decoration: none;">&quot; </del>& strLOGfile</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> sql.AttachDB strDatabase, strMDFfileName & <ins style="font-weight: bold; text-decoration: none;">"</ins>,<ins style="font-weight: bold; text-decoration: none;">" </ins>& strLOGfile</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.AttachDB strNewName, strMDFfilePath & strNewName & _</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.AttachDB strNewName, strMDFfilePath & strNewName & _</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> <del style="font-weight: bold; text-decoration: none;">&quot;</del>.mdf&<del style="font-weight: bold; text-decoration: none;">quot; & &quot;</del>,<del style="font-weight: bold; text-decoration: none;">&quot; </del>& strMDFfilePath & strNewName & <del style="font-weight: bold; text-decoration: none;">&quot;</del>_log.ldf<del style="font-weight: bold; text-decoration: none;">&quot;</del></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> <ins style="font-weight: bold; text-decoration: none;">"</ins>.mdf<ins style="font-weight: bold; text-decoration: none;">" </ins>& <ins style="font-weight: bold; text-decoration: none;">"</ins>,<ins style="font-weight: bold; text-decoration: none;">" </ins>& strMDFfilePath & strNewName & <ins style="font-weight: bold; text-decoration: none;">"</ins>_log.ldf<ins style="font-weight: bold; text-decoration: none;">"</ins></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> </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> </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> 'Set database object to the new database</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> 'Set database object to the new database</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> Set db = sql.Databases(strNewName, <del style="font-weight: bold; text-decoration: none;">&quot;</del>dbo<del style="font-weight: bold; text-decoration: none;">&quot;</del>)</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> Set db = sql.Databases(strNewName, <ins style="font-weight: bold; text-decoration: none;">"</ins>dbo<ins style="font-weight: bold; text-decoration: none;">"</ins>)</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> Debug.Print <del style="font-weight: bold; text-decoration: none;">&quot;</del>Database Created<del style="font-weight: bold; text-decoration: none;">&quot;</del></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> Debug.Print <ins style="font-weight: bold; text-decoration: none;">"</ins>Database Created<ins style="font-weight: bold; text-decoration: none;">"</ins></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> </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> </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> </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> </div></td></tr>
<tr><td colspan="2" class="diff-lineno" id="mw-diff-left-l140">Line 140:</td>
<td colspan="2" class="diff-lineno">Line 140:</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>CopySQLDB_Err:</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>CopySQLDB_Err:</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> 'Basic error handling.</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> 'Basic error handling.</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 Err.Description, vbInformation, <del style="font-weight: bold; text-decoration: none;">&quot;</del>SQL OLE Automation<del style="font-weight: bold; text-decoration: none;">&quot;</del></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 Err.Description, vbInformation, <ins style="font-weight: bold; text-decoration: none;">"</ins>SQL OLE Automation<ins style="font-weight: bold; text-decoration: none;">"</ins></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> Resume CopySQLDB_End</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> Resume CopySQLDB_End</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-l146">Line 146:</td>
<td colspan="2" class="diff-lineno">Line 146:</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> </pre></li></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> </pre></li></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><li><p>Type the following line in the Immediate window, and then press ENTER:</p></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><li><p>Type the following line in the Immediate window, and then press ENTER:</p></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><pre class="codesample">?CopySQLDB(<del style="font-weight: bold; text-decoration: none;">&quot;</del>sa<del style="font-weight: bold; text-decoration: none;">&quot;</del>,<del style="font-weight: bold; text-decoration: none;">&quot;&quot;</del>,<del style="font-weight: bold; text-decoration: none;">&quot;</del>(local)<del style="font-weight: bold; text-decoration: none;">&quot;</del>,<del style="font-weight: bold; text-decoration: none;">&quot;</del>NorthwindCS<del style="font-weight: bold; text-decoration: none;">&quot;</del>,<del style="font-weight: bold; text-decoration: none;">&quot;</del>NwindCS<del style="font-weight: bold; text-decoration: none;">&quot;</del>)</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><pre class="codesample">?CopySQLDB(<ins style="font-weight: bold; text-decoration: none;">"</ins>sa<ins style="font-weight: bold; text-decoration: none;">"</ins>,<ins style="font-weight: bold; text-decoration: none;">""</ins>,<ins style="font-weight: bold; text-decoration: none;">"</ins>(local)<ins style="font-weight: bold; text-decoration: none;">"</ins>,<ins style="font-weight: bold; text-decoration: none;">"</ins>NorthwindCS<ins style="font-weight: bold; text-decoration: none;">"</ins>,<ins style="font-weight: bold; text-decoration: none;">"</ins>NwindCS<ins style="font-weight: bold; text-decoration: none;">"</ins>)</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> </pre></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> </pre></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><p>'''NOTE:''' This example works in most cases. If your server is not local, type the name of the server to which you are connecting instead of the keyword <del style="font-weight: bold; text-decoration: none;">&quot;</del>(local)<del style="font-weight: bold; text-decoration: none;">&quot; </del>in the line above. In addition, this example presumes that sa is logging on with no password. You can also log on with another account that has similar permissions.<br /></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><p>'''NOTE:''' This example works in most cases. If your server is not local, type the name of the server to which you are connecting instead of the keyword <ins style="font-weight: bold; text-decoration: none;">"</ins>(local)<ins style="font-weight: bold; text-decoration: none;">" </ins>in the line above. In addition, this example presumes that sa is logging on with no password. You can also log on with another account that has similar permissions.<br /></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><br /></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><br /></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 successful, you see '''Database Created''' in the Immediate window.<br /></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 successful, you see '''Database Created''' in the Immediate window.<br /></div></td></tr>
</table>
X010
https://www.betaarchive.com/wiki/index.php?title=Microsoft_KB_Archive/253435&diff=357465&oldid=prev
X010: Text replacement - "&" to "&"
2020-07-21T11:35:04Z
<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:35, 21 July 2020</td>
</tr><tr><td colspan="2" class="diff-lineno" id="mw-diff-left-l119">Line 119:</td>
<td colspan="2" class="diff-lineno">Line 119:</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> 'Copy database files to new names</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> 'Copy database files to new names</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> FileCopy strMDFfileName, strMDFfilePath &<del style="font-weight: bold; text-decoration: none;">amp; </del>strNewName &<del style="font-weight: bold; text-decoration: none;">amp; </del>&quot;.mdf&quot;</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> FileCopy strMDFfileName, strMDFfilePath & strNewName & &quot;.mdf&quot;</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> FileCopy strLOGfile, strMDFfilePath &<del style="font-weight: bold; text-decoration: none;">amp; </del>strNewName &<del style="font-weight: bold; text-decoration: none;">amp; </del>&quot;_log.ldf&quot;</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> FileCopy strLOGfile, strMDFfilePath & strNewName & &quot;_log.ldf&quot;</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> </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> </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> 'Re-attach original database</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> 'Re-attach original database</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> sql.AttachDB strDatabase, strMDFfileName &<del style="font-weight: bold; text-decoration: none;">amp; </del>&quot;,&quot; &<del style="font-weight: bold; text-decoration: none;">amp; </del>strLOGfile</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> sql.AttachDB strDatabase, strMDFfileName & &quot;,&quot; & strLOGfile</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> sql.AttachDB strNewName, strMDFfilePath &<del style="font-weight: bold; text-decoration: none;">amp; </del>strNewName &<del style="font-weight: bold; text-decoration: none;">amp; </del>_</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> sql.AttachDB strNewName, strMDFfilePath & strNewName & _</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> &quot;.mdf&quot; &<del style="font-weight: bold; text-decoration: none;">amp; </del>&quot;,&quot; &<del style="font-weight: bold; text-decoration: none;">amp; </del>strMDFfilePath &<del style="font-weight: bold; text-decoration: none;">amp; </del>strNewName &<del style="font-weight: bold; text-decoration: none;">amp; </del>&quot;_log.ldf&quot;</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> &quot;.mdf&quot; & &quot;,&quot; & strMDFfilePath & strNewName & &quot;_log.ldf&quot;</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> </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> </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> 'Set database object to the new database</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> 'Set database object to the new database</div></td></tr>
</table>
X010
https://www.betaarchive.com/wiki/index.php?title=Microsoft_KB_Archive/253435&diff=139025&oldid=prev
3155ffGd: importing KB archive
2020-07-18T16:16:16Z
<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="KB253435"></span>ACC2000: How to Use SQL-DMO to Copy an Existing MSDE or SQL Server Database to a New Database =<br />
<br />
<br />
</div><br />
<br />
</div><br />
<div id="nstext" valign="BOTTOM"><br />
<br />
Article ID: 253435<br />
<br />
Article Last Modified on 1/26/2005<br />
<br />
<br />
-----<br />
<br />
APPLIES TO<br /><br />
<br /><br />
<br />
* Microsoft Access 2000 Standard Edition<br />
<br />
<br />
-----<br />
<br />
<div class="notice_section"><br />
<br />
This article was previously published under Q253435<br />
<br />
</div><br />
<div class="notice_section"><br />
<br />
Advanced: Requires expert coding, interoperability, and multiuser skills.<br /><br />
<br /><br />
This article applies only to a Microsoft Access project (.adp).<br /><br />
<br /><br />
<br />
<br />
</div><br />
<div class="summary_section"><br />
<br />
== SUMMARY ==<br />
<br />
This article demonstrates how to create a custom Visual Basic for Applications function in Microsoft Access that you can use to copy an existing Microsoft Data Engine (MSDE) or a Microsoft SQL Server database.<br />
<br />
</div><br />
<div class="moreinformation_section"><br />
<br />
== MORE INFORMATION ==<br />
<br />
In order to copy an MSDE database or a Microsoft SQL Server database, the database files must first be detached. Then the files must be copied. Finally, the original database and the new database must be reattached to the server.<br /><br />
<br /><br />
The following steps involve creating a new copy of the sample Access project NorthwindCS. To follow these steps, you must have access to a computer running either MSDE or SQL Server 7.0 that has a copy of the sample database NorthwindCS installed.<br />
<ol><br />
<li>Create a new Access database.</li><br />
<li>In the Database window, click '''Modules''', and then click '''New'''.</li><br />
<li>On the '''Tools''' menu, click '''References'''.</li><br />
<li>Click to select the '''Microsoft SQLDMO Object Library''' check box.</li><br />
<li><p>Type the following line in the Declarations section if it is not already there:</p><br />
<pre class="codesample">Option Explicit<br />
</pre></li><br />
<li><p>Type the following procedure:</p><br />
<pre class="codesample"> <br />
<br />
Function CopySQLDB(strLogin As String, strPwd As String, _<br />
strSrv As String, strDatabase As String, strNewName As String)<br />
<br />
'===============================================================<br />
' Parameters<br />
' --------------------------------------------------------------<br />
' strLogin: Name of the Login account used.<br />
' strPwd: The Password for the login account.<br />
' strSrv: The server to which you are connecting.<br />
' strDataBase: The name of the database you want to copy.<br />
' strNewName: Desired name of the new copy of the database.<br />
'===============================================================<br />
<br />
Dim sql As Object<br />
Dim db As Object<br />
<br />
Dim strMDFfilePath As String<br />
Dim strMDFfileName As String<br />
Dim strLOGfile As String<br />
<br />
On Error GoTo CopySQLDB_Err<br />
<br />
'Create Objects<br />
Set sql = CreateObject(&quot;SQLDMO.SQLServer&quot;)<br />
Set db = CreateObject(&quot;SQLDMO.Database&quot;)<br />
<br />
'Connect to the server<br />
sql.Connect strSrv, strLogin, strPwd<br />
<br />
'Set the database object<br />
Set db = sql.Databases(strDatabase, &quot;dbo&quot;)<br />
<br />
'Determine the location of database files, primary and log<br />
strMDFfilePath = db.PrimaryFilePath<br />
strMDFfileName = _<br />
Trim(db.FileGroups.Item(1).DBFiles.Item(1).PhysicalName)<br />
strLOGfile = Trim(db.TransactionLog.LogFiles(1).PhysicalName)<br />
<br />
'Clear out the database object<br />
Set db = Nothing<br />
<br />
'Detach database to allow copying<br />
sql.DetachDB (strDatabase)<br />
<br />
'Copy database files to new names<br />
FileCopy strMDFfileName, strMDFfilePath &amp; strNewName &amp; &quot;.mdf&quot;<br />
FileCopy strLOGfile, strMDFfilePath &amp; strNewName &amp; &quot;_log.ldf&quot;<br />
<br />
'Re-attach original database<br />
sql.AttachDB strDatabase, strMDFfileName &amp; &quot;,&quot; &amp; strLOGfile<br />
sql.AttachDB strNewName, strMDFfilePath &amp; strNewName &amp; _<br />
&quot;.mdf&quot; &amp; &quot;,&quot; &amp; strMDFfilePath &amp; strNewName &amp; &quot;_log.ldf&quot;<br />
<br />
'Set database object to the new database<br />
Set db = sql.Databases(strNewName, &quot;dbo&quot;)<br />
Debug.Print &quot;Database Created&quot;<br />
<br />
<br />
CopySQLDB_End:<br />
'Clear out the objects before ending<br />
Set db = Nothing<br />
Set sql = Nothing<br />
Exit Function<br />
<br />
CopySQLDB_Err:<br />
'Basic error handling.<br />
MsgBox Err.Description, vbInformation, &quot;SQL OLE Automation&quot;<br />
Resume CopySQLDB_End<br />
<br />
End Function<br />
</pre></li><br />
<li><p>Type the following line in the Immediate window, and then press ENTER:</p><br />
<pre class="codesample">?CopySQLDB(&quot;sa&quot;,&quot;&quot;,&quot;(local)&quot;,&quot;NorthwindCS&quot;,&quot;NwindCS&quot;)<br />
</pre><br />
<p>'''NOTE:''' This example works in most cases. If your server is not local, type the name of the server to which you are connecting instead of the keyword &quot;(local)&quot; in the line above. In addition, this example presumes that sa is logging on with no password. You can also log on with another account that has similar permissions.<br /><br />
<br /><br />
If successful, you see '''Database Created''' in the Immediate window.<br /><br />
<br /><br />
At this point, a copy of the NorthwindCS SQL server database has been created with the name NwindCS.</p></li></ol><br />
<br />
<br />
</div><br />
<br /><br />
<br />
Additional query words: pra<br />
<br />
Keywords: kbhowto kbfix kbclientserver KB253435<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