网站要集成支付宝怎么弄啊？

<!-- #include virtual="/alipay/alipay/alipay_payto.asp"-->

<% '包含文件请用该文件所在的实际目录代替

dim service,partner,sign_type,subject,body,out_trade_no,price,show_url,quantity,seller_email,notify_url,return_url,key
dim logistics_type,logistics_type_1,logistics_fee,logistics_fee_1,logistics_payment,logistics_payment_1,payment_type
dim t1,t4,t5
dim AlipayObj,itemUrl
t1 = "https://www.alipay.com/cooperate/gateway.do?" '支付接口
t4 = "/alipay/images/alipay_bwrx.gif" '支付宝按钮图片
t5 = "推荐使用支付宝付款" '按钮悬停说明

service = "trade_create_by_buyer" '实物支付服务
partner = "2088002135886843" 'partner合作伙伴ID，支付宝提供给您
sign_type = "MD5"
subject = "联想电脑" 'subject商品名称
body = "联想电脑说明" 'body商品描述
out_trade_no = Replace(Now(),"-","")
out_trade_no = Trim(Replace(out_trade_no,":",""))
price = sum 'price商品单价
show_url = "http://www.网址.com/user/Eshop_detail.asp?ID="&a '商品展示地址，请自行替换
quantity = "1" '商品数量 不同的网站的可能不同;根据实际情况而定
seller_email = "XXX@gmail.com" '卖家账户，请用您自己的账号代替
key = "iq69kfyt1vrfefxftu5j55nlg4keqekc" '支付宝安全校验码，支付宝提供给您的
notify_url = "http://www.网址.com/alipay/Alipay_Notify.asp"
return_url = "http://www.网址.com/index.asp"
logistics_type_1 = "EXPRESS"
logistics_fee_1 = "15.00" '快递的价格
logistics_type = "POST"
logistics_fee = "0.00" '平邮的价格

logistics_payment = "BUYER_PAY" '物流支付方
logistics_payment_1 = "BUYER_PAY"

payment_type = "1" '支付类型

Set AlipayObj = New creatAlipayItemURL

itemUrl=AlipayObj.creatAlipayItemURL(t1,t4,t5,service,partner,sign_type,subject,body,out_trade_no,price,show_url,quantity,seller_email,notify_url,return_url,key,logistics_fee_1,logistics_fee,logistics_type_1,logistics_type,logistics_payment,logistics_payment_1,payment_type)
%>

<table border="0" cellspacing="1" cellpadding="0" align="center" valign=absmiddle width=100%>

<tr><td align=center width=50%><%=itemUrl%></td></tr></table>

<!--#include file="Alipay_md5.asp"-->
<%
Class creatAlipayItemURL
'获得最终的购买url

Public Function creatAlipayItemURL(t1,t4,t5,service,partner,sign_type,subject,body,out_trade_no,price,show_url,quantity,seller_email,notify_url,return_url,key,logistics_fee_1,logistics_fee,logistics_type_1,logistics_type,logistics_payment,logistics_payment_1,payment_type)
Dim itemURL
dim INTERFACE_URL,imgsrc,imgtitle
'初始化各必要变量
INTERFACE_URL = t1 '支付接口
imgsrc = t4 '支付宝按钮图片
imgtitle = t5 '按钮悬停说明

Count=16
mystr = Array("service="&service,"partner="&partner,"subject="&subject,"body="&body,"out_trade_no="&out_trade_no,"price="&price,"show_url="&show_url,"quantity="&quantity,"seller_email="&seller_email,"notify_url="¬ify_url,"return_url="&return_url,"logistics_fee_1="&logistics_fee_1,"logistics_fee="&logistics_fee,"logistics_type_1="&logistics_type_1,"logistics_type="&logistics_type,"logistics_payment="&logistics_payment,"logistics_payment_1="&logistics_payment_1,"payment_type="&payment_type)

Count=ubound(mystr)
For i = Count TO 0 Step -1
minmax = mystr( 0 )
minmaxSlot = 0
For j = 1 To i
mark = (mystr( j ) > minmax)
If mark Then
minmax = mystr( j )
minmaxSlot = j
End If
Next

If minmaxSlot <> i Then
temp = mystr( minmaxSlot )
mystr( minmaxSlot ) = mystr( i )
mystr( i ) = temp
End If
Next

For j = 0 To Count Step 1
value = SPLIT(mystr( j ), "=")

If value(1)<>"" then
If j=Count Then
md5str= md5str&mystr( j )
Else
md5str= md5str&mystr( j )&"&"
End If
End If
Next

md5str=md5str&key
' response.write md5str

sign=md5(md5str)

itemURL = itemURL&INTERFACE_URL

For j = 0 To Count Step 1
value = SPLIT(mystr( j ), "=")
If value(1)<>"" then
itemURL= itemURL & mystr(j) & "&"
End If
Next

itemURL = itemURL&"sign="&sign&"&sign_type="&sign_type

'response.write itemURL

creatAlipayItemURL = get_AlipayButtonURL (itemURL,imgtitle,imgsrc)

End Function

Public Function get_AlipayButtonURL(itemURL,imgtitle,imgsrc)
dim responseText1
responseText1 = responseText1 & "<a href='" & itemURL & "' target='_blank'>" '购买网址
responseText1 = responseText1 & "<img alt='" & imgtitle & "' src='" '图片说明
responseText1 = responseText1 & imgsrc '图片地址
responseText1 = responseText1 & "' align='absmiddle' border='0'/></a>"
get_AlipayButtonURL=responseText1
End Function

End Class
%>

集成用到的主要就是这两个文件，其他文件可以从这个地方下载。

http://forum.alipay.com/show_thread-80---5724879-.htm


上面只是一个例子;这个要根据你的实际情况而定