Top-Themen

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, 2837 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
Microsoft Office
Dublikate Entfernen per Excel Makro VBA
gelöst Frage von novregenMicrosoft Office3 Kommentare

Hallo, ich habe eine Excel Liste mit variabler Zeilenanzahl und 33 Spalten. Diese Liste bekomme ich monatlich. Leider gibt ...

Server-Hardware
Serverausfall verhindern
Frage von aracaracServer-Hardware7 Kommentare

Hallo, wir haben einen Rootserver bei Server4you und betreiben einen Onlineshop auf diesem Server. Sollte es mal einen Hack ...

Microsoft
Verschieben von Dateien oder Ordnern verhindern
Tipp von Dye.KehasaMicrosoft6 Kommentare

Jeder Admin kennt das: Hilferuf, weil ein Ordner spurlos verschwunden ist. Praktisch immer, findest sich derselbe dann in einem ...

Internet
Interstitial Werbung verhindern
gelöst Frage von TaumelInternet14 Kommentare

Hallo! Habe seit ein paar Tagen diese sehr lästigen Werbungseinblendungen unter Web.de. Mit jedem Aufruf einer X-beliebigen Internetseite, wird ...

Neue Wissensbeiträge
Windows 10

Autsch: Microsoft bündelt Windows 10 mit unsicherer Passwort-Manager-App

Tipp von kgborn vor 20 StundenWindows 102 Kommentare

Unter Microsofts Windows 10 haben Endbenutzer keine Kontrolle mehr, was Microsoft an Apps auf dem Betriebssystem installiert (die Windows ...

Sicherheits-Tools

Achtung: Sicherheitslücke im FortiClient VPN-Client

Tipp von kgborn vor 22 StundenSicherheits-Tools

Ich weiß nicht, wie häufig die NextGeneration Endpoint Protection-Lösung von Fortinet in deutschen Unternehmen eingesetzt wird. An dieser Stelle ...

Internet

USA: Die FCC schaff die Netzneutralität ab

Information von Frank vor 1 TagInternet3 Kommentare

Jetzt beschädigt US-Präsident Donald Trump auch noch das Internet. Der neu eingesetzte FCC-Chef Ajit Pai ist bekannter Gegner einer ...

DSL, VDSL

ALL-BM200VDSL2V - Neues VDSL-Modem mit Vectoring von Allnet

Information von Lochkartenstanzer vor 1 TagDSL, VDSL2 Kommentare

Moin, Falls jemand eine Alternative zu dem draytek sucht: Gruß lks

Heiß diskutierte Inhalte
Windows Server
GPO nur für bestimmte Computer
Frage von Leo-leWindows Server13 Kommentare

Hallo Forum, gern würde ich ein Robocopy script per Bat an eine GPO hängen. Wichtig wäre aber dort der ...

Windows Server
KMS Facts for Client configuration
Frage von winlinWindows Server13 Kommentare

Hey Leute, wir haben in unserem Netz nun einen neuen KMS Server. Haben Bestands-VMs die noch nicht aktiviert sind. ...

Windows Tools
Software-Tool zum Entfernen von bösartigem Windows
Frage von emeriksWindows Tools11 Kommentare

Hi, siehe Betreff hat das jemals irgendjemand schonmal sinnvoll eingesetzt? (MRT) E.

Router & Routing
OpenWRT bzw. L.E.D.E auf Buffalo WZR-HP-AG300H - update
gelöst Frage von EpigeneseRouter & Routing11 Kommentare

Guten Tag, ich habe auf einem Buffalo WZR-HP-AG300H die alternative Firmware vom L.E.D.E Projekt geflasht. Ich bin es von ...