R help - Feb 2014 - acessing symbols dynamically through a gedit box using getsymbol function

I had tried a little weird way of accessing symbols from
"YAHOO.FINANCE" in
my GUI which is made in gwidgets ...Here is an example:--

tbl[5,1]=glabel("ENTER SYMBOL:-",cont=tbl)

tbl[5,2]=gedit("", cont=tbl,coerce.with=as.character)

BSS<-function(h,...)

{

options(guiToolkit="RGtk2")

data <- new.env()

getSymbols(svalue(tbl[5,2]),env = data, auto.assign = T)

options("getSymbols.warning4.0"=FALSE)

ashdata1<-data.frame(tbl[5,2])

}

My question is I could not get those symbols from the getSymbol function ,
can any one show me some way how to access this symbols dynamically ,such
that the users can specify any symbols and could access those data in a
click of a button .. Thanks You.


ASHIS  DEB

	[[alternative HTML version deleted]]