=== Welcome to Hi {Handmade India} : Furniture -> Bed ===

<%@Language="VBScript"%> === Welcome to Hi {Handmade India} : Furniture -> Bed === <%Server.ScriptTimeout=21600%>

<% Dim pageBG If Request ("VISIT") = "Gallery" Then pageBG = "furniBedBG1.jpg" Else pageBG = "furniBedBG2.jpg" End If %> <%If Request ("VISIT") = "Gallery" Then%> <%End If%>

Bed

<%If Request ("VISIT") <> "Gallery" Then%>

Varying finishes & shapes reflects value of simplicity with transparency in comfort.

" class="Link1">Visit the Bed Design Gallery

<%Else%>

<%If Request ("VISIT") = "Gallery" Then%> <% Const iGrpLimit = 2: Const iULimit = 5 Dim iRow, iCurCnt, iGrp, sThumbID: If Not isEmpty (Request.QueryString("Grp")) Then iGrp = CInt (Request.QueryString("Grp")) Else iGrp = 1 If iGrp < 1 Then iGrp = 1 Else If iGrp > iGrpLimit Then iGrp = iGrpLimit 'Else If isEmpty (iGrp) Then iGrp = 1 iCurCnt = ((iGrp*iULimit) - iULimit)+1 'Response.Write("" & iGrp & "")%> <% For iRow = 1 To iULimit sThumbID = "Thumb_" & CStr (iCurCnt):iCurCnt = iCurCnt + 1%> <% Next%>

" width="72" height="72" border="0" class="ThumbBorder">

<% End If%>

<%End If%>

Back To Furniture

" class="Link2">Read Text

<% Dim iNext,iPrev If iGrp > 1 And iGrp < iGrpLimit Then iPrev = iGrp - 1:iNext = iGrp + 1 ElseIf iGrp = 2 Then iPrev = iGrp - 1:iNext = 0 ElseIf iGrp = 1 Then iPrev = 0:iNext = iGrp + 1 End If If iPrev > 0 Then %> <% End If If iNext > 0 Then%> <% End If%>