Search results

it's a widely repeated myth, widely repeated even in text books

obviously, at the time, it was an untapped resource (Stifler quote!) they have done extremely well too, they're still around aren't they?

i'd say chicauaus (sp?) and dobermans look pretty different to wolves in the blink of eye in evolutionary terms... if humans dies out tmr, the dingoes in Australia would speciate away from other dogs and wolves very quickly evolution doesn't let you jump from a to b without an intermediate...

to eat and breed

big jumps? all dogs were wolves 15,000 years ago :confused:

because gills work. with lungs, you can only dive, you can't go under water for long (unless you have massive air storage)

no it doesn't it could regress, or it could reinvent them again indeed, but there's plenty that would invalidate the theory, that's the definition of a good theory. human fossils before the KT boundary would shake biology to its foundations

sea snakes, dolphin & whales' ancestors used to live on land perhaps they would if they were designed, they're not no not really you've viewing evolution as pushing things towards the ultimate design, like car technology. it doesn't work that way. their ancestor evolved lungs as they were...

don't mix the irish with the scotch ;)

surely that's a lie ;)

i think children learn to lie once they learn to talk well at about 3 or 4, regardless of whether the parents lie or not they know if they answer "yes" to "did you break it?" they're in trouble, so they try "no" so i would say, like grammar, children are born with the capacity to lie and it's...

tit for tat is a highly effective strategy in interated Prisoners' Dilemma though :) as discussed in The Selfish Gene http://en.wikipedia.org/wiki/Tit_for_tat

a medley of code from off the internet :) here's the whole module i created Option Compare Database Option Explicit Declare Function WNetGetConnection32 _ Lib "mpr.dll" _ Alias "WNetGetConnectionA" ( _ ByVal lpszLocalName As String, _ ByVal lpszRemoteName...

i know, what the hell is that? :) worked like a dream, got some code to go through a hundred databases, some with workgroups, some Admin log in, some not and chuck a table together of all the linked tables they had in them

think i have solved it If strWorkGroup <> "" Then Set x = New PrivDBEngine With x .SystemDB = strWorkGroup .DefaultUser = strUser .DefaultPassword = strPassword End With End If Set wrkJet = x.Workspaces(0) Set db =...

on Set wrkJet = CreateWorkspace("Test", strUser, strPassword) because it's coming up with a user/password that isn't on the workgroup, i don't seem to have associated the workgroup to the workspace... :confused:

actually is it possible to do what i'm trying to do Function FindLinkedTables(ByVal strDBPath As String, ByVal strWorkGroup As String, ByVal strUser As String, ByVal strPassword As String) As Boolean Dim db As DAO.Database Dim tdLoop As DAO.TableDef Dim strSQL...

aaaah i see, many many thanks ken & wilko i can't change the app's workgroup as it's already open, makes sense thought i was going mad. thanks again

don't think so can find microsoft stuff on doing the same thing http://support.microsoft.com/?id=163002 but doesn't seem like i can change it?

hmm i think i'm missing something if i do this sub test1() DAO.DBEngine.SystemDB = "\\opssvr01\tpg_bo_data\Commodity\Commodity.mdw" debug.print DAO.DBEngine.SystemDB end sub i still get the default workgroup?? :confused: