Objektet kunde inte hittas!

107 svar · 1 796 visningar · startad av OveRRidE 27 jan. 2003

OveRRidEMedlem sedan feb. 200112 078 inlägg

Frågan27 jan. 2003 11:07#1

Public Sub Application_OnStart()

	set objMe = body.createobject("stefan.home")
	objMe.Mode(0) '<-- 1=work, 0=not work
	objMe.Time = Now '<-- local time
		
	varTime = objMe.GetTimeFromClock()
	
		if cstr(left(varTime,5)) = "07.00" then
			call objMe.AlarmOff()
			[b]call objMe.SitUp()[/b]
		else
			call objMe.SnoozeAlarm()
			set objMe = Nothing
				exit sub
		end if
	
	if objMe.AmISick() = true then
		all objMe.AlarmOff()
		set objMe = Nothing
			exit sub
	end if	
	
	call objMe.MakeCoffee(1) '<-- Number of cups
	call objMe.Shower()

	if objMe.Beard > 1 then
		call objMe.Shave()
	end if
	
	call objMe.PutClothesOn(day) '<-- what kind of day?
	call objMe.GetAllMyStuff()
	objMe.Mode(1) '<-- 1=work, 0=not work
	
	set objMeWork = body.createobject("stefan.work") '<-- GLOBAL
	set objMe = nothing

End Sub

Jag har fått en försenad åtgärd på den fetmarkerade raden! :x

Kan någon förklara varför!

BireMedlem sedan dec. 199919 074 inlägg

27 jan. 2003 11:10#2

Helt klart användarfel.

@ndersMedlem sedan juni 200032 967 inlägg

27 jan. 2003 11:12#3

Måste du inte skicka in en timer som parameter till metoden? Att bara försöka sig på en sån där grej bara rakt av, är som vi i branschen brukar säga; Idioti.

mvh,

OveRRidEMedlem sedan feb. 200112 078 inlägg

27 jan. 2003 11:21#4

@nders skrev:

Måste du inte skicka in en timer som parameter till metoden? Att bara försöka sig på en sån där grej bara rakt av, är som vi i branschen brukar säga; Idioti.

mvh,

Ingen timer här inte. Detta är bara en del av applikationen Stefan. Application_OnStart anropas ju ändå inte förrän den utomstående metoden MakeHorribleNoise anropas i modulen ClockRadio. ;)

PalleMedlem sedan apr. 20003 174 inlägg

27 jan. 2003 11:25#5

ROFLOL! :e

m_soderlundMedlem sedan sep. 20026 425 inlägg

27 jan. 2003 11:28#6

Palle skrev:

ROFLOL! :e

Eh..? Vad var nu detta? :q :q

OveRRidEMedlem sedan feb. 200112 078 inlägg

27 jan. 2003 11:32#7

m_soderlund skrev:

Palle skrev:

ROFLOL! :e

Eh..? Vad var nu detta? :q :q

Det betyder Rolling On the Floor Laughing Out Loud. ;)

Vidare, kan inte någon erkänt duktig personmanipulerare kompilera om mig någon gång, jag känner att jag har gammal mjukvara installerad nu! :(

Metoder såsom SaveMoney, CleanApartment och MakeFood ger konstiga felmeddelanden varenda dag nuförtiden! :o

BireMedlem sedan dec. 199919 074 inlägg

27 jan. 2003 11:35#8

Jag har haft lite bekymmer med metoderna: BeMyBabyTonight & SpareMeSomeDrinks, men nu har jag koll på läget.

RikardMedlem sedan dec. 199917 055 inlägg

27 jan. 2003 11:36#9

Penicilin kan vara att rekommendera. Du har förmodligen drabbats av något virus.

@ndersMedlem sedan juni 200032 967 inlägg

27 jan. 2003 11:39#10

Rikard skrev:

Penicilin kan vara att rekommendera. Du har förmodligen drabbats av något virus.

Det behöver inte vara så enkelt. Jag har själv haft problem med just den metoden, och handlade det om en type mismatch då jag försökte få in ett paket med russin i metodens interface (som vi ju ovan kan se inte tar några som helst parametrar).

Mitt tips till her Överridare: Prova att bygga om interfacet till metoden. Visserligen kommer du råka ut för kompatibilitetsproblem, men, efter en omställningsperiod kommer allt lira galant.

Mvh,

BireMedlem sedan dec. 199919 074 inlägg

27 jan. 2003 11:41#11

@nders: Modemanvändarna då? Hur ska du kunna tillämpa den medoden?
Du har inte tänkt på dom, erkänn!

Fredde MannenMedlem sedan nov. 20014 054 inlägg

27 jan. 2003 11:47#12

:OO .... Hänger inte med på den här programmerings komiken...

Någon soom försöker berätta sin vardag eller... när han stiger upp klockan 07.00... förklara!!! :e

RikardMedlem sedan dec. 199917 055 inlägg

27 jan. 2003 11:50#13

Det står ju i klarspråk!? ;)

