To get the size of the database, the size of the database space used

Data | Database Execute this
EXEC sp_spaceused

Test code
<%
Set Rs=server. CreateObject ("Adodb.recordset")
sqlstr= "Exec sp_spaceused"
Rs.Open sqlstr,conn,1,1

If Rs.eof=false Then
Response.Write Rs (0) &rs (1) &rs (2) ' Returns the test value test25.38 MB6.34 MB
' RS (0) is the database name, RS (1) is the database space, RS (2) is the free space
End If

Rs.close
Conn.close
%>


It's okay to write.

<%
Set Rs=server. CreateObject ("Adodb.recordset")
sqlstr= "Exec sp_spaceused"
Rs.Open sqlstr,conn,1,1

Response.Write RS ("database_name") ' Database name
Response.Write rs ("database_size") ' Database space
Response.Write rs ("Unallocated_space") ' Free space

%>