	��װ��
	��֯�˲��

ְ�ܣ�

��ҵ��

ȫְ

��ְ

[�� ]

��˾��

��

ְλ�б�

< % connstr = "driver={SQL Server};server=203.130.37.188,3314;uid=works;pwd=1a@s3d$;database=haojob" set conn1=server.createobject("ADODB.CONNECTION") conn1.open connstr sql1 = "select * from Cli_Hr where status=1 and ubid="&expr1 'rs1=conn1.execute(sql1) set rs1 = server.CreateObject ("adodb.recordset") rs1.Open sql1,conn1,3,1 while not rs1.eof response.write ""&rs1("title")&" " rs1.movenext wend rs1.close Set rs1 = Nothing conn1.close Set conn1 = Nothing % >

< % set conn=nothing % >-->