Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

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, 2805 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 ..
Neuester Wissensbeitrag
Internet

Unbemerkt - Telekom Netzumschaltung! - BNG - Broadband Network Gateway

(3)

Erfahrungsbericht von ashnod zum Thema Internet ...

Ähnliche Inhalte
Windows 10
gelöst Herunterfahren RDP Windows 10 verhindern (4)

Frage von micha055 zum Thema Windows 10 ...

Exchange Server
gelöst Vererbung von Berechtigungen auf Unterordner in Outlook verhindern (6)

Frage von touro411 zum Thema Exchange Server ...

Windows 10
gelöst Windows 10 - Automatischen Reboot sicher verhindern (2)

Frage von yakini zum Thema Windows 10 ...

Heiß diskutierte Inhalte
Windows Server
Outlook Verbindungsversuch mit Exchange (15)

Frage von xbast1x zum Thema Windows Server ...

Grafikkarten & Monitore
Tonprobleme bei Fernseher mit angeschlossenem Laptop über HDMI (11)

Frage von Y3shix zum Thema Grafikkarten & Monitore ...

Microsoft Office
Keine Updates für Office 2016 (11)

Frage von Motte990 zum Thema Microsoft Office ...