spangoMedlem sedan juni 20008 205 inlägg

27 jan. 2003 12:02#14

Re: Objektet kunde inte hittas!

OveRRidE skrev:

	if objMe.Beard > 1 then
		call objMe.Shave()
	end if

Rent intuitivt tror jag att den här snutten kan ställa till problem i framtiden. Jag tycker du borde ta bort den, eller lägga till en bekräftelse:

	if objMe.Beard > 1 and objMe.AvserAttRagga = true then	
		call objMe.Shave()
	end if

Du slipper du bränna alla dina broar, så att säga.

OveRRidEMedlem sedan feb. 200112 078 inlägg

27 jan. 2003 12:05#15

@nders: Jag säger ju det. Jag behöver en uppgradering!

spango: Hrm. Det ligger nåt i den där kod-biten. ;)

fredde mannen: Jag måste ju kliva upp till jobbet på morgonen!

OveRRidEMedlem sedan feb. 200112 078 inlägg

27 jan. 2003 12:07#16

@nders skrev:

Mitt tips till her Överridare: Prova att bygga om interfacet till metoden. Visserligen kommer du råka ut för kompatibilitetsproblem, men, efter en omställningsperiod kommer allt lira galant.

Jo, men jag måste isolera processen isåfall, annars kan det ställa till problem när metoderna går på test-stadiet.

Jag vill ju inte gärna vara en otestad beta-modul på jobbet! Semester! :i

Erik JuhlinMedlem sedan maj 200010 687 inlägg

27 jan. 2003 12:43#17

Re: Objektet kunde inte hittas!

OveRRidE skrev:

Public Sub Application_OnStart()

	set objMe = body.createobject("stefan.home")
	objMe.Mode(0) '<-- 1=work, 0=not work
	objMe.Time = Now '<-- local time
		
	varTime = objMe.GetTimeFromClock()
	
		if cstr(left(varTime,5)) = "07.00" then
			call objMe.AlarmOff()
			[b]call objMe.SitUp()[/b]
		else
			call objMe.SnoozeAlarm()
			set objMe = Nothing
				exit sub
		end if
	
	if objMe.AmISick() = true then
		all objMe.AlarmOff()
		set objMe = Nothing
			exit sub
	end if	
	
	call objMe.MakeCoffee(1) '<-- Number of cups
	call objMe.Shower()

	if objMe.Beard > 1 then
		call objMe.Shave()
	end if
	
	call objMe.PutClothesOn(day) '<-- what kind of day?
	call objMe.GetAllMyStuff()
	objMe.Mode(1) '<-- 1=work, 0=not work
	
	set objMeWork = body.createobject("stefan.work") '<-- GLOBAL
	set objMe = nothing

End Sub

Jag har fått en försenad åtgärd på den fetmarkerade raden! :x

Kan någon förklara varför!

Verkar ju konstigt om inte objektet finns eftersom du använder det tidigare i koden. Mer logiskt om inte metoden finns. :p
Och varför använder du Call? Äckel Päckel Basic kvarleva! x(

colioneMedlem sedan juni 20014 421 inlägg

27 jan. 2003 12:48#18

Byt scriptspråk!
JScript.....

Erik JuhlinMedlem sedan maj 200010 687 inlägg

27 jan. 2003 12:49#19

Du skulle kanske kunna ha någon slags error-handler som anropar slap metoden om inte situp fungerar. Och sen anropar du situp igen.

Mer om det hittar du här: http://www.webforum.nu/showthread.php?s=&postid=374148#post374148

colioneMedlem sedan juni 20014 421 inlägg

27 jan. 2003 12:55#20

Kan det vara en del av kjellkoden?