Announcement

**Andreas Kosch** · 13.10.2004, 05:26

Hallo,

da die Datens�tze auf dem SQL Server landen sollen, steht dort die REPLACE-Funktion zur Verf�gung. Das folgende Beispiel demonstriert dies:
<pre>
USE tempdb
GO
 
CREATE TABLE ReplaceDemo
(
recid INTEGER NOT NULL IDENTITY PRIMARY KEY,
wert VARCHAR(19) NOT NULL
)
GO
INSERT INTO ReplaceDemo (wert) VALUES ('12 12 12')
INSERT INTO ReplaceDemo (wert) VALUES (' 11 1 ')
INSERT INTO ReplaceDemo (wert) VALUES (' 1 2 3 4 5')
GO
 
SELECT
recid, REPLACE(wert,' ', '') AS WertOhneLeerzeichen
FROM
dbo.ReplaceDemo
</pre>
Als Ergebnis wird folgendes zur�ckgeliefert:
<pre>
recid WertOhneLeerzeichen
----- -----------------------
1 121212
2 111
3 12345

(3 row(s) affected)
</pre>
In der Delphi-Anweisung kann die REPLACE-Funktion bereits beim Einf�gen der Datens�tze in die Zieltabelle genutzt werden:
<pre>
INSERT INTO ReplaceDemoZiel (wert)
SELECT
REPLACE(wert,' ', '') AS WertOhneLeerzeichen
FROM
dbo.ReplaceDemo
</pre&gt

**Holger L�ttgen** · 13.10.2004, 10:27

Hallo Herr Kosch, 
danke f�r die schnelle Antwort, aber ich habe damit noch ein Problem: 
Die Daten liegen zun�chst nicht auf dem SQL-Server sondern in einer ACCESS-Datenbank. Dort m�sste ich sie dann erst umwandeln. Oder geht das ganze mit REPLACE nur, wenn die Daten auf dem SQL-Server liegen ? 
Mein Quellcode dazu sieht folgendermassen aus, allerdings funktioniert das mit dem "IN" nicht... 
<PRE>
Command1.CommandText := 'INSERT INTO PLDATATMP(Artikel, Preis, Rabattgruppe, Gewicht) '+
'SELECT REPLACE(Artikel,'''+' '+''', '''+''') AS WOL, '+
'Euro, Rabattgruppe, Gewicht '+
'FROM PLDATA IN '+''''+ Originaldatenbank+''''+';';
</PRE>
 
Gru� 
Holger L�ttge

**Andreas Kosch** · 13.10.2004, 11:12

Hallo,

>Dort m�sste ich sie dann erst umwandeln.

Warum? Es spricht doch nichts dagegen, diese zuerst in eine tempor�re Tabelle der MS SQL Server-Datenbank im Rohformat (d.h. mit Leerzeichen) zu kopieren. Dieser Zwischenschritt erlaubt es dann, die leistungsf�higeren Funktionen des MS SQL Server ausnutzen zu k�nnen

**Holger L�ttgen** · 13.10.2004, 11:22

Hallo Herr Kosch, 
das habe ich auchgerade versucht, allerdings ohne Erfolg... ich habe ihr Buch "ADO und Delphi" auf den Knien und versuche nun die Access-Tabelle auf den SQL-Server zu schieben. Und zwar verwende ich dazu den Befehl "OPENROWSET", um auf die ACCESS-DAtenbank zuzugreifen... aber ich bekomme immer eine Fehlermeldung ("...die Informationsdatei f�r die Arbeitsgruppe fehlt..." 
<PRE>
Command1.CommandText := 'INSERT INTO PLDATATMP (Artikel, Preis, Rabattgruppe, Gewicht) '+
'SELECT REPLACE(a.Artikel,'''+' '+''', '''+''') AS Artikel, '+
'a.Euro, a.Rabattgruppe, a.Gewicht '+
'FROM OPENROWSET('+''''+'Microsoft.Jet.OLEDB.4.0'+''''+' ,'+''''+OriginalAccessDB+''''+';'+''''+'admin'+''' '+';'+''''+' '+''''+',PLDATA) '+
'AS a;';

