Thank you. Suresh
You might try experimenting with ParametricPlot3D. However, it draws axes on the edges of the bounding box.
ParametricPlot3D[ { {x, 0, Log10[x]}, {x, 4, Log10[x]}, {x, 8, Log10[x]} }, {x, 0, 100}, BoxRatios -> {1, .5, .5}, Boxed -> False ]
