Hallo zusammen,
dank einiger Tipps von Euch habe ich es soweit hinbekommen das zumindest schon einmal parallel meine Daten aus der URL Analyse in der DB landen ... doch in der Strukturierung der DB habe ich ein paar Probleme ... In meiner ursprünglichen Klasse habe ich die normalen Daten der URL in Variablen gehabt und zum Beispiel eine Liste der H Tags als TStringList oder eine Liste der PartneSites als TStringlist ... Wie bekomme ich nun eine Art TStringlist oder eine Vergleichbare Datenstruktur in einen Datensatz einer Tabelle ?
Hier mal meine ursprüngliche Klasse
1: 2: 3: 4: 5: 6: 7: 8: 9: 10: 11: 12: 13: 14: 15: 16: 17: 18: 19: 20: 21: 22: 23: 24: 25: 26: 27: 28: 29: 30: 31: 32: 33: 34: 35: 36: 37: 38: 39: 40: 41: 42: 43: 44: 45: 46: 47: 48: 49: 50: 51: 52: 53: 54: 55: 56: 57: 58: 59: 60: 61: 62: 63:
| TWebURLDataItem = packed class strict private var FOrigURLString: string; FPageRank: integer; FAnalysed: integer; FURLLinkString: string; FHTTPStatus: integer; FURLType: integer; FExternalLinks: integer; FInLinks : integer; FRootURL: string; FURLString: string; FContentLength: int64; FInternalLinks: integer; FNeededAnalysisTime: int64; FServer: string; FContentType: string; FIsFeed: integer; FURLLocation: integer; FCharSet: string; FDate: extended; FURLExtension: string; FURLText : string; FRetryCount: integer; FConnectionStatusReport: TStringList; FParentSites: TStringList; FHTags: TStringList; FURLTags: TStringList; FRedirectList: TStringlist; public constructor Create; destructor Destroy; override; property RootURL: string read FRootURL write FRootURL; property URLString: string read FURLString write FURLString; property OrigURLString: string read FOrigURLString write FOrigURLString; property URLLinkString: string read FURLLinkString write FURLLinkString; property URLType: integer read FURLType write FURLType; property Analysed: integer read FAnalysed write FAnalysed; property HTTPStatus: integer read FHTTPStatus write FHTTPStatus; property PageRank: integer read FPageRank write FPageRank; property InternalLinks: integer read FInternalLinks write FInternalLinks; property ExternalLinks: integer read FExternalLinks write FExternalLinks; property InLinks: integer read FInLinks write FInLinks; property ContentLength: int64 read FContentLength write FContentLength; property ParentSites: TStringList read FParentSites write FParentSites; property HTags: TStringList read FHTags write FHTags; property URLTags: TStringList read FURLTags write FURLTags; property NeededAnalysisTime: int64 read FNeededAnalysisTime write FNeededAnalysisTime; property Server: string read FServer write FServer; property ContentType: string read FContentType write FContentType; property IsFeed: integer read FIsFeed write FIsFeed; property URLLocation: integer read FURLLocation write FURLLocation; property CharSet: string read FCharSet write FCharSet; property Date: extended read FDate write FDate; property URLExtension: string read FURLExtension write FURLExtension; property RetryCount: integer read FRetryCount write FRetryCount; property URLText: string read FURLText write FURLText; property RedirectList: TStringList read FRedirectList write FRedirectList; property ConnectionStatusReport: TStringList read FConnectionStatusReport; end; PWebURLDataItem = ^TWebURLDataItem; |
Ich hoffe Ihr könnt mir hier das ein oder andere Stichwort dazu geben.
Grüße und Dank ins Forum,
Andreas