Flash小遊戲（簡單轉盤抽獎遊戲）

SQL刪除重複資料，一次搞定

常常會有資料表沒有設定Primary Key
造成資料重複匯入
要如刪除重複部份
程序如下

--建置一個TEMP TABLE
drop table #A
create table #A(i int,s nvarchar(100))
--把來源資料下group by 並限制資料筆數是兩筆以上的加以匯入
insert into #A
select * from SourceTable
where iGroup in(
select iGroup from SourceTable
group by iGroup
having count(*) >1
)
--刪除重複的資料
delete AdminGroup
where iGroup in(
select iGroup from SourceTable
group by iGroup
having count(*) >1
)
--最後把整理匯入的Temp TABLE資料匯入即可
insert into SourceTable
select distinct i,s from #A

GH教學

ASP三角形排列問題

VBA老師出題要我做一出個如下的三角形
.............a
...........aaa
.........aaaaa
.......aaaaaaa
.....aaaaaaaaa
...aaaaaaaaaaa
.aaaaaaaaaaaaa
首先要先觀察排列規則
而且每列數量是相同13個
所以只要觀察出a的數量
可以看出a是以2為增量所以*2來計算
相對地.就以相同量減少
以維持整行13的數量

VBA語法
Private Sub Command1_Click()
n = 13
For k=1 To 7
Print String(n-(K-1)*2,".") & String(1+(K-1)*2, "a")
Next
End Sub

ASP語法
<%
n = 13
For k=1 To 7
Response.write String(n-(K-1)*2,".") & String(1+(K-1)*2, "a") & "<br>"
Next
%>