At lave 5 databaseconnections, hver eneste gang en bruger går ind på forsiden af din hjemmeside, er nok lidt meget.
At lave en ekstra databaseconnection (for at gemme data om hvornår de andre databaser senest er opdateret) hver gang du redigerer en af de fem databaser, er nok også lige i overkanten.
Det optimale vil være at lægge tabellerne ind i een enkelt database - men hvis du har bygget dit site op med den struktur du har nu, vil det sikkert være bedst (læs: lettest) bare at opdatere en applicationvariabel, når du har redigeret en database.
application("SenestOpdateretDB") = "database1" 'eftre opdatering af database1
Function ShowFileAccessInfo2(filespec) Dim fso, f, s Set fso = CreateObject("Scripting.FileSystemObject") Set f = fso.GetFile(filespec) s = UCase(filespec) & "<BR>" s = s & "Created: " & f.DateCreated & "<BR>" s = s & "Last Accessed: " & f.DateLastAccessed & "<BR>" s = s & "Last Modified: " & f.DateLastModified ShowFileAccessInfo = s End Function
Function ShowFileAccessInfo(filespec) Dim fso, f, s Set fso = CreateObject("Scripting.FileSystemObject") Set f = fso.GetFile(filespec) s = s & "Last Modified: " & f.DateLastModified ShowFileAccessInfo = s End Function
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.