Question : SQL 2008 : comment copier le schéma ou les données d'une table à l'autre qui existe DÉJÀ ?

ENVIRONNEMENT : C'est sur SQL 2008, qui semble être TRÈS DIFFÉRENT de SQL 2005.

STATUS : Une table n'a le schéma désiré, mais aucune donnée.  L'autre table a les données, mais schema.

GOAL :  est-ce que
(1) comment j'obtiens le schéma de la table vide, plus de sur la pleine table, le
~or~/>(2) comment j'obtiens les données, de la pleine table, plus d'à la table vide ?

ACTIONS PRIS : Je me suis assuré que tous les mêmes colonnes et types de données s'assortissent maintenant sur les deux tables (et la clé primaire aussi bien).

PROBLEM :  L'insertion dans ne fonctionnera pas et ne renvoie pas l'erreur « il y a déjà un objet appelé… dans la base de données. « 
class= de

Réponse : SQL 2008 : comment copier le schéma ou les données d'une table à l'autre qui existe DÉJÀ ?

essayer ceci,

Il emploie la colonne A seulement, et la trouvaille utilisée rapidement pour trouver et supprimer des rangées macthing (un ou plusieurs) dans OpenItaly

Le code rapide de trouvaille est basé sur http://www.experts-exchange.com/A_29119.html

À la votre

Dave

1 : 2 : 3 : 4 : 5 : 6 : 7 : 8 : 9 : 10 : 11 : 12 : 13 : 14 : 15 : 16 : 17 : 18 : 19 : 20 : 21 : 22 : 23 : 24 : 25 : 26 : 27 : 28 :

Worksheet_Change secondaire privé (cible de ByVal comme gamme) Le faible WS comme feuille de travail Faible rng1 comme gamme Faible rng2 comme gamme Faible cel1 comme gamme Si Application.Intersect (colonnes (« A »), cible) n'est rien puis sortir le sous-marin Avec l'application .ScreenUpdating = faux Extrémité avec Placer le WS = les feuilles (« OpenItaly ») Placer rng1 = le WS. Gamme (WS. [a2], le WS. Cellules (Rows.Count, « A »). Extrémité (xlUp)) Placer cel1 = rng1.Find (Target.Value, xlValues, xlWhole, xlByRows, faux) Sinon cel1 n'est rien alors Placer rng2 = cel1 strFirstAddress = cel1.Address Faire Placer cel1 = rng1.FindNext (cel1) Placer rng2 = union (rng2.EntireRow, cel1) Faire une boucle tandis que les strFirstAddress <> cel1.Address Finir si Sinon rng2 n'est rien puis rng2.EntireRow.Delete Application.ScreenUpdating = rectifient Sous-marin d'extrémité