Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen (A bis Z)

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit
GELÖST

Dublikate Verhindern

Frage Entwicklung VB for Applications

Mitglied: Cyberkey

Cyberkey (Level 1) - Jetzt verbinden

07.04.2010, aktualisiert 08.04.2010, 2834 Aufrufe, 5 Kommentare

Abfangen von Dublikaten.

Hallo,
hat jemand eine Idee wie man diese Fehlermeldung abfangen kann?
Hab versucht dublikate mit nem Index zu verhindern aber das sieht etwas unschön aus...
vll. gibt es ja eine elegantere Lösung.

Vor aktualisierung prüfen...
und dann wenn vorhanden Cancel.. oder so..


Die Spalte nennt sich IP_ID
und dort sind eben Nummern von 1-> 999

Das Problem ist das jenes Feld intern mehrere Spalten hat... ich weiß nicht wie man das in der Konstelation handhabt.



28944f305b5f02a585272c144a33f6e4 - Klicke auf das Bild, um es zu vergrößern

1a67392eaff1dacfcdf30681274c962c - Klicke auf das Bild, um es zu vergrößern

[edit: 8.4.10]
Es geht um eine Access Datenbank richtig =)
Aber die "Lösung" liegt im VBA Code...
Soweit so gut... habe es notdürftig mit nem Index gelöst das die Nummern in "PI_ID" nicht doppelt vorhanden sein können. Aber die unwissendlichen Büroarbeitskräfte kennen sich damit nicht aus und sollen die tabelle nur befüllen deshalb. Sollte eine andere Lösung her... die Diese Fehlermeldung abfängt.
Mitglied: RedWraith
07.04.2010 um 21:53 Uhr
Ich verstehe nicht ganz.

Du hast also eine Tabelle, die eine Spalte IP_ID hat. Diese Spalte soll UNIQUE INDEX sein.

Und du möchtest jetzt, dass die Fehlermeldung unterdrückt wird, bzw besser behandelt wird und durch deine eigene ersetzt wird, wenn du neue Spalten per INSERT hinzufügst ?

Geht es hier um eine selbsterstelle Maske, eine Abfrage, ein VB Skript ?


Ein paar mehr Details wären schön.
Bitte warten ..
Mitglied: Logan000
08.04.2010 um 09:28 Uhr
Moin Moin

@RedWraith
Du hast also eine Tabelle, die eine Spalte IP_ID hat. Diese Spalte soll UNIQUE INDEX sein.
Warum? Evtl hat er schon einen PK. Darüber hinaus geht es hier offenbar um ein Feld das Benutzereingaben enthällt.
Ein Index ist da genau das richtige.

Geht es hier um eine selbsterstelle Maske, eine Abfrage, ein VB Skript ?
Es handelt sich wohl um eine Access DB.

Ein paar mehr Details wären schön.
Das sehe ich auch so.

@Cyberkey
Vor aktualisierung prüfen...und dann wenn vorhanden Cancel oder so.
Genau So.
Ist natürlich Arbeit. Aber wie sagt man: Wer schön sein will muß leiden.

Gruß L.
Bitte warten ..
Mitglied: Cyberkey
08.04.2010 um 15:37 Uhr
Gab nen Edit oben... hoffe es ist so etwas verständlicher.

[EDIT] So ca. hab ich mir das gedacht:

01.
If DCount("*", "Hardware_????", "[IP_ID]='" & Me!IP_eingabe & "'") > 0 Then 
02.
MsgBox "Wert ist schon da " 
03.
Cancel = True 
04.
End If 
05.
End Sub
Datentyp Fehler ???


Meine Vermutung:
ergebnis = DCount("*", "Hardware_????", "[IP_ID]='" & Me!IP_eingabe & "'")

Beide Werte sind 30 in meinem Beispiel test. Da ME!IP_eingabe 2 spalten hat wie oben zu sehen wird es irgendwie in text convetiert und dieser kann natürlich nicht mit IP_ID (zahl) abgeglichen werden... owohl beides zahlen sind.. wie löst man das?
Bitte warten ..
Mitglied: Logan000
09.04.2010 um 14:05 Uhr
Moin Moin

Das Formularfeld IP_Eingabe ist doch ein Kombinationsfeld.
Dies hat die Eigenschaft "gebundene Spalte". Das ist bei mehrspaltigen Kombinationsfeldern genau die, deren Wert mit Me!IP_eingabe ausgegeben wird.
D.h. ein deinen Fall: setz die gebundenen Spalte auf 2 und Me!IP_eingabe hat den Wert Ohne "Punkt"
(Kannst du dir ja mal in einer msgbox ausgeben lassen.)
Darüber hinaus solltest Du im DCount die Hochkommas um Me!IP_eingabe weglassen.
01.
If DCount("*", "Hardware_????", "[IP_ID]="& Me!IP_eingabe) > 0 Then  
02.
..
Damit machst du aus deiner Zahl wieder einen String.

Gruß L.
Bitte warten ..
Mitglied: Cyberkey
09.04.2010 um 17:16 Uhr
Danke für die Anregung,.. ich werde es sobald wie möglich mal ausprobieren =)... grad Feierabend ^^

Also zurück aus dem Wochenende:
Problem ist Gelöst ;)
Danke

Gruß Cyberkey
Bitte warten ..
Ähnliche Inhalte
Exchange Server
Mailspoofing am Exchange Server verhindern (14)

Frage von MasterPhil zum Thema Exchange Server ...

Windows 10
gelöst Herunterfahren RDP Windows 10 verhindern (7)

Frage von micha055 zum Thema Windows 10 ...

Windows 7
Adobe Reader - Verhindern Links auszuführen (6)

Frage von MARBHD zum Thema Windows 7 ...

Neue Wissensbeiträge
Ubuntu

Ubuntu 17.10 steht zum Download bereit

(3)

Information von Frank zum Thema Ubuntu ...

Datenschutz

Autofahrer-Pranger - Bewertungsportal illegal

(8)

Information von BassFishFox zum Thema Datenschutz ...

Windows 10

Neues Win10 Funktionsupdate verbuggt RemoteApp

(8)

Information von thomasreischer zum Thema Windows 10 ...

Microsoft

Die neuen RSAT-Tools für Win10 1709 sind da

(2)

Information von DerWoWusste zum Thema Microsoft ...

Heiß diskutierte Inhalte
Windows 10
Windows 10 Ordnerfreigabe (21)

Frage von Xaero1982 zum Thema Windows 10 ...

Router & Routing
Allnet - VDSL2 Modem - SFP (mini-GBIC) (20)

Frage von Dobby zum Thema Router & Routing ...

Monitoring
Netzwerk-Monitoring Software (17)

Frage von Ghost108 zum Thema Monitoring ...

Windows Server
gelöst Kopiervorgang schlägt fehl, weil Datei- und Ordnername zu lang sind (14)

Frage von Schroedi zum Thema Windows Server ...