快捷導(dǎo)航

用ASP寫組件

更新時(shí)間：2006年08月25日 00:00:00 作者：

打開VB,新建AX DLL,工程名為Str,類名count,輸入如下代碼:

Public Function add(ByVal a As Double, ByVal b As Double, ByVal c As Integer, ByVal d As Integer) As Double 
d = CInt(d) 

If c = 1 Then '加 
add = FormatNumber(a + b, d) 
ElseIf c = 2 Then '減 
add = FormatNumber(a - b, d) 
ElseIf c = 3 Then '乘 
add = FormatNumber(a * b, d) 
ElseIf c = 4 Then '除 
add = FormatNumber(a / b, d) 
End If 

End Function 

參數(shù)說明:a,b 為需要計(jì)算的數(shù)值,c為計(jì)算類型,d為小數(shù)點(diǎn)保留多少位

客戶端ASP文件代碼:

復(fù)制代碼代碼如下:

set obj=server.CreateObject("str.count")  
dim c  
c=obj.Add(455,45,4,2)  
Response.Write c  

上面代碼執(zhí)行結(jié)果就是:455除以45,小數(shù)點(diǎn)精確到百分位

用ASP寫組件

相關(guān)文章

新手asp編程的基本法則與常見錯(cuò)誤注意事項(xiàng)
在論壇看到很多帖子代碼中都有一個(gè)共同的基本錯(cuò)誤，字段類型錯(cuò)誤。程序和數(shù)據(jù)庫是緊緊相連的，數(shù)據(jù)庫字段文本型或時(shí)間型的都使用單引號
2008-07-07
用asp實(shí)現(xiàn)訪問遠(yuǎn)程計(jì)算機(jī)上MDB access數(shù)據(jù)庫文件的方法
用asp實(shí)現(xiàn)訪問遠(yuǎn)程計(jì)算機(jī)上MDB access數(shù)據(jù)庫文件的方法...
2007-11-11
ASP 判斷是否有中文的代碼
其實(shí)我上一篇寫的js判斷中文才是最好的方法，這個(gè)是asp的一種，只要是雙字節(jié)都是當(dāng)作中文判斷
2008-09-09
asp程序定義變量比不定義變量速度快一倍
一直以來對asp的程序編寫都比較隨意，也沒有太多考慮運(yùn)行效率的問題。asp對語法是相當(dāng)寬容的，容錯(cuò)性很高，它不需要定義變量便可直接使用，變量名不需要區(qū)分大小寫字母，asp的文件名也同樣不像jsp那樣對字母大小寫是敏感的
2012-07-07
asp下的一個(gè)檢測鏈接是否正常的函數(shù)
很簡單的函數(shù)，用來檢測網(wǎng)站域名是否能正常訪問。
2008-07-07
asp二維數(shù)組實(shí)例中的使用方法總結(jié)
筆者對asp編程不是很熟悉，而且好長不用記不清了。這一次，需要保存asp的二維數(shù)組為asp文件，使用include 指令文件引用后，直接調(diào)用。使用過程中發(fā)現(xiàn)asp的二維數(shù)組相關(guān)資料很少，而且介紹簡單模糊，現(xiàn)結(jié)合使用實(shí)例做個(gè)簡單筆記。
2023-06-06
在Z-BLOG可用的新版ASP的GIF驗(yàn)證碼[V70404]
在Z-BLOG可用的新版ASP的GIF驗(yàn)證碼[V70404]...
2007-04-04
Asp 使用 Microsoft.XMLHTTP 抓取網(wǎng)頁內(nèi)容并過濾需要的
這篇文章主要介紹了Asp 使用 Microsoft.XMLHTTP 抓取網(wǎng)頁內(nèi)容(沒用亂碼)，并過濾需要的內(nèi)容
2014-05-05
asp文本框換行顯示代碼
調(diào)用數(shù)據(jù)時(shí)把數(shù)據(jù)庫的換行標(biāo)記替換為<br>前臺調(diào)用時(shí)候設(shè)置為支持HTML就可以了，通過textarea提交數(shù)據(jù)的朋友可以參考下。
2011-05-05
實(shí)現(xiàn)純真IP txt轉(zhuǎn)mdb數(shù)據(jù)庫的方法
實(shí)現(xiàn)純真IP txt轉(zhuǎn)mdb數(shù)據(jù)庫的方法...
2007-07-07