Yes I am geeting .type = CAT
mySearchString = "Select animalID,Status, Type from tblInventory where animalID=" & txtanimalID.Text
DsInventory1.Clear()
daInventory.SelectCommand.CommandText = mySearchString
daInventory.Fill(DsInventory1)
aType = DsInventory1.tblInventory(0).Type
Messagebox.show(aType)
it gives me output of CAT
if DsInventory1.tblInventory(0).Type="CAT" then
subCat()
elseif DsInventory1.tblInventory(0).Type="DOG" then
subDog()
else messagebox.show("no pets in stock")
program zips thru and messagebox no pets in stock comes up
why my conditon is not matching.
VB GURUs please help me quick.
Raj
rSd