=== Welcome to Hi {Handmade India}

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

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

Sample Drawings

<%If Request ("VISIT") = "Gallery" Then%> <% Const iGrpLimit = 1: Const iULimit = 8 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 4%> <% sThumbID = "Thumb_" & CStr (iCurCnt):iCurCnt = iCurCnt + 1%> <% sThumbID = "Thumb_" & CStr (iCurCnt):iCurCnt = iCurCnt + 1%> <% Next%>

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

<% End If%>

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

All in all simple clean geometry makes up the essence of design.

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

<%Else%>

<%End If%>

<%Dim iNext,iPrev If iGrp > 1 And iGrp < iGrpLimit Then iPrev = iGrp - 1:iNext = iGrp + 1 ElseIf iGrp = iGrpLimit 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%>