</PRE>
Damit wollte ich das in einem Rutsch erledigen, die Daten auf den SQL-SErver zu portieren und gleichzeitig die Umwandlung der Leerzeichen zu generieren... Was stimmt nicht am Quelltext ? 
Gru� 
Holger L�ttge

**Andreas Kosch** · 13.10.2004, 11:32

Hallo,

>...die Informationsdatei f�r die Arbeitsgruppe fehlt...

in diesem Fall kann OPENROWSET die MDB-Datei nicht �ffnen. Was passiert, wenn die ACCESS-Datenbankdatei auf der lokalen Festplatte ist und nicht von einem Passwort gesch�tzt wird? Wenn trotzdem eine im Netzwerk gemeinsam genutzte ACCESS-Datenbank genutzt werden soll, stellt sp_addlinkedserver auf der Seite des MS SQL Server einen Weg bereit, um auch die Arbeitsgruppendatei �ber die Verbindungszeichenfolge anzumelden. Die OPENROWSET-Funktion ist nur eine Adhoc-Abk�rzung f�r den umst�ndlicheren, aber vielf�ltiger konfigurierbaren Linked Server-Weg

**Holger L�ttgen** · 13.10.2004, 11:38

Hallo Herr Kosch, 
Ich hab den kleinen Fehler gefunden; das Passwort f�r den Admin war nicht richtig, da war ein Leerzeichen drin. 
Allerdings erhalte ich jetzt einen TimeOut-Fehler und es werden keine Daten portiert.. ich hab das auch mal ohne den REPLACE-Befehl probiert, aber mit der gleichen Wirkung. 
<PRE>
Command1.CommandText := 'INSERT INTO PLDATATMP (Artikel, Preis, Rabattgruppe, Gewicht) '+
'SELECT a.PTNRDRU, a.Euro, a.Rabattgruppe, a.Gewicht '+
'FROM OPENROWSET('+''''+'Microsoft.Jet.OLEDB.4.0'+''''+' ,'+''''+Mercedes+''''+';'+''''+'admin'+''''+';'+'' ''+''+''''+',PLDATA) '+
'AS a;';

</PRE>
 
Damit sollte es doch eigentlich gehen... tut es aber nicht

**Holger L�ttgen** · 13.10.2004, 12:21

Hallo Herr Kosch, 
Die L�sung steckte schon in der Fehlermeldung... ich habe das Timeout des Command-Objekts h�her gesetzt, das braucht er wohl f�r die Anzahl der Datens�tze... jetzt werden die Daten brav �bertragen... 
eine andere Frage habe ich dennoch... gibt es eine M�glichkeit, dem Anwender zu zeigen, wie weit der Fortschritt der command-Anweisung ist ? Weil das Programm ja so aussieht, als t�te es garnichts... 
Gru� 
Holger L�ttge

**Andreas Kosch** · 14.10.2004, 06:29

Hallo,

> wie weit der Fortschritt der command-Anweisung ist ?

dies geht nur dann, wenn jeder Datensatz einzeln �bertragen wird. In diesem Fall ist dem Programm sowohl die Anzahl als auch die aktuelle Position bekannt. Allerdings ist diese Vorgehensweise nicht sinnvoll.

Statt dessen sollte das Programm eine Animation (siehe TAnimate) anzeigen (so wie das zum Beispiel der Internet Explorer auch macht)

**Holger L�ttgen** · 14.10.2004, 07:07

Hallo Herr Kosch, 
vielen Dank f�r Ihre Antworten... bin immer wieder begeistert von Ihrer Kompetenz und Ihrem Fachwissen. 
Gru� 
Holger L�ttge

Announcement

Replace von Leerzeichen

Replace von Leerzeichen

Comment

Comment

Comment

Comment

Comment

Comment

Comment

Comment

Comment