Tweet
Hallo zusammen,
ich hoffe, dass mir hier jemand helfen kann.
Falls dies hier falsch ist, bin ich auch dankbar für, wenn es ins richtige Unterforum verschoben wird.
Also ich habe mir mit Oracle XE eine Datenbank erstellt und möchte jetzt auf diese mit Hilfe von Visual Studio mit VB zugreifen.
Ich habe dies auch einigermaßen hinbekommen.
Allerdings habe ich jetzt das Problem, wie ich einen Autowert in einer Tabelle automatisch setzen kann.
Ich habe mir dazu unter Oracle eine Sequence und einen Trigger erstellt mit denen dies auch unter Oracle funktioniert.
Meine Frage ist nun, wie muss mein Quellcode in VB aussehen um auf meine Datenbank zuzugreifen und dass die ID(Autowert) hochgezählt wird?
Hier ist meine Testdatenbank:
Tabelle:
[highlight=sql]CREATE TABLE "TEST_AUTOWERT"
( "ID" NUMBER NOT NULL ENABLE,
"TESTDATA" VARCHAR2(25) NOT NULL ENABLE
)
/[/highlight]
Trigger:
[highlight=sql]CREATE OR REPLACE TRIGGER "TEST_TRIGGER"
before insert on TEST_AUTOWERT
for each row
begin
select test_seq.nextval into :new.id from dual;
end;
/
ALTER TRIGGER "TEST_TRIGGER" ENABLE
/[/highlight]
Sequence:
[highlight=sql]CREATE SEQUENCE "TEST_SEQ" MINVALUE 1 MAXVALUE 999999 INCREMENT BY 1 START
/[/highlight]
Hoffentlich kann mir wer helfen!
Gruß Frank
ich hoffe, dass mir hier jemand helfen kann.
Falls dies hier falsch ist, bin ich auch dankbar für, wenn es ins richtige Unterforum verschoben wird.
Also ich habe mir mit Oracle XE eine Datenbank erstellt und möchte jetzt auf diese mit Hilfe von Visual Studio mit VB zugreifen.
Ich habe dies auch einigermaßen hinbekommen.
Allerdings habe ich jetzt das Problem, wie ich einen Autowert in einer Tabelle automatisch setzen kann.
Ich habe mir dazu unter Oracle eine Sequence und einen Trigger erstellt mit denen dies auch unter Oracle funktioniert.
Meine Frage ist nun, wie muss mein Quellcode in VB aussehen um auf meine Datenbank zuzugreifen und dass die ID(Autowert) hochgezählt wird?
Hier ist meine Testdatenbank:
Tabelle:
[highlight=sql]CREATE TABLE "TEST_AUTOWERT"
( "ID" NUMBER NOT NULL ENABLE,
"TESTDATA" VARCHAR2(25) NOT NULL ENABLE
)
/[/highlight]
Trigger:
[highlight=sql]CREATE OR REPLACE TRIGGER "TEST_TRIGGER"
before insert on TEST_AUTOWERT
for each row
begin
select test_seq.nextval into :new.id from dual;
end;
/
ALTER TRIGGER "TEST_TRIGGER" ENABLE
/[/highlight]
Sequence:
[highlight=sql]CREATE SEQUENCE "TEST_SEQ" MINVALUE 1 MAXVALUE 999999 INCREMENT BY 1 START
/[/highlight]
Hoffentlich kann mir wer helfen!
Gruß Frank
Comment